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 A184102 #10 Jun 21 2015 13:55:29 %S A184102 5,7,9,12,13,15,17,19,21,22,24,25,27,28,30,32,33,34,36,37,39,40,42,43, %T A184102 45,46,47,49,50,51,53,54,55,57,58,60,61,62,63,65,66,67,69,70,71,73,74, %U A184102 75,77,78,79,80,82,83,84,85,87,88,89,90,92,93,94,96,97,98,99,100,102,103,104,105,107,108,109,110,112,113,114,115,117,118,119,120,121,123,124,125,126,127,129,130,131,132,133,135,136,137,138,140 %N A184102 n+floor(4*sqrt(n)); complement of A184103. %F A184102 a(n)=n+floor(4*sqrt(n)). %t A184102 a=16; b=0; %t A184102 Table[n+Floor[(a*n+b)^(1/2)],{n,100}] %t A184102 Table[n-1+Ceiling[(n*n-b)/a],{n,80}] %t A184102 Table[n+Floor[4Sqrt[n]],{n,100}] (* _Harvey P. Dale_, Jun 21 2015 *) %Y A184102 Cf. A184103. %K A184102 nonn,easy %O A184102 1,1 %A A184102 _Clark Kimberling_, Jan 09 2011