OFFSET
1,3
PROG
(PARI) al(n)=local(v=vector(n)); v[1]=v[2]=1; v[3]=v[4]=2; for(i=5, n, v[i]=v[i-1]*v[i-2]-v[i-3]*v[i-4]); v
(Magma) I:=[1, 1, 2, 2]; [n le 4 select I[n] else Self(n-1)*Self(n-2)-Self(n-3)*Self(n-4): n in [1..16]]; // Vincenzo Librandi, Mar 30 2014
CROSSREFS
KEYWORD
nonn
AUTHOR
Franklin T. Adams-Watters, Mar 29 2014
STATUS
approved