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

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

Offset: 1

Author

Vladimir Joseph Stephan Orlovsky, Mar 11 2009

Keywords

• nonn

Crossrefs

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

Programs

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 *)

PARI

a(n) = sigma(n, fibonacci(n)); \\ Michel Marcus, Feb 09 2020

Sage

[sigma(n,fibonacci(n))for n in range(1,11)] # Zerinvary Lajos, Jun 04 2009

Extensions

Name edited by Michel Marcus, Feb 09 2020