A045752 4n-1 is composite.
4, 7, 9, 10, 13, 14, 16, 19, 22, 23, 24, 25, 28, 29, 30, 31, 34, 36, 37, 39, 40, 43, 44, 46, 47, 49, 51, 52, 54, 55, 58, 59, 61, 62, 64, 65, 67, 69, 70, 72, 73, 74, 75, 76, 79, 80, 81, 82, 84, 85, 86, 88, 89, 91, 93, 94, 97, 98, 99, 100
Offset: 1
Examples
7 belongs to the sequence because 7*4-1=27 is not a prime. Distribution of the positive terms in the following triangular array: *; 4,*; *,9,*; 7,*,16,*; *,14,*,25,*; 10,*,23,*,36,*; etc. where * marks the non-integer values of (2*h*k + k + h + 1)/2 with h >= k >= 1. - _Vincenzo Librandi_, Jul 29 2016
Links
- Robert Israel, Table of n, a(n) for n = 1..10000
Crossrefs
Complement of A005099.
Programs
-
Magma
[n: n in [1..120] |not IsPrime(4*n-1)]; // Vincenzo Librandi, Jul 29 2016
-
Maple
remove(t -> isprime(4*t-1), [$1..1000]); # Robert Israel, Jul 29 2016
-
Mathematica
Select[Range@ 100, CompositeQ[4 # - 1] &] (* Michael De Vlieger, Jul 28 2016 *)
-
PARI
isok(n) = ! isprime(4*n-1); \\ Michel Marcus, Sep 28 2013
Comments