|
%I #29 Feb 03 2024 00:49:45
%S 0,6,8,14,18,20,24,26,36,38,48,54,60,68,78,80,84,86,90,96,104,114,116,
%T 128,138,140,144,146,150,156,158,168,170,174,188,204,206,210,216,224,
%U 228,230,236,246,248,254,260,266,270,284,288,294,296,300,306,318,320
%N Numbers k for which 7*k + 11 is prime.
%C Note that 7 is the largest single-digit prime and 11 is the smallest two-digit prime.
%H Harvey P. Dale, <a href="/A101123/b101123.txt">Table of n, a(n) for n = 1..1000</a>
%e For k=6, 7*6 + 11 = 53 (prime).
%e For k=8, 7*8 + 11 = 67 (prime).
%e For k=14, 7*14 + 11 = 109 (prime).
%t Select[Range[0,500],PrimeQ[7#+11]&] (* _Harvey P. Dale_, Jun 05 2012 *)
%o (PARI) isA101123(n)=isprime(7*n+11) \\ _Michael B. Porter_, Apr 20 2010
%Y Cf. A017029, A101084, A101086, A101444.
%K nonn
%O 1,2
%A _Parthasarathy Nambi_, Jan 21 2005
%E Extended by _Ray Chandler_, Jan 25 2005
|
