login
A058991
Smallest number not a power of two whose reversal of its n-th power is a prime.
0
3, 14, 5, 14, 41, 49, 29, 23, 131, 53, 17, 7, 25, 28, 47, 53, 134, 25, 79, 95, 47, 46, 28, 7, 19, 5, 85, 86, 541, 47, 104, 314, 25, 115, 113, 5, 46, 25, 67, 71, 142, 226, 5, 53, 95, 304, 14, 106, 85, 202
OFFSET
1,1
MATHEMATICA
Do[ k = 1; While[ Mod[ k, 10 ] == 0 || IntegerQ[ Log[ 2, k ] ] || ! PrimeQ[ ToExpression[ StringReverse[ ToString[ k^n ] ] ] ], k++ ]; Print[ k ], {n, 1, 50} ]
CROSSREFS
Sequence in context: A163357 A179087 A217013 * A341860 A197423 A090786
KEYWORD
nonn,base
AUTHOR
Robert G. Wilson v, Jan 16 2001
STATUS
approved