|
%I #28 Apr 24 2024 02:44:42
%S 0,1,4,7,21,24,31,43,46,70,99,108,109,112,154,158,176,213,218,234,238,
%T 267,273,311,319,337,381,515,518,519,528,540,658,680,689,704,736,739,
%U 752,781,837,889,1012,1071,1165,1170,1180,1197,1233,1331,1344,1373,1379
%N Numbers k such that 60*k+41, 90*k+61 and 150*k+101 are all prime.
%H Amiram Eldar, <a href="/A255512/b255512.txt">Table of n, a(n) for n = 1..10000</a>
%H Umberto Cerruti, <a href="/A255512/a255512.pdf">Pseudoprimi di Fermat e numeri di Carmichael</a> (in Italian), p. 10.
%H <a href="/index/Ca#Carmichael">Index entries for sequences related to Carmichael numbers</a>.
%t Select[Range[0, 1400], PrimeQ[60 # + 41] && PrimeQ[90 # + 61] && PrimeQ[150 # + 101] &]
%t Select[Range[0,1500],AllTrue[{60#+41,90#+61,150#+101},PrimeQ]&] (* _Harvey P. Dale_, Jan 13 2024 *)
%o (Magma) [n: n in [0..2000]| IsPrime(60*n+41) and IsPrime(90*n+61) and IsPrime(150*n+101)];
%o (PARI) is(k) = isprime(60*k + 41) && isprime(90*k + 61) && isprime(150*k + 101); \\ _Amiram Eldar_, Apr 24 2024
%Y Cf. A202113.
%Y Cf. A255441 (Carmichael numbers of the form (60k+41)*(90k+61)*(150k+101)).
%K nonn
%O 1,3
%A _Vincenzo Librandi_, Feb 24 2015
|
