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 A363316 #14 Jul 08 2023 08:05:06 %S A363316 1,1,6,1,10,1,14,6,18,1,22,1,31,10,30,1,34,6,38,14,42,1,60,1,50,18,54, %T A363316 6,58,1,62,31,84,1,70,1,74,31,78,1,91,1,108,30,90,14,94,6,98,43,102,1, %U A363316 132,1,110,38,114,6,140,18,122,42,156,1,130,1,134,60,138,1,142,14,180,71,150,1,180,6,158,54 %N A363316 Sum of divisors of 4*n-2 of form 4*k+1. %F A363316 a(n) = A050449(4*n-2). %F A363316 G.f.: Sum_{k>0} (4*k-3) * x^(2*k-1) / (1 - x^(4*k-3)). %t A363316 a[n_] := DivisorSum[4*n - 2, # &, Mod[#, 4] == 1 &]; Array[a, 100] (* _Amiram Eldar_, Jul 08 2023 *) %o A363316 (PARI) a(n) = sumdiv(4*n-2, d, (d%4==1)*d); %Y A363316 Cf. A050449, A359289, A363258. %K A363316 nonn %O A363316 1,3 %A A363316 _Seiichi Manyama_, Jul 08 2023