OFFSET
1,2
LINKS
Ivan Neretin, Table of n, a(n) for n = 1..10000
MATHEMATICA
Flatten@Position[Flatten@Table[IntegerDigits[2 n - 1, 2], {n, 21}], 1] (* Ivan Neretin, Jun 05 2016 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved