Message Boards Message Boards

Get area under curve?

GROUPS:

Hello, im new in Mathematica and i do not know how to do it very well, Im studying thermodynamics and i need to create a equation that give me the area under curve i have the coordinates:

5.6489268459732293 e + 003*x^0 +1.5840388646726304 e + 004*x^1 +1.8411479431773834 e + 004*x^2 +1.1346125105186486 e + 004*x^3 +3.9100547469412686 e + 003*x^4 +7.1432694208139674 e + 002*x^5 +5.4027518253964281 e + 001*x^6]

Also I have the limits Lows -1.70 and Sup -2.99 I will aprecciate your help. Thanks.

POSTED BY: Bryan Badillo
Answer
2 months ago
  f[x_] := 5.6489268459732293*10^3*x^0 + 1.5840388646726304*10^4*x^1 + 
    1.8411479431773834*10^4*x^2 + 1.1346125105186486*10^4*x^3 + 
    3.9100547469412686*10^3*x^4 + 7.1432694208139674*10^2*x^5 + 
    5.4027518253964281*10^1*x^6

 Plot[f[x], {x, -2.99, -1.7}, PlotRange -> {Automatic, {0, 6}}, 
 Filling -> Bottom, PlotLabels -> {"f[x]"}]

enter image description here

  AREA = NIntegrate[f[x], {x, -2.99, -1.7}]
  (* 5.79828 *)
POSTED BY: Mariusz Iwaniuk
Answer
2 months ago

Group Abstract Group Abstract