OFFSET
0,2
COMMENTS
a(n) is the least k such that A341237(k) = n.
LINKS
Robert Israel, Table of n, a(n) for n = 0..300
EXAMPLE
a(3) = 9 as there are 3 pairs (p,q) = (5,7), (7,11), (11,13) of consecutive primes such that (18-q,18-p) = (11,13), (7,11), (5,7) are pairs of consecutive primes, and 9 is the least number for which there are 3 such pairs.
MAPLE
f:= proc(n) local p, q, count;
q:= 2: count:= 0:
while q < 2*n -2 do
p:= q; q:= nextprime(q);
if isprime(2*n-p) and prevprime(2*n-p)=2*n-q then count:= count+1 fi;
od;
count
end proc:
V:= Array(0..100): count:= 0:
for n from 1 while count < 101 do
v:= f(n);
if v <= 100 and V[v] = 0 then count:= count+1; V[v]:= n fi
od:
convert(V, list);
CROSSREFS
KEYWORD
nonn
AUTHOR
J. M. Bergot and Robert Israel, Feb 07 2021
STATUS
approved