A004963 a(n) = ceiling(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, 1128, 1175, 1222, 1269, 1316, 1363, 1410, 1457, 1504, 1551, 1598, 1645, 1692, 1739, 1786, 1833, 1880, 1927, 1974, 2021, 2068, 2115, 2162, 2208, 2255, 2302, 2349

Offset: 0

Author

N. J. A. Sloane

Keywords

• nonn

Links

• Paolo Xausa, Table of n, a(n) for n = 0..10000
• Tanya Khovanova, Non Recursions

Programs

Maple

with(numtheory):a:=proc(n) if n=0 then 0 else mcombine(11*n,3*n,5*n,7*n) fi end: seq(a(n), n=0..38); # Zerinvary Lajos, Apr 11 2008

Mathematica

Ceiling[Range[0, 100]*GoldenRatio^8] (* Paolo Xausa, May 29 2025 *)

Formula

phi^8 = 46.97813... = 46+A249601. - R. J. Mathar, May 28 2025

Extensions

More terms from Paolo Xausa, May 29 2025