OFFSET
1,2
EXAMPLE
n=256: composite(256) = 323 = 17*19, gcd(323,256)=1, so 256 is a term.
MATHEMATICA
c[x_] := FixedPoint[x+PrimePi[ # ]+1&, x]; t=Table[0, {256}]; s=0; k=0; Do[s=GCD[c[n], n]; If[Equal[s, 1], k=k+1; t[[k]]=n; Print[{k, n}]], {n, 1, 256}] t
PROG
(PARI) lista(nn) = {my(n=0, list=List()); forcomposite (c=1, nn, n++; if (gcd(n, c) == 1, listput(list, c))); Vec(list); } \\ Michel Marcus, Jul 19 2020
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Jul 22 2002
STATUS
approved