# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a014976
Showing 1-1 of 1

%I A014976 #27 Jul 28 2024 16:55:24
%S A014976 33,51,55,66,72,78,86,98,107,117,122,129,133,147,160,165,168,177,196,
%T A014976 208,246,249,265,271,288,292,308,309,312,328,331,341,358,361,362,367,
%U A014976 370,376,399,404,409,422,444,452,494,514,521,524,544,546,553,558,562,597,602,603,604,619,639,658
%N A014976 Successive locations of zeros in decimal expansion of Pi (where locations 1, 2, 3, ... correspond to digits 3, 1, 4, ...).
%H A014976 Vincenzo Librandi, <a href="/A014976/b014976.txt">Table of n, a(n) for n = 1..1000</a>
%H A014976 <a href="/index/Ph#Pi314">Index entries for sequences related to the number Pi</a>
%F A014976 a(n) = A037008(n) + 1. - _Georg Fischer_, May 31 2021
%p A014976 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]
%t A014976 Flatten[ Position[ RealDigits[Pi, 10, 660] [[1]], 0]] (* _Robert G. Wilson v_, Mar 19 2004 *)
%o A014976 (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
%Y A014976 Cf. A000796 (decimal expansion (or digits) of Pi).
%Y A014976 Cf. A053745 - A053753 (similar for digits 1 through 9).
%Y A014976 Cf. A037008 for a variant with all values decreased by 1.
%Y A014976 See A088563 for primes in this sequence.
%K A014976 nonn,base
%O A014976 1,1
%A A014976 Bagirath R. Krishnamachari (bagi(AT)callisto.miel.mot.com)
%E A014976 More terms from Scott Lindhurst (ScottL(AT)alumni.princeton.edu)

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE