A118718 Lucky numbers with only prime digits.

3, 7, 25, 33, 37, 73, 75, 223, 235, 237, 273, 327, 357, 535, 537, 553, 577, 723, 727, 735, 777, 2253, 2257, 2277, 2323, 2335, 2355, 2523, 2527, 2557, 2575, 2725, 2755, 2773, 3223, 3235, 3325, 3355, 3727, 3753, 5233, 5235, 5253, 5277, 5325

Offset: 1

Author

Luc Stevens (lms022(AT)yahoo.com), May 21 2006

Keywords

• base
• nonn

Comments

Lucky numbers with digits 2,3,5 or 7.

Links

• Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..189 from N. J. A. Sloane)

Crossrefs

Intersection of A000959 and A046034.

Programs

Mathematica

L = Table[2*i + 1, {i, 0,2663}]; For[n = 2, n < Length[L], r = L[[n++]]; L = ReplacePart[L, Table[r*i -> Nothing, {i, 1, Length[L]/r}]]];Select[L,ContainsOnly[IntegerDigits[#],{2,3,5,7}]&] (* James C. McMahon, Sep 16 2024 *)

Extensions

Corrected by R. J. Mathar, Aug 21 2006