A046525 Numbers common to A033950 and A034884.

2, 8, 12, 18, 24, 36, 40, 56, 60, 72, 80, 84, 96, 108, 132, 180, 240, 252, 288, 360, 480, 504, 720, 1260

Offset: 1

Author

Labos Elemer

Keywords

• nonn
• fini
• full

Crossrefs

Cf. A035033, A036763, A046526.

Programs

Mathematica

Select[Range[1265], Mod[#, x = DivisorSigma[0, #]] == 0 && # < x^2 &] (* Jayanta Basu, Jun 27 2013 *)