Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).
%I #9 Apr 30 2023 16:27:42
%S 2,3,5,11,13,23,31,41,43,53,61,113,131,151,163,211,223,233,241,251,
%T 263,311,313,331,353,421,431,433,443,461,463,521,523,541,563,613,631,
%U 641,643,653,661,1123,1151,1153,1163,1213,1223,1231,1321,1361,1423,1433
%N Primes containing only digits from set (1,2,3,4,5,6).
%C 0-free subset of A036960. "Dice Primes": the ordered sequence of prime numbers whose digits can be generated by successively throwing a regular die with the numbers 1,2,...,6. There are n^6 elements of A057436 with n digits. Restricting to primes, we have 3 with 1 digit, 8 with 2 digits, 23 with 3 digits.
%F A000040 INTERSECTION A057436. A052382 INTERSECTION A036960.
%t Select[Prime[Range[250]], Length[Intersection[IntegerDigits[ # ], {7, 8, 9, 0}]] == 0 &] (* _Stefan Steinerberger_, Jan 03 2008 *)
%Y Cf. A000040, A036960, A052382, A057436.
%K base,easy,nonn
%O 1,1
%A _Jonathan Vos Post_, Jan 02 2008
%E More terms from _Stefan Steinerberger_, Jan 03 2008