login
A340997
a(n) is the first k such that A340996(k) = n.
2
1, 5, 8, 16, 26, 24, 36, 48, 54, 60, 84, 96, 90, 132, 144, 120, 174, 150, 168, 180, 246, 234, 240, 210, 270, 342, 300, 324, 396, 378, 330, 468, 390, 450, 618, 462, 420, 654, 594, 540, 510, 546, 786, 702, 726, 768, 630, 690, 660, 1078, 858, 936, 798, 780, 930, 1008, 900, 1164, 1056, 966, 840, 1278
OFFSET
0,2
LINKS
FORMULA
A340996(a(n)) = n.
EXAMPLE
a(3) = 16 as A340996(16) = 3 and this is the first occurrence of 3 in A340996.
MAPLE
f:= proc(n) local k; nops(select(isprime, {seq(n mod k, k=select(isprime, [$2..n-1]))})) 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 V[v]:= n; count:= count+1;
od:
convert(V, list);
CROSSREFS
Cf. A340996.
Sequence in context: A350347 A073136 A063924 * A058566 A153363 A154119
KEYWORD
nonn
AUTHOR
J. M. Bergot and Robert Israel, Feb 01 2021
STATUS
approved