A134689 - OEIS

%I #6 Mar 24 2019 11:06:57

%S 0,1,1,3,1,6,1,7,4,8,1,1,6,1,1,0,9,1,5,1,2,1,1,2,2,1,1,1,4,1,3,6,6,1,

%T 6,1,3,2,8,1,4,2,1,3,1,1,5,2,0,1,3,5,5,1,2,2,1,7,5,0,1,5,4,1,4,0,3,3,

%U 2,6,1,7,6,8,4,3,2,1

%N Successive digits of the numbers A001065(n).

%H Harvey P. Dale, <a href="/A134689/b134689.txt">Table of n, a(n) for n = 0..1000</a>

%t Flatten[IntegerDigits/@Array[Total[Most[Divisors[#]]]&,60]] (* _Harvey P. Dale_, Mar 24 2019 *)

%Y Cf. A001065.

%K base,easy,nonn

%O 0,4

%A _Omar E. Pol_, Nov 06 2007