Voozh

A082186

1 + sum of first n terms of A001221.

1, 2, 3, 4, 5, 7, 8, 9, 10, 12, 13, 15, 16, 18, 20, 21, 22, 24, 25, 27, 29, 31, 32, 34, 35, 37, 38, 40, 41, 44, 45, 46, 48, 50, 52, 54, 55, 57, 59, 61, 62, 65, 66, 68, 70, 72, 73, 75, 76, 78, 80, 82, 83, 85, 87, 89, 91, 93, 94, 97, 98, 100, 102, 103, 105, 108, 109, 111, 113

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

LINKS

Michael De Vlieger, Table of n, a(n) for n = 1..2000

MAPLE

with(numtheory): s := 1: for n from 1 to 150 do it := nops(ifactors(n)[2]): s := s+it: printf(`%d, `, s): od: # James Sellers, May 19 2003

MATHEMATICA

a082186[n_] := Block[{t = Table[0, {n}], i},

For[i = 0, i < n, t[[i]] = 1 + Plus @@ PrimeNu /@ Range[i], i++]; t]; a082186[69] (* Michael De Vlieger, Dec 24 2014 *)

CROSSREFS

Equals 1 + A013939.