|
%I #39 Aug 16 2019 14:03:27
%S 9,2,1,7,4,9,7,9,3,5,3,7,1,0,8,5,2,9,1,0,5,5,6,4,6,0,5,0,3,6,4,7,4,2,
%T 7,6,0,5,0,5,1,1,8,9,9,5,1,5,8,5,1,4,5,0,0,7,7,2,8,0,7,7,7,4,8,3,6,2,
%U 7,7,9,9,1,0,4,7,0,9,0,3,0,5,1,1,1,7,5,6,3,3,2,0,1,1,7,9,5,6,0,9
%N Digits of the 10-adic integer 9^(1/7).
%H Seiichi Manyama, <a href="/A225446/b225446.txt">Table of n, a(n) for n = 0..10000</a>
%e 9^7 == 9 (mod 10).
%e 29^7 == 9 (mod 10^2).
%e 129^7 == 9 (mod 10^3).
%e 7129^7 == 9 (mod 10^4).
%e 47129^7 == 9 (mod 10^5).
%e 947129^7 == 9 (mod 10^6).
%o (PARI) n=0;for(i=1,100,m=9;for(x=0,9,if(((n+(x*10^(i-1)))^7)%(10^i)==m,n=n+(x*10^(i-1));print1(x", ");break)))
%o (PARI) Vecrev(digits(truncate(-(-9+O(10^100))^(1/7)))) \\ _Seiichi Manyama_, Aug 04 2019
%o (PARI) N=100; Vecrev(digits(lift(chinese(Mod((9+O(2^N))^(1/7), 2^N), Mod((9+O(5^N))^(1/7), 5^N)))), N) \\ _Seiichi Manyama_, Aug 04 2019
%Y Digits of 10-adic integers:
%Y A225443 ((-1/9)^(1/7));
%Y A225449 ( (-9)^(1/7));
%Y A225452 ( (1/9)^(1/7)).
%K nonn,base
%O 0,1
%A _Aswini Vaidyanathan_, May 11 2013
|
