A004574 Expansion of sqrt(7) in base 7.
2, 4, 3, 4, 3, 3, 0, 6, 6, 5, 4, 2, 4, 6, 0, 3, 3, 2, 3, 3, 3, 2, 6, 1, 3, 6, 2, 4, 6, 6, 1, 5, 6, 6, 2, 3, 0, 4, 2, 2, 0, 0, 2, 3, 1, 3, 5, 2, 5, 2, 0, 6, 4, 4, 3, 1, 5, 6, 1, 4, 5, 1, 0, 6, 0, 2, 2, 3, 3, 2, 1, 3, 5, 5, 3, 5, 5, 4, 1, 6, 2, 1, 2, 2, 1, 5, 3, 5, 6, 0, 3, 5, 2, 0, 1, 0, 5, 1, 6
Offset: 1
Links
- G. C. Greubel, Table of n, a(n) for n = 1..10000 (terms 1..2000 from Vincenzo Librandi)
- Jason Kimberley, Index of expansions of sqrt(d) in base b
Crossrefs
Cf. A010465.
Programs
-
Magma
Prune(Reverse(IntegerToSequence(Isqrt(7*7^200), 7))); // Vincenzo Librandi, Apr 28 2017
-
Mathematica
RealDigits[Sqrt[7], 7, 100][[1]] (* G. C. Greubel, Mar 25 2018 *)
Extensions
Updated by Alois P. Heinz at the suggestion of Kevin Ryde, Feb 19 2012