%I #19 Sep 08 2022 08:45:39
%S 0,2,4,7,10,11,12,14,17,18,21,22,24,25,27,30,32,37,39,40,41,42,43,44,
%T 46,47,49,52,53,54,57,58,60,62,65,66,67,68,70,72,74,75,76,77,79,80,81,
%U 82,87,88,90,92,95,97,98,99,102,105,106,107,109,111,112,113,114
%N Numbers n such that 12*n+1 is not prime.
%C Complement of A110801 (12*n+1 is prime). [_Klaus Brockhaus_, Jan 02 2009]
%H Vincenzo Librandi, <a href="/A153383/b153383.txt">Table of n, a(n) for n = 1..1000</a>
%e Triangle begins:
%e *;
%e *,2;
%e *,*,4;
%e *,*,*,*;
%e *,*,*,*,10;
%e *,*,*,*,*,14;
%e *,*,*,*,*,*,*:
%e *,7,*,*,*,*,*,24;
%e *,*,11,*,*,*,*,*,30;
%e where * marks the non-integer values of (2*h*k + k + h)/6 with h >= k >= 1.- _Vincenzo Librandi_, Jan 13 2013
%t Select[Range[0, 200], !PrimeQ[12*# + 1] &] (* _Vincenzo Librandi_, Jan 13 2013 *)
%o (Magma) [ n: n in [0..120] | not IsPrime(12*n+1) ]; // _Klaus Brockhaus_, Jan 02 2009
%Y Cf. A110801.
%K nonn,easy
%O 1,2
%A _Vincenzo Librandi_, Dec 25 2008
%E More terms from _Klaus Brockhaus_, Jan 02 2009
%E 0 added by _Arkadiusz Wesolowski_, Aug 03 2011