1,2
Table of n, a(n) for n=1..3.
The first 3 senary digits of Pi (A004605) are 305 = 113 in decimal, which is a prime.
Do[ If[ PrimeQ[ FromDigits[ First[ RealDigits[Pi, 6, n]], 6]], Print[n]], {n, 1, 2585} ]
Cf. A004605.
Sequence in context: A054747 A054950 A183961 * A097802 A119200 A197888
Adjacent sequences: A065990 A065991 A065992 * A065994 A065995 A065996
base,bref,nonn
Robert G. Wilson v, Dec 10 2001
approved
