If your integration seems to be successfully completing and the problem seems to be that no plot appears then it is sometimes helpful to replace the
Plot[expression,{var,low,high}]
with
Table[expression,{var,low,high,(high-low)/10}]
and look at that result. If the result of that is anything other than a vector of real numbers then that perhaps explains why Plot does is not displaying a curve. Sometimes it takes more than ten points to show the problem. If you can't figure out how to fix it with that information then showing us what the table returned might let someone suggest what to try next.