[go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A248642
Odious numbers (A000069) remaining odious if any digit is deleted (zeros allowed).
4
11, 14, 21, 22, 28, 41, 42, 44, 47, 74, 81, 82, 84, 87, 88, 131, 161, 164, 191, 193, 194, 211, 256, 261, 262, 321, 322, 328, 352, 355, 381, 382, 388, 419, 421, 422, 491, 494, 502, 522, 552, 555, 569, 611, 614, 641, 642, 644, 647, 704, 744, 749, 764, 769, 793
OFFSET
1,1
COMMENTS
An analog of the idea Wilson-Dale: A034302, A051362.
LINKS
EXAMPLE
161 is in the sequence, since the numbers 161,61,11,16 are odious.
MATHEMATICA
odiousQ:=OddQ[First[DigitCount[#, 2]]]&;
Select[Range[1000], odiousQ[#]&&Apply[And, Map[odiousQ[FromDigits[#]]&, Subsets[#, {Length[#]-1}]&[IntegerDigits[#]]]]&] (* Peter J. C. Moses, Oct 10 2014 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Vladimir Shevelev, Oct 10 2014
EXTENSIONS
More terms from Peter J. C. Moses, Oct 10 2014
STATUS
approved