%I A064798
%S A064798 0,0,11,40,112,312,71,4888,322,333710,9414,534888,10073,265371785,
%T A064798 913990,2906544,5882692,5365294080,386339,1111111111111111111,41017,
%U A064798 10845593,547805,11111111111111111111111,100000284,182521260315
%N A064798 Sum of primes dividing the repunit numbers (with repetition).
%H A064798 Harry J. Smith, <a href="b064798.txt">Table of n, a(n) for n=0,...,100</
               a>
%o A064798 (PARI) a(n) = (10^n-1)/9; {sopfr(n, s, fac, i) = fac=factor(n); for(i=1,
               matsize(fac)[1],s=s+fac[i,1]*fac[i,2]); return(s); } for(n=0,35,print1(sopfr(a(n)),
               ","))
%o A064798 (PARI) sopfr(n)= { local(f,s=0); f=factor(n); for(i=1, matsize(f)[1], 
               s+=f[i, 1]*f[i, 2]); return(s) } { for (n=0, 100, write("b064798.txt", 
               n, " ", sopfr((10^n - 1)/9)) ) } [From Harry J. Smith (hjsmithh(AT)sbcglobal.net), 
               Sep 26 2009]
%Y A064798 Cf. A002275, A001414.
%Y A064798 Sequence in context: A031427 A147296 A059142 this_sequence A056124 A064768 
               A135719
%Y A064798 Adjacent sequences: A064795 A064796 A064797 this_sequence A064799 A064800 
               A064801
%K A064798 nonn
%O A064798 0,3
%A A064798 Jason Earls (zevi_35711(AT)yahoo.com), Oct 18 2001