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 A338658 #15 Apr 22 2021 09:08:03
%S A338658 1,4,6,14,10,36,14,56,48,80,22,228,26,140,240,316,34,552,38,820,546,
%T A338658 308,46,2088,680,416,1044,2156,58,4380,62,3248,1782,680,4690,9672,74,
%U A338658 836,2808,14560,82,15456,86,9108,17040,1196,94,37704,12110,21420,5916,16068,106,44496
%N A338658 a(n) = Sum_{d|n} d * binomial(d+n/d-1, d).
%F A338658 G.f.: Sum_{k >= 1} k * x^k/(1 - x^k)^(k+1).
%F A338658 If p is prime, a(p) = 2*p.
%t A338658 a[n_] := DivisorSum[n, # * Binomial[# + n/# - 1, #] &]; Array[a, 100] (* _Amiram Eldar_, Apr 22 2021 *)
%o A338658 (PARI) a(n) = sumdiv(n, d, d*binomial(d+n/d-1, d));
%o A338658 (PARI) my(N=66, x='x+O('x^N)); Vec(sum(k=1, N, k*x^k/(1-x^k)^(k+1)))
%Y A338658 Cf. A081543, A343574.
%K A338658 nonn
%O A338658 1,2
%A A338658 _Seiichi Manyama_, Apr 22 2021