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 A192548 #6 Mar 30 2012 18:55:30 %S A192548 1,1,4,33,426,7670,181000,5376777,195238792,8472419484,431606519268, %T A192548 25440239275308,1714357181128372,130748750027622922, %U A192548 11188498960336877296,1066226987215138587095,112415085220156146401380,13037223283297354475403696 %N A192548 a(n) = sum(abs(stirling1(n,k))*stirling2(n+1,k+1),k=0..n). %H A192548 Vincenzo Librandi, <a href="/A192548/b192548.txt">Table of n, a(n) for n = 0..47</a> %t A192548 Table[Sum[Abs[StirlingS1[n,k]]StirlingS2[n+1,k+1],{k,0,n}],{n,0,100}] %o A192548 (Maxima) makelist(sum(abs(stirling1(n,k))*stirling2(n+1,k+1),k,0,n),n,0,24); %Y A192548 Cf. A047793. %K A192548 nonn %O A192548 0,3 %A A192548 _Emanuele Munarini_, Jul 04 2011