A287015 Lucas numbers written in base 2.
10, 1, 11, 100, 111, 1011, 10010, 11101, 101111, 1001100, 1111011, 11000111, 101000010, 1000001001, 1101001011, 10101010100, 100010011111, 110111110011, 1011010010010, 10010010000101, 11101100010111, 101111110011100, 1001101010110011, 1111101001001111
Offset: 0
Programs
-
Magma
[Seqint(Intseq(Lucas(n), 2)): n in [0..30]];
-
Mathematica
Table[FromDigits[IntegerDigits[LucasL[n], 2]], {n, 0, 30}]