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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A084346 Triangle read by rows in which row n gives decomposition of Fib(n)*Fib(n+1) into non-adjacent Fibonacci numbers (given by their indices). 0
2, 3, 5, 2, 7, 3, 9, 5, 2, 11, 7, 3, 13, 9, 5, 2, 15, 11, 7, 3, 17, 13, 9, 5, 2, 19, 15, 11, 7, 3, 21, 17, 13, 9, 5, 2, 23, 19, 15, 11, 7, 3, 25, 21, 17, 13, 9, 5, 2, 27, 23, 19, 15, 11, 7, 3, 29, 25, 21, 17, 13, 9, 5, 2, 31, 27, 23, 19, 15, 11, 7, 3, 33, 29, 25, 21, 17, 13, 9, 5, 2, 35, 31 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Read as 2; 3; 5,2; 7,3; 9,5,2; 11,7,3; 13,9,5,2; 15,11,7,3; ... each column is 2,3,5,7,9,11,.. but a new column starts only every other row. Could be read as two interleaved triangular tables: 2, 5,2, 9,5,2, 13,9,5,2, 17,13,9,5,2, 21,17,13,9,5,2 and 3, 7,3, 11,7,3, 15,11,7,3, 19,15,11,7,3, 23,19,15,11,7,3

LINKS

Table of n, a(n) for n=1..83.

MATHEMATICA

revfibo[0]=0; revfibo[1]=2; revfibo[2]=3; revfibo[3]=4; revfibo[4]=4; revfibo[n_Integer] := Block[{z=Floor@Log[GoldenRatio, Sqrt[5.]n]}, Which[Fibonacci[z+1]<=n, z+1, Fibonacci[z]<=n, z, _, z-1]]; fibodecompose[n_Integer] := revfibo/@(Drop[ #, -1]-Rest[ # ]&[FixedPointList[ #-Fibonacci[revfibo[ # ]]&, n, SameTest->(#2<1&)]]); Table[fibodecompose[Fibonacci[k]Fibonacci[k+1]], {k, 1, 18}]

CROSSREFS

Cf. A001654, A077982, A035513.

Sequence in context: A178094 A122556 A175723 * A165911 A096062 A176195

Adjacent sequences:  A084343 A084344 A084345 * A084347 A084348 A084349

KEYWORD

nonn,tabf

AUTHOR

Wouter Meeussen, Jun 22 2003

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 | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified October 16 13:12 EDT 2018. Contains 316263 sequences. (Running on oeis4.)