| 2, 19, 23, 36, 57, 59, 60, 70, 87, 92, 104, 119, 125, 126, 145, 151, 157, 162, 182, 183, 188, 192, 201, 202, 217, 218, 223, 227, 251, 254, 262, 266, 271, 273, 278, 293, 296, 303, 321, 339, 348, 371, 376, 384, 386, 392, 400, 449, 453, 454, 464, 480, 497, 511
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
Eric Weisstein's World of Mathematics, Link to a section of The World of Mathematics.
|
|
MATHEMATICA
|
q=6!; a=RealDigits[Pi, 10, q]; lst={}; Do[b=a[[1]][[n]]; If[b==4, AppendTo[lst, n-1]], {n, 2, q}]; lst [From Vladimir Orlovsky (4vladimir(AT)gmail.com), Jun 19 2009]
|
|
CROSSREFS
|
Cf. A036974.
Sequence in context: A019348 A155025 A069690 this_sequence A105907 A018696 A004023
Adjacent sequences: A037000 A037001 A037002 this_sequence A037004 A037005 A037006
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Nicolau C. Saldanha (nicolau(AT)mat.puc-rio.br)
|
|
