%I #26 Feb 03 2024 00:52:47

%S 0,1,2,4,5,6,9,10,11,12,15,16,17,20,22,24,25,26,29,31,32,34,36,37,39,

%T 44,45,46,50,51,54,55,57,60,61,62,65,67,69,71,72,75,76,80,82,86,89,90,

%U 94,95,99,100,101,102,104,106,109,111,114,117,120,121,122,124,125,127,130

%N Numbers k such that 6k + 7 is prime.

%C One less than the associated term in A024899. - _R. J. Mathar_, Jan 05 2011

%H Vincenzo Librandi, <a href="/A153218/b153218.txt">Table of n, a(n) for n = 1..1000</a>

%t Select[Range[0, 150], PrimeQ[6# + 7] &] (* _Vincenzo Librandi_, Sep 24 2012 *)

%o (Magma) [n: n in [0..150] | IsPrime(6*n + 7)]; // _Vincenzo Librandi_, Sep 24 2012

%o (PARI) is(n)=isprime(6*n+7) \\ _Charles R Greathouse IV_, Sep 24 2012

%Y Cf. A153219.

%K nonn,easy

%O 1,3

%A _Vincenzo Librandi_, Dec 21 2008