Re: numerical integration
- To: mathgroup at smc.vnet.net
- Subject: [mg40584] Re: numerical integration
- From: "Bill Bertram" <wkb at ansto.gov.au>
- Date: Thu, 10 Apr 2003 03:42:44 -0400 (EDT)
- Organization: Australian Nuclear Science and Technology Organisation
- References: <b70ntk$9jb$1@smc.vnet.net>
- Sender: owner-wri-mathgroup at wolfram.com
"C B" <cbhat at purdue.edu> wrote in message news:b70ntk$9jb$1 at smc.vnet.net... > I have data which looks like .. > > data = {{0,4.308115176},{180,11.83807029},{320,9.819597477},{380, > 9.003587475},{420,9.646700866},{540,9.003587475},{660, > 8.601966768},{720,8.090496405},{780,7.49290292},{900,7.536283436},{1020,7.08 > 6922454},{1080,6.876137912},{1140, > 6.580371983},[1200,6.430040607},{1320,6.300111915},{1380, > 6.077755024},{1500,6.101258682},{1680,5.96360292},{1800,5.821356082}} > > > X value is time (sec) > Y value is gas readings > I could plot the XY plot but I need to get area under the curve. For that I > tried > <<NumericalMath`NIntegrateInterpolatingFunct` > Interpolation > NIntegrateInterpolatingFunction > > But I am just not being able to figure out the exact sytax. Does anyone have > any experience with this kind of problem? Yes, first load the package NumericalMath`NIntegrateInterpolatingFunct` Then, func = Interpolation[data] x0 = data[[1,1]] x1 = Last[data][[1]] NIntegrateInterpolatingFunction[func[x],{x,x0,x1}] and thats all! Cheers, Bill