Advertisement
Guest User

Untitled

a guest
Jun 26th, 2019
73
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.14 KB | None | 0 0
  1. f[0] = 1; f[1] = x;
  2. f[m_] := f[m] = Module[{fnp1, n = m - 1},
  3. fnp1 /. Solve[ D[f[n], x] == f[n - 1] +
  4. A*fnp1, fnp1][[1]]];
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement