|
%I #25 Aug 09 2024 05:09:20
%S 0,1,2,3,4,5,1,2,3,4,5,0,2,3,4,5,0,1,3,4,5,0,1,2,4,5,0,1,2,3,5,0,1,2,
%T 3,4,1,2,3,4,5,0,2,3,4,5,0,1,3,4,5,0,1,2,4,5,0,1,2,3,5,0,1,2,3,4,0,1,
%U 2,3,4,5,2,3,4,5,0,1,3,4,5,0,1,2,4,5,0,1,2,3,5,0,1,2,3,4,0,1,2,3,4,5,1,2,3
%N (Sum of digits of n written in base 6) modulo 6.
%C a(n) is the fifth row of the array in A141803. - _Andrey Zabolotskiy_, May 18 2016
%H Paolo Xausa, <a href="/A053841/b053841.txt">Table of n, a(n) for n = 0..10000</a>
%H Robert Walker, <a href="http://robertinventor.com/ftswiki/Self_Similar_Sloth_Canon_Number_Sequences">Self Similar Sloth Canon Number Sequences</a>
%F a(n) = A010875(A053827(n)). - _Andrey Zabolotskiy_, May 18 2016
%t Mod[DigitSum[Range[0, 100], 6], 6] (* _Paolo Xausa_, Aug 09 2024 *)
%o (PARI) a(n) = vecsum(digits(n, 6)) % 6; \\ _Michel Marcus_, May 18 2016
%Y Cf. A010875, A053827, A141803.
%Y Cf. A010060, A053837-A053844.
%K base,nonn
%O 0,3
%A _Henry Bottomley_, Mar 28 2000
|
