A219188 Sum of prime divisors (with repetition) of Lucas(n).

0, 3, 4, 7, 11, 8, 29, 47, 23, 44, 199, 32, 521, 284, 46, 2207, 3571, 118, 9349, 2168, 244, 353, 600, 1152, 263, 90484, 5802, 14517, 19548, 2570, 3010349, 5568, 10104, 63513, 1022, 103713, 54018521, 29134604, 1463, 4689, 370248451, 1799, 151190, 2118, 787

Offset: 1

Author

Michel Lagneau, Nov 14 2012

Keywords

• nonn

Comments

The same as A070827 from a(2) on. - R. J. Mathar, Nov 16 2012

Examples

			a(6) = 8 because Lucas(6) = 18 =  2*3^2 and the sum of the prime divisors with repetition is 2 + 2*3 = 8.
		

Links

• Amiram Eldar, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A000204, A001414, A219187.

Programs

Maple

A219188 := proc(n)
    A001414(A000204(n)) ;
end proc:
seq(A219188(n),n=1..48) ; # R. J. Mathar, Nov 16 2012

Mathematica

f[n_] := Plus @@ Times @@@ FactorInteger@ LucasL[n]; f[1] = 0; Array[f, 60]

Formula

a(n) = A001414(A000032(n)). - Amiram Eldar, Sep 05 2019