|
|
A053753
|
|
Positions of 9's in the decimal expansion of Pi.
|
|
10
|
|
|
6, 13, 15, 31, 39, 43, 45, 46, 56, 59, 63, 80, 81, 101, 123, 130, 145, 170, 181, 188, 191, 194, 200, 209, 215, 248, 250, 260, 285, 295, 329, 332, 337, 342, 354, 357, 389, 392, 400, 415, 417, 419, 423, 434, 441, 460, 461, 466, 483, 488, 497, 499, 502, 528, 530, 534, 543, 550
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Here "position" is 1, 2, 3, ... for the digits 3, 1, 4, ..., in contrast to A037007(n) = a(n)-1 and other sequences (A048940, A096763, ...) using "offset 0" for the position. - M. F. Hasler, Mar 20 2017
|
|
LINKS
|
R. K. Hoeflin, Ultra Test. [Fixed broken link, replaced deleted page by web.archive backup, but the reference seems irrelevant. - M. F. Hasler, Mar 20 2017]
|
|
MATHEMATICA
|
Flatten[Position[RealDigits[Pi, 10, 1000][[1]], 9]] (* Vincenzo Librandi, Oct 07 2013 *)
|
|
PROG
|
(PARI) default(realprecision, 1999); for(i=2, #T=Vec(Str(Pi)), T[i-1]=="9"&&print1(i-2", ")) \\ Exclude last digit from search. - M. F. Hasler, Mar 20 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|