login
a(n) = round(n*phi^6), where phi is the golden ratio, A001622.
5

%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_