A004098 Bell numbers written backwards.
1, 1, 2, 5, 51, 25, 302, 778, 414, 74112, 579511, 75876, 7953124, 73444672, 223998091, 5458592831, 74124108401, 40896846828, 951608670286, 7505022472385, 27353285142715, 157651618968474, 3237448375176054, 64348055850025144, 982508492968859544
Offset: 0
Links
- Alois P. Heinz, Table of n, a(n) for n = 0..576
Programs
-
Magma
[Seqint(Reverse(Intseq(Bell(n)))): n in [0..30]]; // Vincenzo Librandi, Jan 30 2015
-
Maple
b:= proc(n) option remember; `if`(n=0, 1, add(b(n-j)*binomial(n-1, j-1), j=1..n)) end: a:= n-> (s-> parse(cat(seq(s[-i], i=1..length(s)))))(""||(b(n))): seq(a(n), n=0..30); # Alois P. Heinz, Apr 01 2018
-
Mathematica
FromDigits[Reverse[IntegerDigits[#]]]&/@BellB[Range[0,30]] (* Harvey P. Dale, Feb 01 2012 *)
Formula
Extensions
More terms from Eric M. Schmidt, Apr 04 2014