A286838 - OEIS

%I #24 Feb 17 2021 20:30:08

%S 5,5,1,0,5,5,1,0,1,8,8,6,12,6,3,0,4,7,4,5,0,5,1,4,11,7,6,10,5,5,5,9,6,

%T 10,6,2,5,0,0,2,11,7,7,0,7,5,12,3,4,2,9,6,7,2,12,7,6,1,5,0,5,3,11,0,

%U 10,12,3,8,5,6,10,5,9,6,9,2,8,5,0,12,11,0,2,11

%N Digits of one of the two 13-adic integers sqrt(-1) (digits 0, 1, ... , 9, 10, 11, 12 are used instead of 0, 1, ... , 9, A, B, C).

%H Seiichi Manyama, <a href="/A286838/b286838.txt">Table of n, a(n) for n = 0..10000</a>

%o (Ruby)

%o def A(k, m, n)

%o   d_ary = []

%o   ary = [0]

%o   a, mod = k, m

%o   (n + 1).times{|i|

%o     b = a % mod

%o     d_ary << (b - ary[-1]) / m ** i

%o     ary << b

%o     a = b ** m

%o     mod *= m

%o   }

%o   d_ary

%o end

%o def A286838(n)

%o   A(5, 13, n)

%o end

%o p A286838(100)

%Y Digits of one of the two p-adic integers sqrt(-1): A210850 and A210851 (p=5), this sequence and A286839 (p=13).

%K nonn,base

%O 0,1

%A _Seiichi Manyama_, Aug 01 2017

%E Keyword "base" added by _Jianing Song_, Feb 17 2021