A020461 Primes that contain digits 3 and 4 only.

3, 43, 433, 443, 3343, 3433, 33343, 333433, 334333, 343333, 343433, 444343, 444443, 3333433, 3343343, 3343433, 3344333, 3344443, 3433333, 3434443, 3443443, 3444443, 4344443, 4433333, 4434343, 4443433, 34333333, 34434343, 34444343, 43444433

Offset

1,1

Links

Jason Bard, Table of n, a(n) for n = 1..10000 (first 1000 terms from Vincenzo Librandi)

Mathematica

Flatten[Table[Select[FromDigits/@Tuples[{3, 4}, n], PrimeQ], {n, 8}]] (* Vincenzo Librandi, Jul 27 2012 *)

Prog

(Magma) [p: p in PrimesUpTo(43444433) | Set(Intseq(p)) subset [3, 4]];
// Bruno Berselli, Jul 27 2012

Crossrefs

Cf. A054356.

Sequence in context: A386057 A199346 A199340 * A138974 A036940 A099664

Adjacent sequences: A020458 A020459 A020460 * A020462 A020463 A020464

Keyword

nonn,base

Author

David W. Wilson

Status

approved