A011549 a(n) = floor(sqrt(3)*10^n).
1, 17, 173, 1732, 17320, 173205, 1732050, 17320508, 173205080, 1732050807, 17320508075, 173205080756, 1732050807568, 17320508075688, 173205080756887, 1732050807568877, 17320508075688772, 173205080756887729, 1732050807568877293, 17320508075688772935
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..200
Crossrefs
Cf. A002194 (sqrt(3)).
Programs
-
Mathematica
With[{sqrt3 = RealDigits[Sqrt[3], 10, 50][[1]]}, Table[FromDigits[Take[ sqrt3, n]], {n, 20}]] (* Harvey P. Dale, Nov 04 2011 *) IntegerPart[Table[N[Sqrt[3], k]*10^(k - 1), {k, 17}]] (* Jayanta Basu, Aug 15 2013 *)
-
Python
from sympy import N, sqrt def a(n): return int(N(sqrt(3), n+1)*10**n) print([a(n) for n in range(20)]) # Michael S. Branicky, Jan 17 2021
Extensions
New name from Jon E. Schoenfield, Aug 19 2023
Comments