A093083 Partial sums of digits of decimal expansion of golden ratio phi.
1, 7, 8, 16, 16, 19, 22, 31, 39, 47, 54, 58, 67, 75, 84, 88, 96, 100, 108, 110, 110, 114, 119, 127, 133, 141, 144, 148, 151, 157, 162, 168, 171, 179, 180, 181, 188, 195, 197, 197, 200, 200, 209, 210, 217, 226, 234, 234, 239, 246, 252, 254, 262, 268, 270, 271
Offset: 0
Examples
a(2)=8 because 8=1+6+1 where 1,6,1 are first three digits of golden ratio phi i.e. 1.6180339887498948482045868343656381177203091798057628621
Crossrefs
Cf. A001622.
Programs
-
Mathematica
Accumulate[RealDigits[GoldenRatio,10,120][[1]]] (* Harvey P. Dale, Sep 22 2015 *)