|
|
A329368
|
|
Partition the decimal expansion of Pi into non-overlapping strings of length 10: 3141592653, 5897932384,..; a(n) is the position of the strings where digits are different from each other.
|
|
0
|
|
|
7, 548, 3113, 11665, 11728, 14305, 15762, 19177, 23288, 28259, 35603, 37613, 40595, 40740, 41477, 52108, 54085, 54367, 62272, 74856, 75082, 75178, 82919, 83591, 92284, 94936, 103849, 105419, 105832, 108875, 111962, 115152, 117919, 118976, 121112, 124121, 128505
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
REFERENCES
|
David Blatner, The Joy of Pi, Walker and Co., NY, 1997; page 91.
|
|
LINKS
|
Eric Weisstein's World of Mathematics, Pi Digits
|
|
EXAMPLE
|
a(1) = 7, because such a string first occur at the 7th string: 4592307816 (i.e., 61-70 digits of Pi).
|
|
MATHEMATICA
|
q[i_]:=q[i]=Take[RealDigits[Pi, 10, 10i][[1]], -10];
a={}; Do[If[Length@Union@q[i]==10, AppendTo[a, i]], {i, 130000}]
a
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|