A045090 Numbers whose base-4 representation contains exactly one 1 and no 2's.

1, 4, 7, 13, 16, 19, 28, 31, 49, 52, 55, 61, 64, 67, 76, 79, 112, 115, 124, 127, 193, 196, 199, 205, 208, 211, 220, 223, 241, 244, 247, 253, 256, 259, 268, 271, 304, 307, 316, 319, 448, 451, 460, 463, 496, 499, 508, 511, 769, 772

Offset

1,2

Links

Table of n, a(n) for n=1..50.

Mathematica

Select[Range[800], DigitCount[#, 4, 1]==1&&DigitCount[#, 4, 2]==0&] (* Harvey P. Dale, Jan 11 2013 *)

Crossrefs

Cf. A007090.

Sequence in context: A084089 A202822 A137827 * A213382 A258867 A074273

Adjacent sequences: A045087 A045088 A045089 * A045091 A045092 A045093

Keyword

nonn,base

Author

Clark Kimberling

Status

approved