OFFSET
1,1
EXAMPLE
11 is OK: 11 = perfect_power(3) + 3 = 8 + 3, perfect_power(n) is n-th perfect power: A001597(n).
31 is OK: 31 = perfect_power(6) + 6 = 25 + 6; 59 is OK: 59 = perfect_power(10) + 10 = 49 + 10.
PROG
(PARI) lista(nn) = {vec = vector(nn, i, i); pp = select(i->((ispower(i) || (i==1))), vec); for (i = 1, #pp, if (isprime(pp[i]+i), print1(pp[i]+i, ", ")); ); } \\ Michel Marcus, Oct 03 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Oct 10 2002
STATUS
approved