login
A059582
First differences give digits of Pi = 3.1415926...
1
1, 4, 5, 9, 10, 15, 24, 26, 32, 37, 40, 45, 53, 62, 69, 78, 81, 83, 86, 94, 98, 104, 106, 112, 116, 119, 122, 130, 133, 135, 142, 151, 156, 156, 158, 166, 174, 178, 179, 188, 195, 196, 202, 211, 214, 223, 232, 235, 242, 247, 248, 248, 253, 261, 263, 263, 272
OFFSET
0,2
COMMENTS
A more natural variant is given by A046974, the partial sums of the digits of Pi (A000796). Maybe the present version is motivated by the coincidence that the first four digits 1,4,5,9 are similar to the decimals .14159 of Pi. - M. F. Hasler, Jan 19 2015
LINKS
A. Frank & P. Jacqueroux, International Contest, 2001. Item 14
MAPLE
Digits := 200: it := evalf(Pi, 200)/10: out := 1: for i from 1 to 200 do printf(`%d, `, out): out := out+floor(10*it): it := 10*it-floor(10*it): od:
MATHEMATICA
Accumulate[Join[{1}, RealDigits[Pi, 10, 60][[1]]]] (* Harvey P. Dale, Jan 18 2015 *)
PROG
(PARI) { default(realprecision, 2080); a=1; x=Pi/10; for (n=0, 2000, d=floor(x); x=(x-d)*10; write("b059582.txt", n, " ", a+=d)); } \\ Harry J. Smith, Jun 28 2009
CROSSREFS
Sequence in context: A032381 A191888 A050036 * A257058 A189889 A329451
KEYWORD
nonn,base,easy
AUTHOR
Rodolfo Kurchan, Feb 17 2001
EXTENSIONS
More terms from James A. Sellers, Feb 19 2001
STATUS
approved