| 6, 16, 21, 28, 33, 53, 63, 73, 76, 83, 89, 93, 102, 112, 114, 135, 136, 140, 149, 160, 165, 173, 185, 186, 203, 221, 229, 241, 244, 260, 275, 280, 289, 292, 298, 302, 326, 329, 333, 335, 337, 354, 374, 380, 406, 423, 435, 456, 462, 477, 479, 484, 485, 500
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
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==2, AppendTo[lst, n-1]], {n, 7!}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Jun 07 2009]
|
|
CROSSREFS
|
Cf. A036974.
Sequence in context: A046629 A101239 A104392 this_sequence A118139 A087446 A051808
Adjacent sequences: A036998 A036999 A037000 this_sequence A037002 A037003 A037004
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
Nicolau C. Saldanha (nicolau(AT)mat.puc-rio.br)
|
|
