A175219 The fourth nonprimes after the primes.

9, 9, 10, 12, 16, 18, 22, 24, 27, 34, 35, 42, 46, 48, 51, 57, 64, 65, 72, 76, 77, 84, 87, 93, 102, 106, 108, 112, 114, 117, 132, 135, 142, 143, 154, 155, 161, 168, 171, 177, 184, 185, 196, 198, 202, 203, 215, 228, 232, 234, 237, 244, 245, 255, 261, 267, 274

Offset: 1

Author

Jaroslav Krizek, Mar 06 2010

Keywords

• nonn

Links

• Harvey P. Dale, Table of n, a(n) for n = 1..1000

Programs

Mathematica

Module[{nn=1000,cmps},cmps=Partition[Select[Range[nn],CompositeQ],4,1];Table[SelectFirst[ cmps,#[[1]]>p&],{p,Prime[Range[PrimePi[cmps[[-1,1]]]]]}]][[;;,4]] (* Harvey P. Dale, Aug 07 2023 *)

Extensions

More terms from Harvey P. Dale, Aug 07 2023