|
%I #9 Sep 08 2022 08:45:50
%S 2,5,7,11,23,29,31,53,71,79,83,89,97,107,127,131,139,151,167,191,197,
%T 211,227,229,239,241,257,269,271,277,281,283,347,349,359,379,383,409,
%U 433,449,461,499,521,587,647,673,677,709,739,743,769,787,811,823
%N Primes p such that 210*p+41 is also prime.
%H Vincenzo Librandi, <a href="/A172981/b172981.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Prime[Range[1000]], PrimeQ[210 # + 41]&] (* _Vincenzo Librandi_, Dec 31 2013 *)
%o (Magma) [p: p in PrimesUpTo(1000) | IsPrime(210*p+41)]; // _Vincenzo Librandi_, Dec 31 2013
%Y Cf. A140848.
%K nonn,easy
%O 1,1
%A _Vincenzo Librandi_, Feb 06 2010
%E Definition modified by _Harvey P. Dale_, Aug 21 2016
|
