%I #19 Jan 23 2024 02:21:01
%S 0,18,36,54,72,90,108,126,144,161,179,197,215,233,251,269,287,305,323,
%T 341,359,377,395,413,431,449,467,484,502,520,538,556,574,592,610,628,
%U 646,664,682,700,718,736,754,772
%N a(n) = round(n*phi^6), where phi is the golden ratio, A001622.
%H G. C. Greubel, <a href="/A004941/b004941.txt">Table of n, a(n) for n = 0..10000</a>
%t Round[Range[0,50]GoldenRatio^6] (* _Harvey P. Dale_, Jul 21 2020 *)
%o (Magma) [Round(n*(9+4*Sqrt(5))): n in [0..80]]; // _G. C. Greubel_, Jan 23 2024
%o (SageMath) [round(golden_ratio^6*n) for n in range(81)] # _G. C. Greubel_, Jan 23 2024
%Y Cf. A001622, A004939, A004940, A004942, A004943.
%K nonn
%O 0,2
%A _N. J. A. Sloane_