A155990 Numbers prime(k) as k runs through the numbers whose digits are all prime.
3, 5, 11, 17, 79, 83, 97, 103, 131, 137, 149, 157, 239, 241, 257, 269, 359, 367, 379, 389, 1399, 1409, 1427, 1433, 1459, 1471, 1483, 1489, 1601, 1607, 1613, 1621, 1747, 1753, 1777, 1787, 2137, 2141, 2153, 2179, 2237, 2239, 2251, 2269, 2377, 2381, 2389, 2399
Offset: 1
Programs
-
Maple
isA046034 := proc(n) local d ; d := convert(convert(n,base,10),set) ; if d intersect {0,1,4,6,8,9} = {} then true; else false; fi; end: for n from 1 to 3000 do if isA046034(n) then printf("%d,",ithprime(n)) ; fi; od: # R. J. Mathar, Feb 10 2009
Formula
Extensions
Edited by N. J. A. Sloane, Feb 02 2009
149 inserted by R. J. Mathar, Feb 10 2009