login
A317250
Record values in A204911.
1
5, 7, 11, 13, 17, 31, 43, 47, 53, 67, 73, 79, 101, 127, 137, 157, 179, 181, 193, 197, 211, 223, 307, 379, 409, 431, 433, 619
OFFSET
1,1
FORMULA
a(n) = A204911(A317249(n)).
EXAMPLE
a(1)=A204911(1)=5.
a(2)=7 because A204911(4)=7 while A204911(k)<=5 for k<4.
a(3)=11 because A204911(20)=11 while A204911(k)<=7 for k<20.
MAPLE
f:= proc(n) local V, q, r;
V:= Array(0..n-1); q:= 4;
do
q:= nextprime(q);
r:= q mod n;
if V[r] = 0 then V[r]:= q
else return V[r]
fi
od
end proc:r:= 5: Recvals:= 5:
for n from 2 to 20000 do
rn:= f(n);
if rn > r then Recvals:= Recvals, rn; r:= rn fi
od:
Recs;
CROSSREFS
Sequence in context: A114262 A255229 A230217 * A007529 A287956 A266266
KEYWORD
nonn,more
AUTHOR
Robert Israel, Jul 24 2018
EXTENSIONS
a(19)-a(28) from Michael S. Branicky, Jun 25 2024
STATUS
approved