1,2
Do[ If[ PrimeQ[ ToExpression[ StringReverse[ ToString[13^n] ] ] ], Print[n] ], {n, 1, 2300} ]
Cf. A057708.
Sequence in context: A108385 A020369 A142207 this_sequence A161612 A142752 A133961
Adjacent sequences: A058992 A058993 A058994 this_sequence A058996 A058997 A058998
nonn,base
Robert G. Wilson v (rgwv(AT)rgwv.com), Jan 17 2001
Search completed in 0.002 seconds
