Function integrate() in R provides abnormal output

Question

I am generating two distributions (say, mean1, sd1 and mean2, sd2), using convolution on them and then calculating the integral for the newly generated distribution from a g