%I #7 Dec 25 2020 19:33:44
%S 5,29,149,461,1637,1877,4373,13037,13757,32309,41381,43853,63533,
%T 69821,92333,154157,174917,228869,250949,358637,381917,388757,565661,
%U 587693,651293,697973,755861,790613,862061,985613,1127309,1180637,1303613,1739981,2147693,2345261,2586989,2684837,2876261
%N Primes in A240860 (up to sign).
%H Robert Israel, <a href="/A339957/b339957.txt">Table of n, a(n) for n = 1..10000</a>
%e a(3) = 149 is in the sequence because it is prime and A240860(8) = -149.
%p R:= NULL: count:= 0:
%p v:= 0: p:= 1:
%p while count < 100 do
%p p:= nextprime(p);
%p v:= p^2 - v;
%p if isprime(v) then R:= R, v; count:= count+1 fi
%p od:
%p R;
%Y Cf. A240860.
%K nonn
%O 1,1
%A _J. M. Bergot_ and _Robert Israel_, Dec 24 2020
|