OFFSET
1,1
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..1000
EXAMPLE
9 is in the list because the concatenation of 9^5 9^4 9^3 9^2 9^1 9^0 is 5904965617298191 and this number is prime.
MATHEMATICA
Select[Range[4200], PrimeQ[FromDigits[Flatten[IntegerDigits/@{#^5, #^4, #^3, #^2, #, 1}]]]&] (* Harvey P. Dale, Jun 25 2022 *)
PROG
(PARI) isok(n) = {s = ""; for(i=0, 5, s = concat(Str(n^i), s)); isprime(eval(s)); } \\ Michel Marcus, Feb 04 2014
(PARI) is(n)=isprime(eval(Str(n^5, n^4, n^3, n^2, n, 1))) \\ Charles R Greathouse IV, Feb 04 2014
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Claudio Meller, Jul 05 2011
EXTENSIONS
Extended by Charles R Greathouse IV, Jul 05 2011
STATUS
approved