A190858 - OEIS

A190858

Integers in (-1+A002977)/2; contains A002977 as a proper subsequence.

1, 3, 4, 6, 7, 9, 10, 13, 15, 19, 21, 22, 27, 28, 31, 33, 39, 40, 42, 43, 45, 46, 55, 57, 58, 60, 63, 64, 67, 69, 79, 81, 82, 85, 87, 91, 93, 94, 96, 111, 115, 117, 118, 121, 123, 127, 129, 130, 135, 136, 139, 141, 159, 163, 165, 166, 171, 172, 175, 177, 183, 187, 189, 190, 193, 195, 202, 204, 223, 231, 235, 237, 238, 243, 244, 247, 249

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

OFFSET

1,2

COMMENTS

See A190803.

LINKS

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

MATHEMATICA

h = 2; i = 1; j = 3; k = 1; f = 1; g = 9 ;

a = Union[Flatten[NestList[{h # + i, j # + k} &, f, g]]] (* A002977 *)

b = (a - 1)/2; c = (a - 1)/3; r = Range[1, 300];

d = Intersection[b, r] (* A190858 *)