OFFSET
1,3
COMMENTS
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
MATHEMATICA
Select[IntegerExponent[Range[100], 2], EvenQ]
PROG
(PARI) select(x->!(x%2), vector(100, i, valuation(i, 2)))
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Amiram Eldar, Jul 14 2023
STATUS
approved