A363663
a(n) = Sum_{d|n} (n/d)^(d-1) * binomial(d+n-1,n).
Original entry on oeis.org
1, 4, 11, 46, 127, 596, 1717, 7792, 24806, 108450, 352717, 1563914, 5200301, 22539046, 77876117, 331982444, 1166803111, 4945693769, 17672631901, 74053888812, 269344740908, 1118110015874, 4116715363801, 16984153623296, 63205318063252, 259049084680612
Offset: 1
-
a[n_] := DivisorSum[n, (n/#)^(#-1) * Binomial[# + n - 1, n] &]; Array[a, 25] (* Amiram Eldar, Jul 12 2023 *)
-
a(n) = sumdiv(n, d, (n/d)^(d-1)*binomial(d+n-1, n));
A363660
a(n) = Sum_{d|n} binomial(d+n,n).
Original entry on oeis.org
2, 9, 24, 90, 258, 1043, 3440, 13419, 48850, 187836, 705444, 2725099, 10400614, 40233015, 155133856, 601820876, 2333606238, 9079958260, 35345263820, 137876637843, 538259060526, 2104292500739, 8233430727624, 32248866496625, 126410606580284
Offset: 1
-
a[n_] := DivisorSum[n, Binomial[# + n, n] &]; Array[a, 25] (* Amiram Eldar, Jul 17 2023 *)
-
a(n) = sumdiv(n, d, binomial(d+n, n));
A363662
a(n) = Sum_{d|n} (n/d)^n * binomial(d+n,n).
Original entry on oeis.org
2, 18, 128, 1590, 19002, 353304, 6591776, 154083654, 3878583770, 110647791078, 3423740752764, 116116072618104, 4240251502692142, 166761491097360240, 7006327371058071648, 313637735782416564806, 14890324713956395361406, 747610406539465959084870
Offset: 1
-
a[n_] := DivisorSum[n, (n/#)^n * Binomial[# + n, n] &]; Array[a, 20] (* Amiram Eldar, Jul 12 2023 *)
-
a(n) = sumdiv(n, d, (n/d)^n*binomial(d+n, n));
Showing 1-3 of 3 results.