OFFSET
1,2
COMMENTS
For n > 1: sum of row n in A265668. - Reinhard Zumkeller, Dec 13 2015
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 1..10000
EXAMPLE
Since the 5th squarefree positive integers is 6 = 2*3, the 5th term of the sequence is 2 + 3 = 5.
MATHEMATICA
Table[DivisorSum[n, # &, PrimeQ], {n, Select[Range@ 113, SquareFreeQ]}] (* Michael De Vlieger, Dec 23 2017 *)
PROG
(PARI) {for(n=1, 113, if(issquarefree(n), f=factor(n)[, 1]; print1(sum(j=1, length(f), f[j]), ", ")))}
(Haskell)
a111060 1 = 0
a111060 n = sum $ a265668_row n -- Reinhard Zumkeller, Dec 13 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Oct 07 2005
EXTENSIONS
More terms from Klaus Brockhaus, Oct 08 2005
STATUS
approved