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 A192681 #11 Feb 26 2019 23:06:25 %S A192681 1,1,1,3,8,22,63,193,627,2143,7677,28706,111669,450529,1880164, %T A192681 8097765,35922614,163849371,767224522,3682984346,18102428784, %U A192681 91000840873,467393250911,2450438244585,13102651355735,71398380128514,396202573696587 %N A192681 Floor-sqrt transform of Lah partition numbers (A000262). %F A192681 a(n) = floor(sqrt(A000262(n))). %p A192681 A000262 := proc(n) option remember: if n=0 then RETURN(1) fi: if n=1 then RETURN(1) fi: (2*n-1)*procname(n-1) - (n-1)*(n-2)*procname(n-2) end proc: %p A192681 A192681 := proc(n) floor(sqrt(A000262(n))) ; end proc: # _R. J. Mathar_, Jul 13 2011 %t A192681 FSFromExpSeries[f_,x_,n_] := Map[Floor[Sqrt[#]]&,CoefficientList[Series[f,{x,0,n}],x]Table[k!,{k,0,n}]] %t A192681 FSFromExpSeries[Exp[x/(1-x)],x,60] %K A192681 nonn %O A192681 0,4 %A A192681 _Emanuele Munarini_, Jul 07 2011 %E A192681 All terms replaced by _R. J. Mathar_, Jul 13 2011