1,10
a(10)=10-(2+5)=3
(PARI) sof(n)=local(x); x=factor(n); sum(i=1, length(x[, 1]), x[i, 1]^x[i, 2]); for(i=1, 60, print1(i-sof(i)", "))
Cf. A008475.
Adjacent sequences: A086661 A086662 A086663 this_sequence A086665 A086666 A086667
Sequence in context: A123931 A058026 A004605 this_sequence A109753 A071649 A049283
nonn
Jon Perry (perry(AT)globalnet.co.uk), Jul 27 2003
Search completed in 0.002 seconds