OFFSET
1,2
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
Robert G. Wilson v, Dec 01 2001
EXTENSIONS
Data corrected by Sean A. Irvine, Sep 06 2023
STATUS
approved