%I A115206
%S A115206 1,2,3,3,3,6,3,6,6,3,6,12,3,3,6,9,3,6,3,9,12,9,15,6,3,3,15,12,12,9,15,
6,
%T A115206 9,6,3,18,15,3,6,9,21,15,15,21,6,30,15,24,3,6,15,6,3,3,6,21,3,6,27,12,
%U A115206 12,21,18,18,9,15,18,9,3,21,15,3,15,18,15,12,9,6,15,6,6,12,9,12,9,42,9
%N A115206 Least number d such that p(n) -/+ 2d form a prime pair; p(n) being the
n-th prime.
%F A115206 a(n)=A078611(n)/2.
%t A115206 f[n_] := Block[{k = 1, p = Prime@n}, While[ !PrimeQ[p - 2k] || !PrimeQ[p
+ 2k], k++ ]; k]; Table[f[n], {n, 3, 90}] - Robert G. Wilson v (rgwv(at)rgwv.com),
Mar 14 2006
%Y A115206 Sequence in context: A133700 A087688 A126854 this_sequence A093653 A049982
A070167
%Y A115206 Adjacent sequences: A115203 A115204 A115205 this_sequence A115207 A115208
A115209
%K A115206 nonn
%O A115206 3,2
%A A115206 Lekraj Beedassy (blekraj(AT)yahoo.com), Mar 04 2006
%E A115206 Corrected by N. J. A. Sloane (njas(AT)research.att.com), Mar 05 2006
%E A115206 More terms from Robert G. Wilson v (rgwv(at)rgwv.com), Mar 14 2006
|