A124626 Abundant evil numbers. (Abundant numbers that have an even number of ones in their binary representation).

12, 18, 20, 24, 30, 36, 40, 48, 54, 60, 66, 72, 78, 80, 90, 96, 102, 108, 114, 120, 126, 132, 144, 150, 156, 160, 180, 192, 198, 204, 210, 216, 222, 228, 240, 246, 252, 258, 260, 264, 270, 272, 282, 288, 294, 300, 306, 308, 312, 318, 320, 330, 340, 350, 354

Offset

1,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Mathematica

Select[Range[500], EvenQ[Plus @@ IntegerDigits[ #, 2]] && DivisorSigma[1, # ] > 2# &]

Crossrefs

Intersection of A005101 (abundant numbers) and A001969 (evil numbers).

Sequence in context: A270660 A173490 A005101 * A231547 A290141 A087245

Adjacent sequences: A124623 A124624 A124625 * A124627 A124628 A124629

Keyword

nonn,base

Author

Tanya Khovanova, Dec 27 2006, Jun 23 2007

Status

approved