|
%I #8 Oct 14 2018 15:19:22
%S 1151,1973,2333,2579,3251,3491,3761,3989,4049,5471,6449,7151,8039,
%T 9371,9461,9719,10061,10133,10391,10589,11351,11549,12071,12323,13751,
%U 13829,14243,14369,15053,15959,17159,17231,17783,18119,19001,19841,19889
%N Upper prime of a difference of 22 between consecutive primes.
%H Harvey P. Dale, <a href="/A098976/b098976.txt">Table of n, a(n) for n = 1..2500</a>
%F a(n) = A061779(n)+22.
%t Select[Partition[Prime[Range[2500]],2,1],#[[2]]-#[[1]]==22&][[All,2]] (* _Harvey P. Dale_, Oct 14 2018 *)
%Y Cf. A031939.
%K nonn,easy
%O 1,1
%A Douglas Winston (douglas.winston(AT)srupc.com), Oct 24 2004
|
