|
%I #22 May 27 2016 07:44:03
%S 7,29,19,41,31,53,37,59,61,83,67,89,79,101,109,131,127,149,151,173,
%T 157,179,211,233,229,251,241,263,271,293,331,353,337,359,367,389,379,
%U 401,397,419,409,431,421,443,439,461,457,479,487,509,499,521,541,563,547
%N List of prime pairs of form p, p+22.
%C The two primes p and p+22 are not necessarily adjacent.
%H Seiichi Manyama, <a href="/A140447/b140447.txt">Table of n, a(n) for n = 1..10000</a>
%e The pairs are (7, 29), (19, 41), (31, 53) etc.
%t {#, # + 22} & /@ Select[Prime@ Range@ 100, PrimeQ@ # && PrimeQ[# + 22] &] // Flatten (* _Michael De Vlieger_, May 23 2016 *)
%o (Ruby)
%o require 'prime'
%o ary = []
%o Prime.each(487447).each{|i| ary += [i, i + 22] if (i + 22).prime?}
%o p ary # _Seiichi Manyama_, May 22 2016
%Y Cf. A000040, A094343.
%K nonn
%O 1,1
%A _Juri-Stepan Gerasimov_, Jun 26 2008
%E Typo in definition edited by _D. S. McNeil_, Dec 10 2009
%E Entries verified and extended by _D. S. McNeil_, Dec 10 2009
|
