%I #25 Sep 08 2022 08:44:33
%S 0,30,59,88,117,146,175,204,233,262,291,320,349,378,407,436,465,494,
%T 523,552,581,610,639,668,697,726,755,784,813,842,872,901,930,959,988,
%U 1017,1046,1075,1104,1133,1162,1191,1220,1249,1278,1307,1336,1365,1394,1423,1452,1481,1510,1539,1568,1597,1626,1655,1684,1714
%N a(n) = ceiling(n*phi^7), where phi is the golden ratio, A001622.
%H Karl V. Keller, Jr., <a href="/A004962/b004962.txt">Table of n, a(n) for n = 0..1000</a>
%t Table[Ceiling[n ((1 + Sqrt[5])/2)^7], {n, 0, 60}] (* _Vincenzo Librandi_, Jul 22 2015 *)
%t Ceiling[Range[0,60]GoldenRatio^7] (* _Harvey P. Dale_, Nov 18 2018 *)
%o (PARI) p = (sqrt(5)+1)/2; a(n)=ceil(n*p^7);
%o vector(66,n,a(n-1)) \\ _Joerg Arndt_, Oct 18 2014
%o (Magma) [Ceiling(n*((1 + Sqrt(5))/2)^7): n in [0..60]]; // _Vincenzo Librandi_, Jul 22 2015
%Y Cf. A004922 (floor).
%K nonn
%O 0,2
%A _N. J. A. Sloane_
%E More terms added by _Joerg Arndt_, Oct 18 2014