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 A004098 #24 Sep 08 2022 08:44:32 %S A004098 1,1,2,5,51,25,302,778,414,74112,579511,75876,7953124,73444672, %T A004098 223998091,5458592831,74124108401,40896846828,951608670286, %U A004098 7505022472385,27353285142715,157651618968474,3237448375176054,64348055850025144,982508492968859544 %N A004098 Bell numbers written backwards. %H A004098 Alois P. Heinz, <a href="/A004098/b004098.txt">Table of n, a(n) for n = 0..576</a> %F A004098 a(n) = A004086(A000110(n)). - _Michel Marcus_, Apr 05 2014 %p A004098 b:= proc(n) option remember; `if`(n=0, 1, %p A004098 add(b(n-j)*binomial(n-1, j-1), j=1..n)) %p A004098 end: %p A004098 a:= n-> (s-> parse(cat(seq(s[-i], i=1..length(s)))))(""||(b(n))): %p A004098 seq(a(n), n=0..30); # _Alois P. Heinz_, Apr 01 2018 %t A004098 FromDigits[Reverse[IntegerDigits[#]]]&/@BellB[Range[0,30]] (* _Harvey P. Dale_, Feb 01 2012 *) %o A004098 (Magma) [Seqint(Reverse(Intseq(Bell(n)))): n in [0..30]]; // _Vincenzo Librandi_, Jan 30 2015 %Y A004098 Cf. A000110, A004086. %K A004098 nonn,base %O A004098 0,3 %A A004098 _N. J. A. Sloane_ %E A004098 More terms from _Eric M. Schmidt_, Apr 04 2014