login
A073171
The (n^2)-th composite number.
3
4, 9, 16, 26, 38, 52, 69, 88, 111, 133, 159, 187, 217, 250, 287, 323, 362, 404, 448, 495, 542, 592, 648, 703, 760, 818, 882, 945, 1011, 1081, 1152, 1225, 1302, 1377, 1457, 1539, 1628, 1712, 1800, 1891, 1981, 2077, 2176, 2275, 2378, 2484, 2586, 2697, 2811
OFFSET
1,1
LINKS
FORMULA
a(n) = A002808(A000290(n)) = A002808(n^2). - Amiram Eldar, Oct 04 2024
MATHEMATICA
c[x_] := FixedPoint[x+PrimePi[ # ]+1&, x]; Table[c[j^2], {j, 1, 100}]
PROG
(PARI) lista(cmax) = {my(k = 0, m = 1, m2 = 1); forcomposite(c = 1, cmax, k++; if(k == m2, print1(c, ", "); m++; m2 = m^2)); } \\ Amiram Eldar, Oct 04 2024
CROSSREFS
Sequence in context: A189835 A183764 A022334 * A328363 A049739 A365306
KEYWORD
nonn
AUTHOR
Labos Elemer, Jul 19 2002
STATUS
approved