A004943 a(n) = round(n*phi^8), where phi is the golden ratio, A001622.
0, 47, 94, 141, 188, 235, 282, 329, 376, 423, 470, 517, 564, 611, 658, 705, 752, 799, 846, 893, 940, 987, 1034, 1081, 1127, 1174, 1221, 1268, 1315, 1362, 1409, 1456, 1503, 1550, 1597, 1644, 1691, 1738, 1785
Offset: 0
Keywords
Links
- Robert Israel, Table of n, a(n) for n = 0..10000
Programs
-
Maple
p8:= simplify(((1+sqrt(5))/2)^8); seq(round(n*p8),n=0..100); # Robert Israel, Oct 18 2023
-
Mathematica
Round[GoldenRatio^8 Range[0,40]] (* Harvey P. Dale, Sep 18 2023 *)
Comments