A004692 Fibonacci numbers written in base 9.
0, 1, 1, 2, 3, 5, 8, 14, 23, 37, 61, 108, 170, 278, 458, 747, 1316, 2164, 3481, 5655, 10246, 16012, 26258, 43271, 70540, 123821, 204461, 328382, 533853, 863345, 1507308, 2471654, 4080063, 6561727, 11651801, 18323628, 31075530, 50410258, 81485788
Offset: 0
Links
- Vincenzo Librandi, Table of n, a(n) for n = 0..1000
Programs
-
Magma
[Seqint(Intseq(Fibonacci(n),9)): n in[0 .. 45]]; // Vincenzo Librandi, Sep 23 2017
-
Mathematica
FromDigits[IntegerDigits[#, 9]] & / @ Fibonacci[Range[0, 40]] (* Vincenzo Librandi, Jun 08 2013 *)
-
PARI
vector(50, n, n--; fromdigits(digits(fibonacci(n), 9))) \\ G. C. Greubel, Oct 09 2018