|
|
A065574
|
|
Numbers k such that the first k decimal digits < 6 of Pi, read as a base-6 number, form a prime.
|
|
0
|
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
EXAMPLE
|
The digits of Pi less than 6 begins 3, 1, 4, 1, 5, 2, 5, 3, ..., interpreting increasing prefixes of these digits in base 6, we have 3_6 = 3 is prime (hence 1 is in the sequence), 31_6 = 19 is prime (hence 2 is in the sequence), 314_6 = 118 is not prime, 3141_6 = 709 is prime (hence 4 is in the sequence). - Sean A. Irvine, Sep 06 2023
|
|
MATHEMATICA
|
p = First[ RealDigits[ Pi, 10, 10^5]];
p = p[[ Select[ Range[10^5], p[[#]] <= 5 & ]]];
Do[ If[ PrimeQ[ FromDigits[ Take[p, n], 6]], Print[n]], {n, 3000} ]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,more,less
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|