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 A363514 #52 Jun 27 2023 09:17:11 %S A363514 1,1,5,1,8,1,15,1,14,1,21,8,20,1,27,1,36,1,40,1,32,14,39,1,38,8,71,1, %T A363514 44,1,51,20,57,1,70,1,88,1,63,8,62,26,85,1,68,1,120,14,74,1,100,32,80, %U A363514 8,87,1,130,1,131,1,112,38,99,1,98,1,180,8,104,20,111,44,110,14,168,1,172,1 %N A363514 Sum of divisors of 3*n-1 of form 3*k+1. %H A363514 Seiichi Manyama, <a href="/A363514/b363514.txt">Table of n, a(n) for n = 1..10000</a> %F A363514 a(n) = A078181(3*n-1). %F A363514 G.f.: Sum_{k>0} (3*k-2) * x^(2*k-1)/(1 - x^(3*k-2)). %t A363514 a[n_] := DivisorSum[3*n - 1, # &, Mod[#, 3] == 1 &]; Array[a, 100] (* _Amiram Eldar_, Jun 26 2023 *) %o A363514 (PARI) a(n) = sumdiv(3*n-1, d, (d%3==1)*d); %Y A363514 Cf. A363889, A363890, A363891. %Y A363514 Cf. A078181, A359211. %K A363514 nonn %O A363514 1,3 %A A363514 _Seiichi Manyama_, Jun 26 2023