%I #23 Apr 19 2018 11:16:54
%S 2,3,13,103,131
%N Primes p for which there exists no integer n with 1 < n^2 < p such that n^4 - n^2 + p is prime (i.e., primes that don't arise as q's in A126769).
%C Sequence suggested by _W. Edwin Clark_.
%C Is this sequence finite?
%C Primes not in A126769 are listed in A128292.
%C Next term >= 5*10^7. - _Klaus Brockhaus_, Mar 15 2007
%C Next term > 2*10^9. - _Jon E. Schoenfield_, Apr 06 2018
%t fQ[p_] := Block[{r = Rest@Range@Floor@Sqrt@p}, Union@ PrimeQ[r^4 - r^2 + p] == {False}]; lst = {2, 3}; Do[ If[ fQ@ Prime@n, AppendTo[lst, Prime@n]], {n, 3, 10^5}]; lst (* _Robert G. Wilson v_, Mar 01 2007 *)
%Y Cf. A126769.
%K nonn,more
%O 1,1
%A _Tomas Xordan_, Feb 25 2007