login
A063839
Dirichlet convolution of Fibonacci numbers with factorials.
1
1, 3, 8, 29, 125, 738, 5053, 40371, 362926, 3628985, 39916889, 479002546, 6227021033, 87178296643, 1307674368880, 20922789929421, 355687428097597, 6402373706095020, 121645100408836181, 2432902008180276155
OFFSET
1,2
LINKS
FORMULA
a(n) ~ n!. - Vaclav Kotesovec, Jan 28 2019
MATHEMATICA
Table[Sum[Fibonacci[d]*(n/d)!, {d, Divisors[n]}], {n, 1, 20}] (* Vaclav Kotesovec, Jan 28 2019 *)
PROG
(PARI) for(n=1, 23, print(sumdiv(n, d, fibonacci(d)*(n/d)!)))
(PARI) { for (n=1, 100, write("b063839.txt", n, " ", sumdiv(n, d, fibonacci(d)*(n/d)!)) ) } \\ Harry J. Smith_, Sep 01 2009
CROSSREFS
Sequence in context: A350907 A013309 A058378 * A192744 A130470 A275166
KEYWORD
easy,nonn
AUTHOR
Jason Earls, Aug 25 2001
STATUS
approved