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 A184736 #5 Mar 30 2012 18:57:17 %S A184736 1,3,4,6,8,10,12,14,15,17,19,21,23,25,26,28,30,32,34,36,37,39,41,43, %T A184736 45,47,48,50,52,54,56,58,59,61,63,65,67,68,70,72,74,76,78,79,81,83,85, %U A184736 87,89,90,92,94,96,98,100,101,103,105,107,109,111,112,114,116,118,120,122,123,125,127,129,131,132,134,136,138,140,142,143,145,147,149,151,153,154,156,158,160,162,164,165,167,169,171,173,175,176,178,180,182,184,185,187,189,191,193,195,196,198,200,202,204,206,207,209,211,213,215,217,218 %N A184736 floor(nr+h), where r=-1+2^(3/2), h=-1/2; complement of A184735. %F A184736 a(n)=floor(nr+h), where r=-1+2^(3/2), h=-1/2. %t A184736 r=2^(3/2)-1; h=-1/2; s=r/(r-1); %t A184736 Table[Floor[n*r+h],{n,1,120}] (* A184736 *) %t A184736 Table[Floor[n*s+h-h*s],{n,1,120}] (* A184737 *) %Y A184736 Cf. A184737. %K A184736 nonn %O A184736 1,2 %A A184736 _Clark Kimberling_, Jan 20 2011