A336410 - OEIS

A336410

Complement of A336411.

1, 3, 5, 6, 8, 9, 11, 12, 13, 15, 16, 18, 19, 20, 21, 22, 24, 26, 27, 28, 29, 31, 33, 34, 35, 36, 37, 39, 41, 43, 44, 45, 47, 48, 50, 51, 52, 53, 55, 56, 58, 59, 60, 62, 63, 64, 65, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 79, 81, 82, 83, 84, 85, 87, 88

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

COMMENTS

Previous name was: "Numbers k such that prime(k) - oc(k) = 2, where oc(k) is the greatest odd composite < prime(k)".

LINKS

Table of n, a(n) for n=1..66.

FORMULA

a(n) = (A176852(n) - 5)/2. - Hugo Pfoertner, Jul 19 2023

MATHEMATICA

z = 5000; d = Select[Range[2, z], ! PrimeQ@# && OddQ@# &]; (* A014076 *)

f[n_] := Select[d, # < Prime[n] &];