OFFSET
1,1
COMMENTS
The largest prime-power dividing 12 is 4. The largest prime power dividing 13 is 13. So a(12) = 4+13 = 17.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
FORMULA
MATHEMATICA
With[{c=Table[Max[#[[1]]^#[[2]]&/@FactorInteger[n]], {n, 70}]}, Total/@ Partition[ c, 2, 1]] (* Harvey P. Dale, Nov 18 2014 *)
PROG
Contribution from Franklin T. Adams-Watters, Apr 09 2009: (Start)
(PARI) maxpp(n)=local(m, r, pp); m=factor(n); r=1; for(i=1, matsize(m)[1], pp=m[i, 1]^m[i, 2]; if(pp>r, r=pp)); r
vector(80, i, maxpp(i)+maxpp(i+1)) (End)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Apr 07 2008
EXTENSIONS
More terms from Franklin T. Adams-Watters, Apr 09 2009
Definition clarified by Harvey P. Dale, Nov 18 2014
STATUS
approved