I have a 2 variables function as below:
m[n_] := 1.5 n^2
V[n_, r_] := (m[n]*m[n])/((r)^3)
On the range of r from 1 to 20 I want to make 30 plot (30 different colors) for each state n =1,2,3....up to 30. I can use the command Plot which is
Plot[{V[1, r], V[2, r], V[3, r], V[4, r]}, {r, 1, 20}]
by that I have to to 30 times V[n,r] which is doable in this case, but suppose I want n up to 1000, do you guys have any ideas for this case please.
Plot[Table[V[i, r], {i, 30}], {r, 1, 20}, Evaluated -> True]? If so we can mark this as already answered here: (1731) – Mr.Wizard Jul 24 '16 at 22:41