%I #13 Jul 27 2021 16:35:06
%S 1,2,4,8,10,14,16,20,28,32,40,50,52,56,58,62,70,74,82,92,100,104,112,
%T 116,124,134,142,152,160,170,178,188,202,212,220,230,244,260,268,278,
%U 292,308,316,326,340,356,364,368,376,386,394,398,406,410
%N a(n+1) = a(n) + sum of digits in base 7 representation of a(n).
%H Harvey P. Dale, <a href="/A010069/b010069.txt">Table of n, a(n) for n = 0..1000</a>
%H <a href="/index/Coi#Colombian">Index entries for Colombian or self numbers and related sequences</a>
%t NestList[#+Total[IntegerDigits[#,7]]&,1,60] (* _Harvey P. Dale_, Jul 27 2021 *)
%K nonn,base
%O 0,2
%A _Leonid Broukhis_
%E More terms from Neven Juric, Apr 11 2008
|