A004942 a(n) = round(n*phi^7), where phi is the golden ratio, A001622.

0, 29, 58, 87, 116, 145, 174, 203, 232, 261, 290, 319, 348, 377, 406, 436, 465, 494, 523, 552, 581, 610, 639, 668, 697, 726, 755, 784, 813, 842, 871, 900, 929, 958, 987, 1016, 1045, 1074, 1103, 1132, 1161, 1190, 1219, 1248, 1278, 1307, 1336, 1365, 1394, 1423, 1452, 1481, 1510, 1539, 1568, 1597, 1626, 1655, 1684

Offset: 0

Author

N. J. A. Sloane

Keywords

• nonn

Links

• Vincenzo Librandi, Table of n, a(n) for n = 0..1000

Crossrefs

Cf. A001622, A004939, A004940, A004941, A004943.

Programs

Mathematica

Table[Round[n GoldenRatio^7], {n, 0, 100}] (* Vincenzo Librandi, Oct 21 2014 *)

PARI

ph=(1+sqrt(5))/2; a(n)=round(n*ph^7);
vector(66,n,a(n-1)) \\ Joerg Arndt, Oct 21 2014

Extensions

More terms from Joerg Arndt, Oct 21 2014