OFFSET
1,2
MAPLE
a:= n-> numtheory[sigma][combinat[fibonacci](n)](n):
seq(a(n), n=1..10); # Alois P. Heinz, Feb 10 2020
MATHEMATICA
Table[DivisorSigma[Fibonacci[n], n], {n, 10}] (* Harvey P. Dale, Nov 24 2013 *)
PROG
(Sage) [sigma(n, fibonacci(n))for n in range(1, 11)] # Zerinvary Lajos, Jun 04 2009
(PARI) a(n) = sigma(n, fibonacci(n)); \\ Michel Marcus, Feb 09 2020
CROSSREFS
KEYWORD
nonn
AUTHOR
Vladimir Joseph Stephan Orlovsky, Mar 11 2009
EXTENSIONS
Name edited by Michel Marcus, Feb 09 2020
STATUS
approved