login
Partial sums of squares of digits of golden ratio phi (A001622).
1

%I #18 Aug 29 2020 13:11:46

%S 1,37,38,102,102,111,120,201,265,329,378,394,475,539,620,636,700,716,

%T 780,784,784,800,825,889,925,989,998,1014,1023,1059,1084,1120,1129,

%U 1193,1194,1195,1244,1293,1297,1297,1306,1306,1387,1388,1437,1518,1582,1582

%N Partial sums of squares of digits of golden ratio phi (A001622).

%H Vincenzo Librandi, <a href="/A111043/b111043.txt">Table of n, a(n) for n = 1..1000</a>

%F a(n) = Sum_{i=1..n} A001622(i)^2.

%t Accumulate[RealDigits[GoldenRatio,10,120][[1]]^2] (* _Harvey P. Dale_, Jul 22 2014 *)

%Y Cf. A001622.

%K base,easy,less,nonn

%O 1,2

%A _Jonathan Vos Post_, Oct 06 2005

%E Definition clarified by _Harvey P. Dale_, Jul 22 2014

%E Edited by _Georg Fischer_, Aug 29 2020