OFFSET
1,1
COMMENTS
The prime digits in the decimal expansion of Pi, i.e., the range of this sequence, are the exactly all single digit primes, A000040(1..4) = {2, 3, 5, 7}. - M. F. Hasler, Jul 27 2024
EXAMPLE
Pi = 3.141592653... so we get 3,5,2,5,3...
MATHEMATICA
Select[RealDigits[Pi, 10, 600][[1]], PrimeQ] (* Harvey P. Dale, Jul 19 2017 *)
PROG
(PARI) primespi(n) = default(realprecision, 100000); p = Pi/10; s = 0; default(realprecision, 28); for(x=1, n, d = p*10; d1=floor(d); if(isprime(d1) , print1(d1, ", "); s++; ); p = frac(d)); \\ Cino Hilliard, Sep 06 2003
(PARI) A073264_upto(N=100)=localprec(N*3); select(isprime, digits(Pi\1000^-N))[1..N] \\ M. F. Hasler, Jul 27 2024
CROSSREFS
KEYWORD
easy,nonn,base
AUTHOR
Y. Kelly Itakura (yitkr(AT)mta.ca), Aug 22 2002
EXTENSIONS
More terms from Cino Hilliard, Sep 06 2003
Offset corrected by M. F. Hasler, Jul 27 2024
STATUS
approved