

A191109


Increasing sequence generated by these rules: a(1)=1, and if x is in a then 3x1 and 3x+2 are in a.


2



1, 2, 5, 8, 14, 17, 23, 26, 41, 44, 50, 53, 68, 71, 77, 80, 122, 125, 131, 134, 149, 152, 158, 161, 203, 206, 212, 215, 230, 233, 239, 242, 365, 368, 374, 377, 392, 395, 401, 404, 446, 449, 455, 458, 473, 476, 482, 485, 608, 611, 617, 620, 635, 638, 644, 647, 689, 692, 698, 701, 716, 719, 725, 728, 1094, 1097, 1103, 1106, 1121
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,2


COMMENTS

See discussions at A190803, A191106. The positive integers in (1+A191109)/3 comprise A153775, a proper subsequence of A191109. The positive integers in (2+A191109)/3 comprise A032924, a proper subsequence of A191109.


LINKS

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


MATHEMATICA

h = 3; i = 1; j = 3; k = 2; f = 1; g = 7;
a = Union[Flatten[NestList[{h # + i, j # + k} &, f, g]]] (* 191109 *)
b = (a + 1)/3; c = (a  2)/3; r = Range[1, 900];
d = Intersection[b, r] (* A153775 *)
e = Intersection[c, r] (* A032924 *)


CROSSREFS

Cf. A190803, A191106, A153775, A032924.
Sequence in context: A202273 A210702 A173177 * A190105 A295400 A266287
Adjacent sequences: A191106 A191107 A191108 * A191110 A191111 A191112


KEYWORD

nonn


AUTHOR

Clark Kimberling, May 26 2011


STATUS

approved



