|
%I #28 Sep 08 2022 08:44:33
%S 1,0,1,0,1,0,0,1,0,1,0,1,0,0,1,1,1,1,1,1,1,1,0,1,0,1,0,0,1,1,1,0,1,0,
%T 0,1,0,1,1,1,1,1,0,0,0,1,1,1,0,1,0,0,1,1,0,1,1,0,1,1,1,1,0,0,0,1,1,1,
%U 0,0,1,1,1,0,1,0,1,0,0,1,1,1,1,1,1,0,0,1,1,0,0,0,0,1,1,1,1,1,1
%N Expansion of sqrt(7) in base 2.
%H G. C. Greubel, <a href="/A004569/b004569.txt">Table of n, a(n) for n = 2..10000</a> (terms 2..1000 from Ivan Panchenko)
%H Jason Kimberley, <a href="/wiki/User:Jason_Kimberley/sqrt_base">Index of expansions of sqrt(d) in base b</a>
%p convert(evalf(sqrt(7),100),binary,100); # _Wesley Ivan Hurt_, Jan 28 2017
%t RealDigits[Sqrt[7],2,120][[1]] (* _Harvey P. Dale_, Jan 18 2012 *)
%o (Magma) d:= 7; m:=2; Prune(Reverse(IntegerToSequence(Isqrt(d*m^100), m))); // _G. C. Greubel_, Mar 26 2018
%Y Cf. A010465.
%K nonn,base,cons
%O 2,1
%A _N. J. A. Sloane_
|
