A004955 a(n) = round(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[{g20=GoldenRatio^20},Round[Range[0,40]*g20]] (* Harvey P. Dale, Jun 11 2017 *)
Comments