Annual Appeal: Please make a donation (tax deductible in USA) to keep the OEIS running. Over 4500 articles have referenced us, often saying "we would not have discovered this result without the OEIS".
Table of n, a(n) for n=1..49.
Select[ Range[ 1000 ], PrimeQ[ ToExpression[ StringReverse[ ToString[ #^4 ] ] ] ] & ]
Sequence in context: A108029 A212048 A032476 * A217075 A187261 A101398
Adjacent sequences: A059202 A059203 A059204 * A059206 A059207 A059208
Robert G. Wilson v, Jan 16 2001