A133021 Irregular triangle read by rows: row n lists divisors of n-th Fibonacci number A000045(n).
1, 1, 1, 2, 1, 3, 1, 5, 1, 2, 4, 8, 1, 13, 1, 3, 7, 21, 1, 2, 17, 34, 1, 5, 11, 55, 1, 89, 1, 2, 3, 4, 6, 8, 9, 12, 16, 18, 24, 36, 48, 72, 144, 1, 233, 1, 13, 29, 377, 1, 2, 5, 10, 61, 122, 305, 610, 1, 3, 7, 21, 47, 141, 329, 987, 1, 1597
Offset: 1
Examples
Triangle begins: [ 1 ], [ 1 ], [ 1, 2 ], [ 1, 3 ], [ 1, 5 ], [ 1, 2, 4, 8 ], [ 1, 13 ], [ 1, 3, 7, 21 ], [ 1, 2, 17, 34 ], [ 1, 5, 11, 55 ], [ 1, 89 ],
Links
Programs
-
Magma
/* As triangle */ [Divisors(Fibonacci(n)): n in [1..30]]; // Vincenzo Librandi, Nov 15 2024
-
Mathematica
Flatten[Table[Divisors[Fibonacci[n]], {n, 20}]] (* T. D. Noe, Mar 14 2014 *)