[go: up one dir, main page]

login
A214450
Smallest prime p such that n primes exist between the prime triple (p, p+2, p+6) and the next prime triple.
1
5, 857, 311, 17, 31391, 3461, 1427, 12917, 1997, 4517, 41, 20747, 107, 1871, 1487, 4637, 2081, 347, 7877, 23057, 80777, 1091, 18041, 641, 461, 5231, 21017, 881, 4967, 45821, 1607, 15731, 165311, 17027, 35591, 26261, 11777, 8537, 64151, 101111, 82757, 23741
OFFSET
0,1
EXAMPLE
a(3)= 17 because there exists 3 primes 29, 31 and 37 are between (17, 19,23) and (41,43,47).
MAPLE
A214450 := proc(n)
local j, hi, lo ;
if n = 0 then
3;
else
for j from 1 do
hi := numtheory[pi]( A022004 (j+1)) ;
lo := numtheory[pi]( A098412 (j)) ;
if hi-lo = n+1 then
return A022004 (j);
end if;
end do:
end if;
end proc: # [Program from R. J. Mathar, adapted for this sequence (see A089637)].
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Lagneau, Jul 18 2012
STATUS
approved