# Need help to plot this function

res[x_] :=
2.8464*10^-11 x /{((x/34.5) -
10^-14) ((1 - (60/x)^2)^0.5 /(64 Pi x^2) +
2 (1 + 0.5 (1 -
2 (x/80.4)^2))*80.4^4 (1 - (80.4/
x)^2)^0.5/(8 Pi x^2 ((4 x^2 - 60^2)^2 + 60^2 125^2)) +
2 (1 + 0.5 (1 -
2 (x/91)^2))*91^4 (1 - (91/
x)^2)^0.5/(16 Pi x^2 ((4 x^2 - 60^2)^2 +
60^2 125^2)) +
992.255 (1 - (120/x)^2)^(3/2) /((4 x^2 - 60^2)^2 +
60^2 125^2))}


This is my function and it should be plotted in the range

LogLogPlot[res[x], {x, 10^0, 10^3},
PlotRange -> {{10^0, 10^3}, {10^-5, 10^2}}]


But i am getting a Partial part of my required graph But should be like

• Your function has an imaginary component in a range of values for x. – b.gates.you.know.what May 15 at 21:11
• I think you should recheck your function... for starters there is a List in there for some reason, for seconders, it doesn't seem to return real numbers for the whole range you are plotting. – chuy May 15 at 21:12