%I A057680
%S A057680 1,16470,44899,79873884
%N A057680 Self-locating strings within Pi: numbers n such that the string n is
at position n (after the decimal point) in decimal digits of Pi.
%C A057680 The next term is greater than 10^8. - Colin Rose (colin(AT)tri.org.au),
Mar 15 2006
%D A057680 Clifford A. Pickover, A Passion for Mathematics, Wiley, 2005; see p.
60.
%H A057680 David G. Andersen, <a href="http://www.angio.net/pi/piquery">The Pi-Search
Page</a>.
%e A057680 1 is a term because 1 is the first digit after the decimal point
%t A057680 StringsinPiAfterPoint[m_] := Module[{cc = 10^m + m, sol, aa}, sol = Partition[RealDigits[Pi,
10,cc] // First // Rest, m, 1]; Do[aa = FromDigits[sol[[i]]]; If[aa==i,
Print[{i, aa}]], {i,Length[sol]}];] For example, StringsinPiAfterPoint[5]
returns all 5-digit members of the sequence. - Colin Rose (colin(AT)tri.org.au),
Mar 15 2006
%Y A057680 Cf. A057679, A109513.
%Y A057680 Sequence in context: A133533 A076166 A031829 this_sequence A157796 A091089
A109028
%Y A057680 Adjacent sequences: A057677 A057678 A057679 this_sequence A057681 A057682
A057683
%K A057680 nonn,base,more
%O A057680 1,2
%A A057680 Mike Keith (domnei(AT)aol.com), Oct 19 2000
%E A057680 More terms from Colin Rose (colin(AT)tri.org.au), Mar 15 2006
|