|
%I #6 Jul 19 2015 02:09:16
%S 1,1,1,2,2,3,4,5,6,8,10,12,15,19,24,29,36,45,56,69,85,105,130,161,200,
%T 247,305,377,466,577,713,881,1089,1347,1665,2058,2544,3144,3887,4805,
%U 5939,7341,9074,11216,13864,17137,21183,26183,32364,40005,49449,61122
%N Powers of sqrt(5) - 1 rounded down.
%F a(n) = floor((sqrt(5)-1)^n).
%t Array[Floor[(Sqrt@5 - 1)^# ] &, 51] (* _Robert G. Wilson v_, Jul 12 2010 *)
%K nonn,easy
%O 1,4
%A Roland Schroeder (florola(AT)gmx.de), Jul 05 2010
%E More terms from _Vincenzo Librandi_ and _Robert G. Wilson v_, Jul 09 2010
|
