A010769 Decimal expansion of 7th root of 2.
1, 1, 0, 4, 0, 8, 9, 5, 1, 3, 6, 7, 3, 8, 1, 2, 3, 3, 7, 6, 4, 9, 5, 0, 5, 3, 8, 7, 6, 2, 3, 3, 4, 4, 7, 2, 1, 3, 2, 5, 3, 2, 6, 6, 0, 0, 7, 8, 0, 1, 2, 4, 1, 6, 5, 5, 1, 4, 5, 3, 2, 4, 6, 4, 1, 4, 2, 1, 0, 6, 3, 2, 2, 8, 8, 0, 3, 8, 0, 9, 8, 0, 7, 1, 6, 5, 9, 8, 2, 8, 9, 8, 8, 6, 3, 0, 2, 0, 0
Offset: 1
Examples
1.104089513673812337649505387623...
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..5000
Crossrefs
Cube roots (p=2,N=2) for various f: A002580 (2), A002581 (3), A005480 (4), A010582 (10), A092041 (e). 7th roots (p=2,N=3): A246709 (3), A011186 (4), A011201 (5), A011276 (10), A092516 (e). 8th roots (p=3,N=2): A010770 (2), A246710 (3), A011202 (5), A011277 (10). 15th roots (p=2,N=4): A010777(2), A011194(4), A011209(5), A011284(10). - Stanislav Sykora, Oct 26 2015
Programs
-
Mathematica
RealDigits[N[2^(1/7), 100]][[1]] (* Vincenzo Librandi, Apr 02 2013 *) RealDigits[Surd[2,7],10,120][[1]] (* Harvey P. Dale, Sep 05 2022 *)
-
PARI
sqrtn(2,7) \\ Charles R Greathouse IV, Apr 15 2014
-
PARI
{ default(realprecision, 100); x= 2^(1/7); for(n=1, 100, d=floor(x); x=(x-d)*10; print1(d, ", ")) } \\ Altug Alkan, Nov 14 2015
Formula
Equals Product_{k>=0} (1 + (-1)^k/(7*k + 6)). - Amiram Eldar, Jul 29 2020
Comments