Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A061833
Multiples of 11 having only odd digits.
1
11, 33, 55, 77, 99, 319, 517, 539, 715, 737, 759, 913, 935, 957, 979, 1111, 1133, 1155, 1177, 1199, 1331, 1353, 1375, 1397, 1551, 1573, 1595, 1771, 1793, 1991, 3113, 3135, 3157, 3179, 3311, 3333, 3355, 3377, 3399, 3531, 3553, 3575, 3597, 3751, 3773, 3795
OFFSET
1,1
EXAMPLE
1353 = 11*123 is a term having all odd digits.
MATHEMATICA
Select[11*Range[400], AllTrue[IntegerDigits[#], OddQ]&] (* The program uses the AllTrue function from Mathematica version 10 *) (* Harvey P. Dale, Aug 30 2015 *)
PROG
(PARI) is(n)=n%22==11 && #setintersect(Set(digits(n)), [0, 2, 4, 6, 8])==0 \\ Charles R Greathouse IV, Feb 15 2017
CROSSREFS
KEYWORD
nonn,base,easy
AUTHOR
Amarnath Murthy, May 29 2001
EXTENSIONS
Corrected and extended by Larry Reeves (larryr(AT)acm.org), May 30 2001
STATUS
approved