A004585 Expansion of sqrt(10) in base 2.
1, 1, 0, 0, 1, 0, 1, 0, 0, 1, 1, 0, 0, 0, 1, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 1, 0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0, 0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 1, 0, 1, 1, 1, 1, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 1, 1
Offset: 2
Links
- G. C. Greubel, Table of n, a(n) for n = 2..10000
- Jason Kimberley, Index of expansions of sqrt(d) in base b
Crossrefs
Cf. A010467.
Programs
-
Magma
d:= 10; m:=2; Prune(Reverse(IntegerToSequence(Isqrt(d*m^100), m))); // G. C. Greubel, Mar 25 2018
-
Mathematica
RealDigits[Sqrt[10], 2, 100][[1]] (* G. C. Greubel, Mar 25 2018 *)
-
PARI
my(b = binary(sqrt(10))); concat(b[1], b[2]) \\ Michel Marcus, Mar 26 2018