%I #8 Apr 05 2019 18:13:00
%S 2,3,11,13,47,53,97,131,197,241,409,431,607,673,739,751,983,991,1103,
%T 1433,1489,1531,1553,1709,1721,2371,2393,2447,2633,2789,2833,2897,
%U 3041,3109,3217,3371,3373,3527,3547,3593,3671,3691,4057,4153,4211,4297,4363
%N Ulam numbers that are primes.
%H Charles R Greathouse IV, <a href="/A068820/b068820.txt">Table of n, a(n) for n = 1..49221</a>
%p # Function 'UlamList' is defined in A002858.
%p UlamPrimes := n -> select(k->isprime(k), UlamList(n)):
%p UlamPrimes(403); # _Peter Luschny_, Apr 05 2019
%Y Cf. A002858.
%K easy,nonn
%O 1,1
%A _Naohiro Nomoto_, Mar 29 2002