login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A004689 Fibonacci numbers written in base 6. 2
0, 1, 1, 2, 3, 5, 12, 21, 33, 54, 131, 225, 400, 1025, 1425, 2454, 4323, 11221, 15544, 31205, 51153, 122402, 213555, 340401, 554400, 1335201, 2334001, 4113202, 10451203, 15004405, 25500012, 44504421, 114404433 (list; graph; refs; listen; history; text; internal format)
OFFSET

0,4

LINKS

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

MATHEMATICA

bf[n_, k_]:=Module[{s=ToString[BaseForm[n, k]]}, ToExpression[StringDrop[s, {Part[StringPosition[s, "\n"], 1, 1], -1}]]] lst={}; Do[f=bf[Fibonacci[n], 6]; AppendTo[lst, f], {n, 0, 4*4!}]; lst (* Vladimir Joseph Stephan Orlovsky, Jun 17 2009 *)

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

PROG

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

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

CROSSREFS

Cf. A000045 (Fibonacci), A007092 (numbers in base 6).

Sequence in context: A064688 A089891 A282237 * A183364 A124370 A003428

Adjacent sequences:  A004686 A004687 A004688 * A004690 A004691 A004692

KEYWORD

nonn,base,easy

AUTHOR

N. J. A. Sloane

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 17 14:47 EDT 2019. Contains 328114 sequences. (Running on oeis4.)