This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A355986 #13 Jul 22 2022 10:13:14 %S A355986 1,3,8,28,125,731,5052,40352,362917,3628935,39916936,479002360, %T A355986 6227021561,87178296283,1307674373184,20922789928484,355687428136485, %U A355986 6402373706091651,121645100409195652,2432902008180269688,51090942171713074013,1124000727777647602015 %N A355986 a(n) = Sum_{k=1..n} floor(n/k)!. %e A355986 a(6) = 6! + 3! + 2! + 1! + 1! + 1! = 731. %t A355986 a[n_] := Sum[Floor[n/k]!, {k, 1, n}]; Array[a, 22] (* _Amiram Eldar_, Jul 22 2022 *) %o A355986 (PARI) a(n) = sum(k=1, n, (n\k)!); %Y A355986 Cf. A007489, A060832, A081123. %K A355986 nonn,easy %O A355986 1,2 %A A355986 _Seiichi Manyama_, Jul 22 2022