A317250 Record values in A204911.

5, 7, 11, 13, 17, 31, 43, 47, 53, 67, 73, 79, 101, 127, 137, 157, 179, 181

Offset

1,1

Links

Table of n, a(n) for n=1..18.

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

Cf. A204911, A317249.

Sequence in context: A114262 A255229 A230217 * A007529 A287956 A266266

Adjacent sequences: A317247 A317248 A317249 * A317251 A317252 A317253

Keyword

nonn,more

Author

Robert Israel, Jul 24 2018

Status

approved