A004975 a(n) = ceiling(n*phi^20), where phi is the golden ratio, A001622.
0, 15127, 30254, 45381, 60508, 75635, 90762, 105889, 121016, 136143, 151270, 166397, 181524, 196651, 211778, 226905, 242032, 257159, 272286, 287413, 302540, 317667, 332794, 347921, 363048, 378175, 393302, 408429, 423556, 438683, 453810, 468937, 484064, 499191, 514318, 529445, 544572, 559699
Offset: 0
Keywords
Links
- Tanya Khovanova, Non Recursions
Programs
-
Mathematica
With[{c=GoldenRatio^20},Ceiling[c*Range[0,40]]] (* Harvey P. Dale, Jul 17 2018 *)
Formula
a(n) >= A004955(n). [R. J. Mathar, Oct 28 2008]
Comments