| 1, 3, 37, 40, 49, 68, 94, 95, 103, 110, 138, 148, 153, 154, 155, 163, 168, 174, 175, 198, 206, 220, 238, 243, 246, 250, 269, 281, 295, 297, 314, 319, 324, 342, 344, 362, 363, 381, 385, 390, 393, 395, 396, 417, 424, 427, 428, 432, 437, 438, 442, 445, 446
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics.
|
|
MATHEMATICA
|
a=RealDigits[Pi, 10, 7! ]; lst={}; Do[b=a[[1]][[n]]; If[b==1, AppendTo[lst, n-1]], {n, 7!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Jun 02 2009]
|
|
CROSSREFS
|
Cf. A036974.
Sequence in context: A140448 A128061 A116184 this_sequence A042333 A106103 A106996
Adjacent sequences: A036997 A036998 A036999 this_sequence A037001 A037002 A037003
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Nicolau C. Saldanha (nicolau(AT)mat.puc-rio.br)
|
|
