Guest User

Untitled

a guest
Nov 21st, 2017
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.12 KB | None | 0 0
  1. f[a_, b_, r_] = -a/r^2 - b/r^3
  2. Plot[{f[1, 1, r], f[-1, -1, r], f[0, 1, r]}, {r, 1, 10},PlotLegends->{"1,1","-1,1","0,1"}]
Add Comment
Please, Sign In to add comment