User Portlet
| Discussions |
|---|
| Hi Lea Even shorter: Clear[c] c[1] = 1; c[2] = 7; c[n_] := c[n] = 8 + 2 c[n - 1] - c[n - 2] Table[c[k], {k, 1, 15}] |
User Portlet | Discussions |
|---|
| Hi Lea Even shorter: Clear[c] c[1] = 1; c[2] = 7; c[n_] := c[n] = 8 + 2 c[n - 1] - c[n - 2] Table[c[k], {k, 1, 15}] |