login
A260269
Primes having only {1, 4, 6} as digits.
9
11, 41, 61, 461, 641, 661, 4111, 4441, 6661, 11161, 11411, 14411, 14461, 16111, 16141, 16411, 16661, 41141, 41161, 41411, 41611, 41641, 44111, 44641, 46141, 46411, 46441, 61141, 61441, 64661, 66161, 111611, 111641, 114161, 114641, 114661, 116141, 116411
OFFSET
1,1
COMMENTS
A020452 and A020454 are subsequences.
LINKS
MATHEMATICA
Select[Prime[Range[3 10^4]], Complement[IntegerDigits[#], {1, 4, 6}]=={} &]
Select[10#+1&/@Flatten[Table[FromDigits/@Tuples[{1, 4, 6}, n], {n, 5}]], PrimeQ] (* Harvey P. Dale, Apr 19 2026 *)
PROG
(Magma) [p: p in PrimesUpTo(4*10^5) | Set(Intseq(p)) subset [1, 4, 6]];
CROSSREFS
Cf. similar sequences listed in A260266.
Sequence in context: A179446 A386028 A386124 * A109982 A128467 A238713
KEYWORD
nonn,easy,base
AUTHOR
Vincenzo Librandi, Jul 23 2015
STATUS
approved