STATUS
proposed
approved
proposed
approved
editing
proposed
Numbers which in whose base -3 have representation has 2 fewer 0's than 2's.
Cf. A007089.
nonn,base
approved
editing
proposed
approved
editing
proposed
Vincenzo Librandi, <a href="/A031458/b031458.txt">Table of n, a(n) for n = 1..1000</a>
approved
editing
editing
approved
n-th number k Numbers which in base 3 has have 2 fewer 0's than 2's.
Select[Range[400], DigitCount[#, 3, 0] == DigitCount[#, 3, 2] - 2&] (* Harvey P. Dale, Aug 23 2013 *)
approved
editing
editing
approved
Select[Range[400], DigitCount[#, 3, 0]==DigitCount[#, 3, 2]-2&] (* Harvey P. Dale, Aug 23 2013 *)
approved
editing