%I #3 Mar 30 2012 18:51:06
%S 1,2,3,4,5,6,7,8,9,8,7,6,5,4,3,2,1,2,3,4,5,6,7,8,9,10,9,10,11,10,9,8,
%T 7,6,5,4,3,4,5,6,7,8,9,10,11,12,11,12,13,12,11,10,9,8,7,6,5,6,7,8,9,
%U 10,11,12,13,14,13,14,15,14,13,12,11,10,9,8,7,8,9,10,11,12,13,14,15,16,15,16
%N Digital sums of A108971.
%C a(n) = A007953(A108971(n));
%C ABS(a(n+1) - a(n)) = 1 by definition of A108971;
%C a(A179988(n)) = n and a(m) <> n for m < A179988(n).
%H R. Zumkeller, <a href="/A179987/b179987.txt">Table of n, a(n) for n = 1..10000</a>
%K base,nonn
%O 1,2
%A _Reinhard Zumkeller_, Aug 09 2010
|