cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A124674 Primes with distinct prime digits.

This page as a plain text file.
%I A124674 #14 Mar 27 2020 06:41:12
%S A124674 2,3,5,7,23,37,53,73,257,523,2357,2753,3257,3527,5237,5273,7253,7523
%N A124674 Primes with distinct prime digits.
%H A124674 Caldwell and Honaker, <a href="https://primes.utm.edu/curios/page.php?curio_id=32194">2357</a>, Prime Curios!
%t A124674 Select[Range[10000], PrimeQ[ # ] && Length[IntegerDigits[ # ]] == Length[Union[IntegerDigits[ # ]]] && Complement[IntegerDigits[ # ], {2, 3, 5, 7}] == {} &]
%o A124674 (PARI) is(k) = isprime(k) && setintersect([2, 3, 5, 7], v=vecsort(digits(k))) == v; \\ _Jinyuan Wang_, Mar 27 2020
%Y A124674 Cf. A019546 (primes whose digits are primes), A124673.
%K A124674 nonn,base,fini,full
%O A124674 1,1
%A A124674 _Tanya Khovanova_, Dec 24 2006