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.
%I A162950 #23 Mar 19 2023 08:21:47
%S A162950 2,3,5,7,13,17,19,23,29,31,37,43,53,59,61,71,73,79,89,113,137,179,181,
%T A162950 191,193,199,233,269,281,311,353,367,397,463,487,509,557,571,593,647,
%U A162950 661,677,709,733,757,797,829,839,929,1117,1277,1307,1433,1873,1949
%N A162950 Primes whose square contains no repeated digit.
%C A162950 Or: primes in A119509.
%C A162950 There are only 87 terms, the last being 21397.
%H A162950 Nathaniel Johnston, <a href="/A162950/b162950.txt">Table of n, a(n) for n = 1..87</a> (full sequence)
%t A162950 t={}; Do[p=Prime[n]; If[Max[DigitCount[p^2]]<= 1,AppendTo[t,p]],{n,300}]; t (* _Jayanta Basu_, May 10 2013 *)
%o A162950 (Magma) [p: p in PrimesUpTo(21397) | #Set(d) eq #d where d is Intseq(p^2)]; // _Bruno Berselli_, Aug 02 2011
%o A162950 (PARI) is(n)=if(n<21398 && isprime(n), n=digits(n^2); #v==#vecsort(v,,8), 0) \\ _Charles R Greathouse IV_, May 10 2013
%Y A162950 Cf. A119509.
%K A162950 fini,full,nonn,base
%O A162950 1,1
%A A162950 _Claudio Meller_, Jul 18 2009
%E A162950 Keyword:base added by _R. J. Mathar_, Jul 19 2009