A061817 Multiples of 9 containing only odd digits.
9, 99, 117, 135, 153, 171, 315, 333, 351, 513, 531, 711, 999, 1179, 1197, 1359, 1377, 1395, 1539, 1557, 1575, 1593, 1719, 1737, 1755, 1773, 1791, 1917, 1935, 1953, 1971, 3159, 3177, 3195, 3339, 3357, 3375, 3393, 3519, 3537, 3555, 3573, 3591, 3717, 3735
Offset: 1
Examples
117 = 9*13 is a term.
Programs
-
Mathematica
Select[9Range[500],And@@OddQ[IntegerDigits[#]]&] (* Harvey P. Dale, May 30 2013 *)
-
PARI
is(n)=n%9==0 && #setintersect(Set(digits(n)), [0,2,4,6,8])==0 \\ Charles R Greathouse IV, Feb 15 2017
Extensions
Corrected and extended by Larry Reeves (larryr(AT)acm.org), May 30 2001