A158033 a(n) = sigma_(Fibonacci(n)) (n).

1, 3, 10, 73, 3126, 1686434, 96889010408, 9223376434903384065, 278128389443693527934467475898331, 10000000000000000277555756156289135105943945819724042094

Offset

1,2

Links

Table of n, a(n) for n=1..10.

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

Cf. A000045, A000203, A001157, A001158, A001160, A013956, A013961, A013969.

Sequence in context: A086846 A277614 A082245 * A027159 A236696 A262259

Adjacent sequences: A158030 A158031 A158032 * A158034 A158035 A158036

Keyword

nonn

Author

Vladimir Joseph Stephan Orlovsky, Mar 11 2009

Extensions

Name edited by Michel Marcus, Feb 09 2020

Status

approved