Search: id:A092112 Results 1-1 of 1 results found. %I A092112 %S A092112 14,22,26,36,38,42,54,57,62,70,78,81,90,94,110,122,132,134,138,142,147, %T A092112 150,158,166,168,171,172,174,178,182,190,194,198,206,210,222,238,254, %U A092112 285,294,312,315,318,334,336,350,366,372,382,405,414,416,432,434,446,454 %N A092112 Where A092111 equals 2. %C A092112 Not as obvious as A092100, this sequence differs from multiples of 8 plus 6 (A017137). %t A092112 Run the second Mathematica line of A091938, then g[n_] := (n + 1 - Count[ IntegerDigits[f[n], 2], 1]); Select[ Range[100], g[ # ] == 2 &] %Y A092112 Cf. A092111, A091935. %Y A092112 Sequence in context: A166628 A082802 A113190 this_sequence A048196 A045282 A039291 %Y A092112 Adjacent sequences: A092109 A092110 A092111 this_sequence A092113 A092114 A092115 %K A092112 nonn %O A092112 1,1 %A A092112 Robert G. Wilson v (rgwv(AT)rgwv.com), Feb 20 2004, corrected Nov 02 2006 Search completed in 0.001 seconds