A092112 Where A092111 equals 2.

14, 22, 26, 36, 38, 42, 54, 57, 62, 70, 78, 81, 90, 94, 110, 122, 132, 134, 138, 142, 147, 150, 158, 166, 168, 171, 172, 174, 178, 182, 190, 194, 198, 206, 210, 222, 238, 254, 285, 294, 312, 315, 318, 334, 336, 350, 366, 372, 382, 405, 414, 416, 432, 434, 446, 454

Offset

1,1

Comments

Not as obvious as A092100, this sequence differs from multiples of 8 plus 6 (A017137).

Links

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

Mathematica

Run the second Mathematica line of A091938, then g[n_] := (n + 1 - Count[ IntegerDigits[f[n], 2], 1]); Select[ Range[100], g[ # ] == 2 &]

Crossrefs

Cf. A092111, A091935.

Sequence in context: A113190 A169804 A354811 * A306146 A318929 A187776

Adjacent sequences: A092109 A092110 A092111 * A092113 A092114 A092115

Keyword

nonn

Author

Robert G. Wilson v, Feb 20 2004, corrected Nov 02 2006

Status

approved