%I #19 Sep 08 2022 08:45:33
%S 0,3,11,20,23,27,32,39,44,48,51,56,59,60,83,104,108,111,116,128,132,
%T 135,143,171,188,203,207,212,227,240,251,263,275,296,300,312,315,324,
%U 356,359,363,380,384,392,399,408,443,447,476,479,483,504,507,515,527,528
%N Numbers k such that 41+(k+k^2)/2 = 41+A000217(k) is prime.
%C Corresponding values of primes are in A139219.
%C Numbers k such that both 41+(k+k^2)/2 and 41+(k+k^2) are primes, are in A139221.
%e If k = 11 then 41 + (k + k^2) / 2 = 107 (prime).
%t Select[Table[Range[0,1000]],PrimeQ[41+(#+#^2)/2]&]
%o (PARI) is(n)=isprime(n*(n+1)/2+41) \\ _Charles R Greathouse IV_, Aug 16 2015
%o (Magma) [k:k in [0..530]| IsPrime(41+(k+k^2) div 2)]; // _Marius A. Burtea_, Feb 12 2020
%Y Cf. A000217, A056561, A139219, A139221.
%K nonn
%O 1,2
%A _Zak Seidov_, Apr 11 2008