A287014 Bell numbers written in base 2.

1, 1, 10, 101, 1111, 110100, 11001011, 1101101101, 1000000101100, 101001010011011, 11100010100000111, 10100101101010101010, 10000000100101101011101, 1101001011101001000010101, 1011011000001110010001111010, 1010010011011100100010111010001

Offset

0,3

Links

Robert Israel, Table of n, a(n) for n = 0..214

Formula

a(n) = A007088(A000110(n)).

Maple

seq(convert(combinat:-bell(n), binary), n=0..20); # Robert Israel, Aug 12 2018

Mathematica

Table[FromDigits[IntegerDigits[BellB[n], 2]], {n, 0, 30}]

Prog

(Magma) [Seqint(Intseq(Bell(n), 2)): n in [0..20]];

Crossrefs

Cf. A000110, A004685, A007088,

Sequence in context: A290548 A290813 A290834 * A108892 A309802 A324083

Adjacent sequences: A287011 A287012 A287013 * A287015 A287016 A287017

Keyword

nonn,base

Author

Vincenzo Librandi, May 22 2017

Status

approved