A363034 Sum of divisors of 5*n-2 of form 5*k+3.
3, 8, 13, 21, 23, 28, 36, 38, 43, 59, 53, 58, 66, 68, 73, 94, 83, 96, 96, 98, 103, 129, 113, 118, 126, 136, 133, 164, 156, 148, 156, 158, 163, 207, 173, 178, 186, 188, 193, 252, 203, 229, 216, 218, 223, 269, 233, 238, 246, 256, 276, 304, 263, 268, 289, 278, 283, 365, 293, 298, 306, 336, 313, 374, 323
Offset: 1
Keywords
Programs
-
Mathematica
a[n_] := DivisorSum[5*n - 2, # &, Mod[#, 5] == 3 &]; Array[a, 100] (* Amiram Eldar, Jul 06 2023 *)
-
PARI
a(n) = sumdiv(5*n-2, d, (d%5==3)*d);
Formula
a(n) = A284281(5*n-2).
G.f.: Sum_{k>0} (5*k-2) * x^k / (1 - x^(5*k-2)).