login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

A135968
Sum of the distinct prime factors of the Fibonacci number A050937(n).
3
0, 150, 2974, 2443, 62158, 55946694, 2710261050, 555008010, 1547031, 46165377746, 95396546, 92180471494910, 1665088321801550, 364125780, 771601497990, 518283023, 8242065051309594, 32530503217194, 272602401466814027806, 5568053048227732238014, 85526725052226871
OFFSET
1,2
LINKS
FORMULA
a(n) = A008472(A050937(n)). - R. J. Mathar, Dec 12 2007
EXAMPLE
a(2) = 150 = 37+113 because A050937(2) = 4181 = 37*113.
a(3) = 2974 = 557 + 2417 because A050937(3) = 1346269 = 557*2417.
MATHEMATICA
k = {}; Do[If[ ! PrimeQ[Fibonacci[Prime[n]]], b = FactorInteger[Fibonacci[Prime[n]]]; c =Length[FactorInteger[b]]; d = 0; Do[d = d + b[[r]][[1]], {r, 1, c}]; AppendTo[k, d]], {n, 1, 50}]; k
KEYWORD
nonn
AUTHOR
Artur Jasinski, Dec 09 2007
EXTENSIONS
Edited by R. J. Mathar, Dec 12 2007
a(19)-a(21) from Amiram Eldar, Oct 13 2024
STATUS
approved