A158205 Primes with every digit a nonprime and the sum of the digits a prime.

11, 41, 61, 89, 101, 191, 199, 401, 409, 449, 461, 601, 641, 661, 809, 881, 911, 919, 991, 1019, 1091, 1109, 1181, 1499, 1619, 1811, 1901, 1949, 4001, 4049, 4111, 4409, 4441, 4481, 4649, 4801, 4861, 4889, 4919, 4999, 6089, 6449, 6481, 6661, 6689, 6841

Offset: 1

Author

Juri-Stepan Gerasimov, Mar 13 2009

Keywords

• nonn
• base
• easy
• less

Comments

Nonprime digits are 0, 1, 4, 6, 8 or 9.

Examples

			11(1+1=2), 41(4+1=5), 61(6+1=7), 89(8+9=17), 101(1+0+1=2), 191(1+9+1=11)
		

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Crossrefs

Cf. A000040, A062088, A141468.

Programs

Mathematica

Select[FromDigits/@Select[Tuples[{0,1,4,6,8,9},4],PrimeQ[Total[#]]&],PrimeQ]//Flatten (* Harvey P. Dale, Oct 02 2021 *)

Extensions

Entries checked by R. J. Mathar, May 19 2010