Update intergral.R