OFFSET
1,3
COMMENTS
When n is prime, n = largest prime dividing n; hence a(n) is the sum of all primes less than n = A034387(n)-n. a(n) = SUM{p such that p is in A000040 AND NOT(p|n) AND p < A006530(n)}. - Jonathan Vos Post, Mar 08 2006
The zeros give A055932: All prime divisors are consecutive primes starting at 2. - Robert G. Wilson v, May 01 2006
EXAMPLE
The primes < 7 and coprime to 7 are 2, 3 and 5. So a(7) = 2+3+5 = 10.
MATHEMATICA
f[n_] := Plus @@ Complement[Prime@ Range@ PrimePi[ Max[First /@ FactorInteger@n] - 1], First /@ FactorInteger@n]; Array[f, 77] (* Hans Havermann, Mar 06 2006 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Mar 05 2006
EXTENSIONS
More terms from Hans Havermann, Mar 06 2006
STATUS
approved