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

%I #16 Aug 28 2023 08:28:10

%S 0,122,245,368,491,614,737,860,983,1106,1229,1352,1475,1598,1721,1844,

%T 1967,2090,2213,2336,2459,2582,2705,2828,2951,3074,3197,3320,3443,

%U 3566,3689,3812,3935,4058,4181

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

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

%p A004925:=n->floor(n*((1 + sqrt(5))/2)^10): seq(A004925(n), n=0..100); # _Wesley Ivan Hurt_, Jul 26 2017

%t Floor[GoldenRatio^(10)*Range[0,60]] (* _G. C. Greubel_, Aug 27 2023 *)

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

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

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

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

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

%Y Cf. A001622 (phi).

%K nonn

%O 0,2

%A _N. J. A. Sloane_