|
%I #8 Oct 12 2013 15:14:05
%S 3,3,5,5,7,11,13,17,19,23,29,31,59,61,89,149,151,179,181,211,419,421,
%T 631,839,1049,1051,1259,1471,1889,2099,2309,2311,4621,9239,9241,11549,
%U 11551,13859,18481,20789,23099,25409,25411,30029,90089,120121,150151
%N Table read by rows where i-th row consists of primes P of the form P=j*P(i)# -1 or P=j*P(i)# +1 with 0 < j < P(i+1). Here P(r)# = A002110.
%e Table begins:
%e 3,3,5,
%e 5,7,11,13,17,19,23,
%e 29,31,59,61,89,149,151,179,181,
%e 211,419,421,631,839,1049,1051,1259,1471,1889,2099,
%e 2309,2311,4621,9239,9241,11549,11551,13859,18481,20789,23099,25409,25411
%o (PARI) {for(i=1,6, p=prod(j=1,i, prime(j)); for(j=1, prime(i+1)-1, c=j*p; if(isprime(c-1),print1(c-1 ",")); if(isprime(c+1),print1(c+1 ",")); ););}
%Y Cf. A087714, A087716, A087728.
%K tabf,nonn
%O 0,1
%A _Pierre CAMI_, Sep 29 2003
%E Edited by _Ray Chandler_, Sep 30 2003
|
