cp's OEIS Frontend

A293410 Least integer k such that k/n^2 > sqrt(3).

%I A293410 #13 Jul 31 2022 11:31:46
%S A293410 0,2,7,16,28,44,63,85,111,141,174,210,250,293,340,390,444,501,562,626,
%T A293410 693,764,839,917,998,1083,1171,1263,1358,1457,1559,1665,1774,1887,
%U A293410 2003,2122,2245,2372,2502,2635,2772,2912,3056,3203,3354,3508,3666,3827,3991
%N A293410 Least integer k such that k/n^2 > sqrt(3).
%H A293410 Clark Kimberling, <a href="/A293410/b293410.txt">Table of n, a(n) for n = 0..1000</a>
%F A293410 a(n) = ceiling(r*n^2), where r = sqrt(3).
%F A293410 a(n) = A171972(n) + 1 for n > 0.
%t A293410 z = 120; r = Sqrt[3];
%t A293410 Table[Floor[r*n^2], {n, 0, z}];   (* A171972 *)
%t A293410 Table[Ceiling[r*n^2], {n, 0, z}]; (* A293410 *)
%t A293410 Table[Round[r*n^2], {n, 0, z}];   (* A070169 *)
%o A293410 (Python)
%o A293410 from math import isqrt
%o A293410 def A293410(n): return 1+isqrt(3*n**4-1) if n else 0 # _Chai Wah Wu_, Jul 31 2022
%Y A293410 Cf. A002194, A171972, A070169.
%K A293410 nonn,easy
%O A293410 0,2
%A A293410 _Clark Kimberling_, Oct 11 2017