OFFSET
0,1
MATHEMATICA
Table[Count[IntegerDigits[5n+3, 2], 1], {n, 0, 100}] (* Harvey P. Dale, Oct 25 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved