A325441 - OEIS

A325441

Complement of A325440.

2, 5, 7, 8, 11, 17, 19, 23, 25, 26, 27, 29, 31, 35, 38, 39, 41, 43, 44, 47, 53, 55, 59, 62, 63, 65, 67, 71, 73, 79, 83, 89, 91, 95, 97, 98, 99, 101, 103, 107, 110, 111, 113, 115, 119, 121, 125, 127, 131, 134, 135, 137, 139, 143, 146, 147, 149, 151, 152, 153

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

OFFSET

1,1

COMMENTS

These are the numbers 2x-1 and 3x-1 as x ranges through the numbers x>1 in A325440.

LINKS

Clark Kimberling, Table of n, a(n) for n = 1..10000

MATHEMATICA

a = {1}; Do[AppendTo[a, NestWhile[# + 1 &, Last[a] + 1, Apply[Or,

Map[MemberQ[a, #] &, Select[Flatten[{(#+1)/2, (#+1)/3}],

IntegerQ]]] &]], {150}]; a (* A325440 *)

Complement[Range[Last[a]], a] (* A325441 *)