A004691 Fibonacci numbers written in base 8.

0, 1, 1, 2, 3, 5, 10, 15, 25, 42, 67, 131, 220, 351, 571, 1142, 1733, 3075, 5030, 10125, 15155, 25302, 42457, 67761, 132440, 222421, 355061, 577502, 1154563, 1754265, 3131050, 5105335, 10236405, 15343742

Offset: 0

Author

N. J. A. Sloane

Keywords

• nonn
• base
• easy

Links

• Vincenzo Librandi, Table of n, a(n) for n = 0..1000

Crossrefs

CF. A000045 (Fibonacci), A007094 (numbers in base 8).

Programs

Magma

[Seqint(Intseq(Fibonacci(n),8)): n in [0..50]]; // G. C. Greubel, Oct 09 2018

Mathematica

FromDigits[IntegerDigits[#, 8]] & / @ Fibonacci[Range[0, 40]] (* Vincenzo Librandi, Jun 08 2013 *)

PARI

vector(50, n, n--; fromdigits(digits(fibonacci(n), 8))) \\ G. C. Greubel, Oct 09 2018