|
Search: id:A121814
|
|
|
| A121814 |
|
A 3 X 3 determinant based recursion. |
|
+0
1
|
|
| 0, 1, 1, -2, 0, 7, -335, 37595032, -53136308105121335327856, 150028625138472351236334849506272469590820016866180023237071134409583, -33769325655996877580610057388751394220309741077112581671609141979497418808859
(list; graph; listen)
|
|
|
OFFSET
|
1,4
|
|
|
COMMENT
|
This result based on the Folium of Descartes type determinant implicit equation: x^3+y^3-3*a*x*y=0
|
|
FORMULA
|
M = {{a[n - 3], a[n - 1], a[n - 2]}, {a[n - 1], a[n - 2], a[n - 3]}, {a[n - 2], a[n - 3], a[n - 1]}}; a(n) = Det[M]
|
|
MATHEMATICA
|
M = {{a[n - 3], a[n - 1], a[n - 2]}, {a[n - 1], a[n - 2], a[n - 3]}, {a[n - 2], a[n - 3], a[n - 1]}}; a[0] = 0; a[1] = 1; a[2] = 1; a[n_] := a[n] = Det[M] b = Table[a[n], {n, 0, 10}]
|
|
CROSSREFS
|
Sequence in context: A021485 A019821 A016631 this_sequence A047915 A010581 A011124
Adjacent sequences: A121811 A121812 A121813 this_sequence A121815 A121816 A121817
|
|
KEYWORD
|
sign,uned
|
|
AUTHOR
|
Roger Bagula (rlbagulatftn(AT)yahoo.com), Aug 30 2006
|
|
|
Search completed in 0.002 seconds
|
