OFFSET
1,1
LINKS
FORMULA
a(n) = A037008(n) + 1. - Georg Fischer, May 31 2021
MAPLE
f := proc(n) if pi[n]=0 then n fi; end; [seq(f(i), i=1..2000)]; # where pi is an array with the digits of Pi. - Simon Plouffe [Corrected by Neven Juric, Jul 08 2008]
MATHEMATICA
Flatten[ Position[ RealDigits[Pi, 10, 660] [[1]], 0]] (* Robert G. Wilson v, Mar 19 2004 *)
PROG
(PARI) A014976_upto(N=999)={localprec(N+20); select(d->!d, digits(Pi\10^-N), 1)} \\ Returns a "Vecsmall": use Vec(...) if needed, or alternatively: {...; [i|i<-[1..#N=digits(Pi\10^-N)], !N[i]]}. - M. F. Hasler, Jul 28 2024
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Bagirath R. Krishnamachari (bagi(AT)callisto.miel.mot.com)
EXTENSIONS
More terms from Scott Lindhurst (ScottL(AT)alumni.princeton.edu)
STATUS
approved