|
%I #12 Sep 08 2022 08:45:54
%S 2,1,1,2,2,3,4,6,8,12,18,27,40,60,91,138,210,321,492,756,1166,1800,
%T 2786,4320,6710,10440,16267,25380,39650,62017,97108,152214,238824,
%U 375060,589521,927369,1459960,2300100
%N Integer nearest (1/n)*(r^n), where r = golden ratio = (1 + sqrt(5))/2.
%H Vincenzo Librandi, <a href="/A181885/b181885.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = floor(1/2 + (1/n)*(r^n)), where r = golden ratio = (1 + sqrt(5))/2.
%t Table[Round[((1 + Sqrt[5])/2)^n/n], {n, 1, 50}]
%o (Magma) [Round(((1 + Sqrt(5))/2)^n/n): n in [1..50]]; // _Vincenzo Librandi_, Jun 21 2011
%Y Cf. A000045, A172128.
%K nonn
%O 1,1
%A _Clark Kimberling_, Nov 20 2010
|
