OFFSET
1,1
LINKS
Zak Seidov, Table of n, a(n) for n = 1..1000
PROG
(PARI) lista(nn) = select(x->(issquare(x) && isprime(sqrtint(x))), select(x->(ispowerful(x) && (x % 2)), vector(nn, k, k)), 1); \\ Michel Marcus, Jun 18 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Nov 13 2011
STATUS
approved