login
a(n) = floor(n*phi^8), where phi is the golden ratio, A001622.
19

%I #18 Aug 25 2023 08:50:13

%S 0,46,93,140,187,234,281,328,375,422,469,516,563,610,657,704,751,798,

%T 845,892,939,986,1033,1080,1127,1174,1221,1268,1315,1362,1409,1456,

%U 1503,1550,1597,1644,1691,1738,1785

%N a(n) = floor(n*phi^8), where phi is the golden ratio, A001622.

%H G. C. Greubel, <a href="/A004923/b004923.txt">Table of n, a(n) for n = 0..10000</a>

%H <a href="/index/Be#Beatty">Index entries for sequences related to Beatty sequences</a>

%t With[{c=GoldenRatio^8},Floor[c*Range[0,40]]] (* _Harvey P. Dale_, Sep 08 2020 *)

%o (Magma) [Floor((47+21*Sqrt(5))*n/2): n in [0..60]]; // _G. C. Greubel_, Aug 24 2023

%o (SageMath) [floor(golden_ratio^8*n) for n in range(61)] # _G. C. Greubel_, Aug 24 2023

%Y Cf. A004919, A004920, A004921, A004922, A004924, A004925, A004926.

%Y Cf. A004927, A004928, A004929, A004930, A004931, A004932, A004933.

%Y Cf. A004934, A004935, A004976, A066096, A090909.

%Y Cf. A001622.

%K nonn

%O 0,2

%A _N. J. A. Sloane_