A302493 Prime numbers of prime-power index.

2, 3, 5, 7, 11, 17, 19, 23, 31, 41, 53, 59, 67, 83, 97, 103, 109, 127, 131, 157, 179, 191, 211, 227, 241, 277, 283, 311, 331, 353, 367, 401, 419, 431, 461, 509, 547, 563, 587, 599, 617, 661, 691, 709, 719, 739, 773, 797, 859, 877, 919, 967, 991, 1009, 1031

Offset

1,1

Comments

A prime index of n is a number m such that prime(m) divides n.

Links

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

Formula

a(n) = A000040(A000961(n)).

Mathematica

Prime/@Select[Range[100], Or[#===1, PrimePowerQ[#]]&]

Prog

(PARI) forprime(p=1, 500, if(p==2 || isprimepower(primepi(p)), print1(p, ", "))) \\ Felix Fröhlich, Apr 10 2018

Crossrefs

Cf. A000040, A000961, A001222, A005117, A007097, A056239, A063834, A275024, A281113, A302242, A302491, A302492.

Sequence in context: A095365 A042989 A333872 * A188713 A280996 A377544

Adjacent sequences: A302490 A302491 A302492 * A302494 A302495 A302496

Keyword

nonn

Author

Gus Wiseman, Apr 08 2018

Status

approved