login
A004098
Bell numbers written backwards.
4
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,3
LINKS
FORMULA
a(n) = A004086(A000110(n)). - Michel Marcus, Apr 05 2014
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 *)
PROG
(Magma) [Seqint(Reverse(Intseq(Bell(n)))): n in [0..30]]; // Vincenzo Librandi, Jan 30 2015
CROSSREFS
Sequence in context: A102011 A328151 A208797 * A356492 A208206 A376043
KEYWORD
nonn,base
EXTENSIONS
More terms from Eric M. Schmidt, Apr 04 2014
STATUS
approved