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

3, 11, 13, 31, 41, 43, 101, 103, 113, 131, 311, 313, 331, 401, 431, 433, 443, 1013, 1031, 1033, 1103, 1301, 1303, 1433, 3001, 3011, 3041, 3301, 3313, 3331, 3343, 3413, 3433, 4001, 4003, 4013, 4111, 4133, 4441, 10103, 10111, 10133, 10141, 10301, 10303, 10313, 10331

Offset

1,1

Links

Jason Bard, Table of n, a(n) for n = 1..10000

Index to entries for primes with digits in a given set

Mathematica

Select[FromDigits /@ Tuples[{0, 1, 3, 4}, n], PrimeQ]

Prog

(Magma) [p: p in PrimesUpTo(10^6) | Set(Intseq(p)) subset [0, 1, 3, 4]];
(Python) print(list(islice(primes_with("0134"), 41))) # uses function/imports in A385776
(PARI) primes_with(, 1, [0, 1, 3, 4]) \\ uses function in A385776

Crossrefs

Subsequence of A036956.

Supersequence of A199341, A260044, A260266.

Cf. A000040, A385776.

Sequence in context: A023248 A386106 A386108 * A199341 A386115 A111488

Adjacent sequences: A386020 A386021 A386022 * A386024 A386025 A386026

Keyword

nonn,base,easy

Author

Jason Bard, Jul 14 2025

Status

approved