|
%I #19 Oct 28 2023 09:32:56
%S 0,47,94,141,188,235,282,329,376,423,470,517,564,611,658,705,752,799,
%T 846,893,940,987,1034,1081,1127,1174,1221,1268,1315,1362,1409,1456,
%U 1503,1550,1597,1644,1691,1738,1785
%N a(n) = round(n*phi^8), where phi is the golden ratio, A001622.
%C a(n+48) - a(n+47) - a(n+1) + a(n) = 0 for 0 <= n <= 1055, but not for n = 1056. - _Robert Israel_, Oct 18 2023
%H Robert Israel, <a href="/A004943/b004943.txt">Table of n, a(n) for n = 0..10000</a>
%p p8:= simplify(((1+sqrt(5))/2)^8);
%p seq(round(n*p8),n=0..100); # _Robert Israel_, Oct 18 2023
%t Round[GoldenRatio^8 Range[0,40]] (* _Harvey P. Dale_, Sep 18 2023 *)
%Y Cf. A001622, A004939, A004940, A004941, A004942.
%K nonn
%O 0,2
%A _N. J. A. Sloane_
|
