A099189 Smallest prime which is n times its reversal.

2, 31, 31, 61, 71, 601, 701, 911, 8501, 9901

Offset

0,1

Links

Table of n, a(n) for n=0..9.

Mathematica

f[n_] := Block[{k = 1}, While[p = Prime[k]; p <= n*FromDigits[ Reverse[ IntegerDigits[p]]], k++ ]; Prime[k]]; Table[ f[n], {n, 0, 9}]

Crossrefs

Sequence in context: A352959 A117816 A237263 * A247099 A053234 A020896

Adjacent sequences: A099186 A099187 A099188 * A099190 A099191 A099192

Keyword

base,fini,full,nonn

Author

Robert G. Wilson v, Oct 01 2004

Status

approved