In=function(x){(a^0.5/(2*pi*b^2)^0.5)*exp((-(x-c)^2*a)/2*b^2-x^2)}为一个函数，其中a、b、c等都是参数，现在想要对这个函数进行积分，积分上下限分别为正负无穷大，且结果中包含a、b、c等参数，请问R中怎么实现呢？谢谢了！