|
|
A065989
|
|
The first n ternary digits of Pi expressed in decimal forms a prime.
|
|
0
|
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
The first 10 ternary digits of Pi (A004602) are 1001021101 = 20611 in decimal, which is a prime.
|
|
MATHEMATICA
|
Do[ If[ PrimeQ[ FromDigits[ First[ RealDigits[Pi, 2, n]], 2]], Print[n]], {n, 1, 5000} ]
Module[{nn=4600, pd}, pd=RealDigits[Pi, 3, nn][[1]]; Position[Table[ FromDigits[ Take[ pd, n], 3], {n, nn}], _?(PrimeQ[#]&)]]//Flatten (* Harvey P. Dale, Oct 14 2018 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|