|
%I #16 Jul 10 2022 16:06:45
%S 4,5,9,14,15,23,26,32,33,35,38,41,43,46,50,51,53,58,59,62,64,65,69,71,
%T 74,75,78,79,81,82,83,84,86,88,89,92,93,94,95,97,98,99,105,117,132,
%U 141,148,159,164,169,170,172,174,193,197,208,209,211,214,223,229
%N Numbers k such that k > first location of string of k in decimal expansion of Pi.
%C 'Location' starts from the first digit after the decimal point and refers to the first digit of a(n).
%H Jinyuan Wang, <a href="/A038099/b038099.txt">Table of n, a(n) for n = 1..2000</a>
%H Dave Andersen, <a href="http://www.angio.net/pi/piquery">Pi-Search Page</a>
%F a(n) > A014777(n). - _Michael S. Branicky_, Jul 10 2022
%o (Python)
%o from sympy import pi
%o from itertools import count, islice
%o digits_of_pi = str(pi.n(10**5))[1:-1]
%o def agen():
%o for k in count(1):
%o kloc = digits_of_pi.find(str(k))
%o assert kloc > 0, ("Increase precision", k)
%o if k > kloc: yield k
%o print(list(islice(agen(), 61))) # _Michael S. Branicky_, Jul 10 2022
%Y Cf. A000796, A014777, A038100.
%K nonn,base
%O 1,1
%A _Patrick De Geest_, Feb 15 1999
%E Offset changed to 1 by _Jinyuan Wang_, Sep 04 2021
|
