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 A363156 #13 Jul 06 2023 07:28:58 %S A363156 1,2,3,5,5,6,8,8,9,13,11,12,14,14,15,20,17,20,20,20,21,27,23,24,26,28, %T A363156 27,34,32,30,32,32,33,43,35,36,38,38,39,52,41,47,44,44,45,55,47,48,50, %U A363156 52,56,62,53,54,59,56,57,75,59,60,62,68,63,76,65,68,68,71,69,83,71,72,81,81,75,94,77,78,80 %N A363156 Expansion of Sum_{k>0} k * x^k / (1 - x^(5*k-2)). %F A363156 a(n) = (1/5) * Sum_{d | 5*n-2, d==3 (mod 5)} (d+2). %F A363156 G.f.: Sum_{k>0} x^(3*k-2) / (1 - x^(5*k-4))^2. %t A363156 a[n_] := DivisorSum[5*n - 2, # + 2 &, Mod[#, 5] == 3 &]/5; Array[a, 100] (* _Amiram Eldar_, Jul 06 2023 *) %o A363156 (PARI) a(n) = sumdiv(5*n-2, d, (d%5==3)*(d+2))/5; %Y A363156 Cf. A359236, A363034. %K A363156 nonn %O A363156 1,2 %A A363156 _Seiichi Manyama_, Jul 06 2023