A001519.wxm

/* [wxMaxima batch file version 1] [ DO NOT EDIT BY HAND! ]*/
/* [ Created with wxMaxima version 12.04.0 ] */

/* [wxMaxima: input   start ] */
a[0]:1$ a[1]:1$ a[n]:=3*a[n-1]-a[n-2]$ A001519(n):=a[n]$ makelist(A001519(n),n,0,30);
/* [wxMaxima: input   end   ] */

/* Maxima can't load/batch files which end with a comment! */
"Created with wxMaxima"$