A024627 Positions of cubes among the powers of primes (A000961).

1, 7, 16, 28, 43, 87, 118, 153, 245, 361, 605, 699, 930, 1514, 1881, 2294, 2777, 3303, 3591, 5280, 6946, 7892, 10027, 11212, 13871, 18550, 20323, 23151, 26219, 30762, 33157, 41178, 44126, 47156, 57135, 72447, 80965, 85429, 94953, 99932, 110400

Offset

1,2

Links

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

Prog

(PARI) lista(nn) = {vec = vector(nn, i, i); powpr = select((i->((omega(i)==1) || (i==1))), vec); for (i = 1, #powpr, if (ispower(powpr[i], 3), print1(i, ", ")); ); }

Crossrefs

Cf. A024626.

Sequence in context: A345071 A351044 A133694 * A211784 A180724 A212866

Adjacent sequences: A024624 A024625 A024626 * A024628 A024629 A024630

Keyword

nonn

Author

Clark Kimberling

Status

approved