login
A004942
a(n) = round(n*phi^7), where phi is the golden ratio, A001622.
10
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,2
LINKS
MATHEMATICA
Table[Round[n GoldenRatio^7], {n, 0, 100}] (* Vincenzo Librandi, Oct 21 2014 *)
PROG
(PARI) ph=(1+sqrt(5))/2; a(n)=round(n*ph^7);
vector(66, n, a(n-1)) \\ Joerg Arndt, Oct 21 2014
CROSSREFS
KEYWORD
nonn
EXTENSIONS
More terms from Joerg Arndt, Oct 21 2014
STATUS
approved