A207036 Numbers k such that the sum of divisors of k is a multiple of 24.

14, 15, 23, 30, 33, 35, 42, 46, 47, 51, 54, 55, 56, 60, 62, 66, 69, 70, 71, 77, 78, 87, 92, 94, 95, 102, 105, 110, 114, 115, 119, 120, 123, 126, 132, 135, 138, 140, 141, 142, 143, 154, 155, 158, 159, 161, 165, 167, 168, 174, 177, 182, 184, 186, 187, 188

Offset

1,1

Links

Vincenzo Librandi, Table of n, a(n) for n = 1..10000

Example

33 is in the sequence because the divisors of 33 are 1, 3, 11, 33 and the sum of divisors of 33 is 1+3+11+33 = A000203(33) = 48 and 48 is a multiple de 24 because 48 divided by 24 gives a positive integer.

Mathematica

Select[Range[188], Mod[DivisorSigma[1, #], 24] == 0 &] (* T. D. Noe, Feb 27 2012 *)

Crossrefs

Cf. A000203, A008606, A183010, A207374.

Sequence in context: A085816 A090066 A084429 * A087430 A085900 A075659

Adjacent sequences: A207033 A207034 A207035 * A207037 A207038 A207039

Keyword

nonn

Author

Omar E. Pol, Feb 20 2012

Status

approved