1,2

See A191323.

Ivan Neretin, Table of n, a(n) for n = 1..10000

1 -> 2,5 -> 4,8,17 ->

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

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

Cf. A191323.

Sequence in context: A112886 A282429 A111040 * A147807 A022559 A049781

Adjacent sequences: A191321 A191322 A191323 * A191325 A191326 A191327

nonn

Clark Kimberling, May 30 2011

approved