[go: up one dir, main page]

login
A065837
String formed from first n quaternary digits found in decimal expansion of Pi.
1
3, 31, 311, 3112, 31123, 311233, 3112332, 31123323, 311233232, 3112332323, 31123323233, 311233232333, 3112332323332, 31123323233320, 311233232333202, 3112332323332021, 31123323233320211, 311233232333202113, 3112332323332021133, 31123323233320211331, 311233232333202113310
OFFSET
1,1
MATHEMATICA
Module[{qdp=If[#>3, Nothing, #]&/@RealDigits[Pi, 10, 100][[1]]}, Table[FromDigits[Take[qdp, n]], {n, Length[qdp]}]] (* Harvey P. Dale, Jul 08 2023 *)
KEYWORD
nonn,base
AUTHOR
Patrick De Geest, Nov 24 2001
EXTENSIONS
Offset changed to 1 and more terms from Jinyuan Wang, Aug 31 2021
STATUS
approved