This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A190858 #4 Mar 30 2012 18:57:29 %S A190858 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, %T A190858 60,63,64,67,69,79,81,82,85,87,91,93,94,96,111,115,117,118,121,123, %U A190858 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 %N A190858 Integers in (-1+A002977)/2; contains A002977 as a proper subsequence. %C A190858 See A190803. %t A190858 h = 2; i = 1; j = 3; k = 1; f = 1; g = 9 ; %t A190858 a = Union[Flatten[NestList[{h # + i, j # + k} &, f, g]]] (* A002977 *) %t A190858 b = (a - 1)/2; c = (a - 1)/3; r = Range[1, 300]; %t A190858 d = Intersection[b, r] (* A190858 *) %t A190858 e = Intersection[c, r] (* A190859 *) %Y A190858 Cf. A190803, A002977, A190859. %K A190858 nonn %O A190858 1,2 %A A190858 _Clark Kimberling_, May 25 2011