So I'm basically trying to plot a table that has multiple versions of (x^4)+(cx^2)+x, with c being an integer.
I've gotten the expressions to all be graphed, however I can't seem to have the legend show all the expressions and their matching linestyle. It's currently only showing 8 out of the 13. Here's what I have
f[x_] := x^4 + x
g[x_] := x^2
Plot[y = f[x], {x, -2, 2}, PlotStyle -> Black]
tSet = Table[f[x] + c*g[x], {c, -4, 8}]
Plot[Evaluate@tSet, {x, -2, 2}, PlotTheme -> "Monochrome",
PlotLegends -> "Expressions"]
Here is the table
{x - 4 x^2 + x^4, x - 3 x^2 + x^4, x - 2 x^2 + x^4, x - x^2 + x^4,
x + x^4, x + x^2 + x^4, x + 2 x^2 + x^4, x + 3 x^2 + x^4,
x + 4 x^2 + x^4, x + 5 x^2 + x^4, x + 6 x^2 + x^4, x + 7 x^2 + x^4,
x + 8 x^2 + x^4}
By the way, I'm using PlotTheme -> "Monochrome" because I need to print in black and white!
Any help would be lovely :)
Plot[{x, x + 1, x + 2}, {x, -3, 3}, PlotStyle -> {Red, Blue, Red}, PlotLegends -> "Expressions"]
$\endgroup$