A355986 - OEIS

A355986

a(n) = Sum_{k=1..n} floor(n/k)!.

1, 3, 8, 28, 125, 731, 5052, 40352, 362917, 3628935, 39916936, 479002360, 6227021561, 87178296283, 1307674373184, 20922789928484, 355687428136485, 6402373706091651, 121645100409195652, 2432902008180269688, 51090942171713074013, 1124000727777647602015

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

LINKS

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

EXAMPLE

a(6) = 6! + 3! + 2! + 1! + 1! + 1! = 731.

MATHEMATICA

a[n_] := Sum[Floor[n/k]!, {k, 1, n}]; Array[a, 22] (* Amiram Eldar, Jul 22 2022 *)

PROG

(PARI) a(n) = sum(k=1, n, (n\k)!);

CROSSREFS