A097012 a(n) = sigma(n) mod 210.
1, 3, 4, 7, 6, 12, 8, 15, 13, 18, 12, 28, 14, 24, 24, 31, 18, 39, 20, 42, 32, 36, 24, 60, 31, 42, 40, 56, 30, 72, 32, 63, 48, 54, 48, 91, 38, 60, 56, 90, 42, 96, 44, 84, 78, 72, 48, 124, 57, 93, 72, 98, 54, 120, 72, 120, 80, 90, 60, 168, 62, 96, 104, 127, 84, 144, 68, 126, 96
Offset: 1
Keywords
Links
- Michael De Vlieger, Table of n, a(n) for n = 1..10000
Programs
-
Magma
[SumOfDivisors(n) mod 210: n in [1..70]]; // Vincenzo Librandi, Jul 25 2017
-
Mathematica
Array[Mod[DivisorSigma[1, #], 210] &, 69] (* Michael De Vlieger, Jul 24 2017 *)
-
PARI
a(n) = sigma(n) % 210; \\ Michel Marcus, Dec 19 2013
Formula
a(n) = A000203(n) mod 210.
Comments