|
%I #6 Apr 18 2020 12:43:46
%S 0,1,2,3,4,5,2,4,6,8,10,2,3,4,5,6,7,4,5,6,7,8,9,6,7,8,9,10,11,8,9,10,
%T 11,12,13,10,11,12,13,14,15,2,4,6,8,10,12,4,6,8,10,12,14,6,8,10,12,14,
%U 16,8,10,12,14,16,18,10,12,14,16,18,20,2,3,4
%N Sum of the digits of the n-th base 6 palindrome.
%t Total/@Select[IntegerDigits[#,6]&/@Range[0,2000],#==Reverse[#]&] (* _Harvey P. Dale_, Apr 18 2020 *)
%Y A029953 (base 6 palindromes)
%K nonn,base
%O 1,3
%A _Clark Kimberling_
|
