|
%I #14 Jul 23 2021 02:08:48
%S 2,3,4,6,7,12,15,19,21,25,27,33,38,39,44,51,59,62,63,65,66,69,74,90,
%T 93,96,101,106,108,111,112,123,132,138,143,144,147,153,162,163,166,
%U 168,181,187,188,203,219,224,229,241,243,255,258,259,269,273,300
%N Numbers k such that A287922(k) is a prime.
%C Corresponding primes are in A045637.
%t Select[Table[n, {n, 300}], PrimeQ[Prime[#]^2 + 4] &]
%Y Cf. A287922, A045637.
%K nonn
%O 1,1
%A _XU Pingya_, Jun 02 2017
|
