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 A184737 #8 Apr 21 2025 09:11:36
%S A184737 2,5,7,9,11,13,16,18,20,22,24,27,29,31,33,35,38,40,42,44,46,49,51,53,
%T A184737 55,57,60,62,64,66,69,71,73,75,77,80,82,84,86,88,91,93,95,97,99,102,
%U A184737 104,106,108,110,113,115,117,119,121,124,126,128,130,133,135,137,139,141,144,146,148,150,152,155,157,159,161,163,166,168,170,172,174,177,179,181,183,186,188,190,192,194,197,199,201,203,205,208,210,212,214,216,219,221,223,225,227,230,232,234,236,238,241,243,245,247,250,252,254,256,258,261,263,265
%N A184737 a(n) = floor(n*s+h-h*s), where s=-1+2^(3/2), h=-1/2; complement of A184736.
%F A184737 a(n) = floor(n*s+h-h*s), where s=-1+2^(3/2), h=-1/2.
%t A184737 r=2^(3/2)-1; h=-1/2; s=r/(r-1);
%t A184737 Table[Floor[n*r+h],{n,1,120}] (* A184736 *)
%t A184737 Table[Floor[n*s+h-h*s],{n,1,120}] (* A184737 *)
%Y A184737 Cf. A184736.
%K A184737 nonn
%O A184737 1,1
%A A184737 _Clark Kimberling_, Jan 20 2011