A260266 Primes having only {0, 1, 4} as digits.

11, 41, 101, 401, 4001, 4111, 4441, 10111, 10141, 11411, 14011, 14401, 14411, 40111, 41011, 41141, 41411, 44041, 44101, 44111, 100411, 101111, 101141, 101411, 110441, 114001, 114041, 140111, 140401, 140411, 141041, 141101, 400441, 401101, 401411, 404011

Offset: 1

Author

Vincenzo Librandi, Jul 22 2015

Keywords

• nonn
• easy
• base

Comments

A020449 and A020452 are subsequences.

All terms end with a digit "1". - M. F. Hasler, Jul 26 2015

Links

• Alois P. Heinz, Table of n, a(n) for n = 1..10000
• Index to entries for primes with digits in a given set

Crossrefs

Primes that contain only digits among {1,4,k}: this sequence (k=0), A260267 (k=2), A199341 (k=3), A260268 (k=5), A260269 (k=6), A079651 (k=7), A260270 (k=8), A260271 (k=9).

Cf. A020449, A020452.

Cf. A020450 - A020472, A036953, A260044, A260267 - A260271, A199325 - A199329, A061247, A199340 - A199349.

Programs

Magma

[p: p in PrimesUpTo(5*10^5) | Set(Intseq(p)) subset [1, 4, 0]];

Mathematica

Select[Prime[Range[4 10^4]], Complement[IntegerDigits[#], {1, 4, 0}]=={} &]

PARI

A260266(n=50,show=0)={for(d=1,1e9,my(t,u=vector(d,i,10^(d-i))~);forvec(v=vector(d,i,[i==1||i==d,1+(iM. F. Hasler, Jul 25 2015