Yhyjyk

Pokemon Turn Based battle (Python)

What do these terms in Caesar's Gallic Wars mean?

Finding the area between two curves with Integrate

Why couldn't they take pictures of a closer black hole?

What is this business jet?

Will it cause any balance problems to have PCs level up and gain the benefits of a long rest mid-fight?

Why not take a picture of a closer black hole?

What do hard-Brexiteers want with respect to the Irish border?

Inverse Relationship Between Precision and Recall

If my opponent casts Ultimate Price on my Phantasmal Bear, can I save it by casting Snap or Curfew?

Likelihood that a superbug or lethal virus could come from a landfill

Is it a good practice to use a static variable in a Test Class and use that in the actual class instead of Test.isRunningTest()?

Why doesn't UInt have a toDouble()?

Can you cast a spell on someone in the Ethereal Plane, if you are on the Material Plane and have the True Seeing spell active?

How do you keep chess fun when your opponent constantly beats you?

Mathematics of imaging the black hole

Why was M87 targeted for the Event Horizon Telescope instead of Sagittarius A*?

Can I have a signal generator on while it's not connected?

How much of the clove should I use when using big garlic heads?

Can there be female White Walkers?

What is the meaning of Triage in Cybersec world?

Why can't devices on different VLANs, but on the same subnet, communicate?

Geography at the pixel level

Accepted by European university, rejected by all American ones I applied to? Possible reasons?

Finding the area between two curves with Integrate

2

$begingroup$

I'm trying to solve and approximate the area between the two graphs. Right now, my functions are stored as

f[x_] := 3 Sin[x]
g[x_] := x - 1

and then I tried to integrate by evaluating

Integrate[Abs[f[x] - g[x]], x]

Instead of getting an answer, I just get the exact same thing I inputted

Integrate[Abs[f[x] - g[x]], x]

How do I fix this?

calculus-and-analysis

share|improve this question

edited 18 mins ago

m_goldberg

88.6k873200

asked 55 mins ago

RyanRyan

111

New contributor

Ryan is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  You can format inline code and code blocks by selecting the code and clicking the button above the edit window. The edit window help button ? is useful for learning how to format your questions and answers. You may also find this meta Q&A helpful
  $endgroup$
  – Michael E2
  36 mins ago
  

  
  
  
  

add a comment | 

2

$begingroup$

I'm trying to solve and approximate the area between the two graphs. Right now, my functions are stored as

f[x_] := 3 Sin[x]
g[x_] := x - 1

and then I tried to integrate by evaluating

Integrate[Abs[f[x] - g[x]], x]

Instead of getting an answer, I just get the exact same thing I inputted

Integrate[Abs[f[x] - g[x]], x]

How do I fix this?

calculus-and-analysis

share|improve this question

edited 18 mins ago

m_goldberg

88.6k873200

asked 55 mins ago

RyanRyan

111

New contributor

Ryan is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  You can format inline code and code blocks by selecting the code and clicking the button above the edit window. The edit window help button ? is useful for learning how to format your questions and answers. You may also find this meta Q&A helpful
  $endgroup$
  – Michael E2
  36 mins ago
  

  
  
  
  

add a comment | 

$begingroup$

I'm trying to solve and approximate the area between the two graphs. Right now, my functions are stored as

f[x_] := 3 Sin[x]
g[x_] := x - 1

and then I tried to integrate by evaluating

Integrate[Abs[f[x] - g[x]], x]

Instead of getting an answer, I just get the exact same thing I inputted

Integrate[Abs[f[x] - g[x]], x]

How do I fix this?

calculus-and-analysis

share|improve this question

edited 18 mins ago

m_goldberg

88.6k873200

asked 55 mins ago

RyanRyan

111

New contributor

Ryan is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

$endgroup$

f[x_] := 3 Sin[x]
g[x_] := x - 1

Integrate[Abs[f[x] - g[x]], x]

Integrate[Abs[f[x] - g[x]], x]

share|improve this question

edited 18 mins ago

m_goldberg

88.6k873200

asked 55 mins ago

RyanRyan

111

New contributor

Ryan is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

share|improve this question

edited 18 mins ago

m_goldberg

88.6k873200

asked 55 mins ago

RyanRyan

111

New contributor

Ryan is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

edited 18 mins ago

m_goldberg

88.6k873200

edited 18 mins ago

m_goldberg

88.6k873200

asked 55 mins ago

RyanRyan

111

New contributor

Ryan is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.

asked 55 mins ago

RyanRyan

111

3 Answers
3

active

oldest

votes

2

$begingroup$

Use Assumptions:

Integrate[Abs[f[x] - g[x]], x, Assumptions -> x [Element] Reals]

Or try RealAbs instead of Abs:

Integrate[RealAbs[f[x] - g[x]], x]

(They are equivalent antiderivatives.)

To get the area between the graphs, you need also to solve for the points of intersection.

area = Integrate[
 Abs[f[x] - g[x]], x, Sequence @@ MinMax[x /. Solve[f[x] == g[x], x, Reals]]]

The area is approximately:

N[area]
(* 5.57475 *)

share|improve this answer

edited 29 mins ago

answered 32 mins ago

Michael E2Michael E2

150k12203482

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  RealAbs is awesome to know about! :O
  $endgroup$
  – Kagaratsch
  32 mins ago
  

  
  
  
  

add a comment | 

1

$begingroup$

You need to add assumptions, like this

 Integrate[Abs[f[x] - g[x]], x, Assumptions :> Element[x, Reals]]

share|improve this answer

answered 33 mins ago

NasserNasser

58.7k490206

$endgroup$

add a comment | 

0

$begingroup$

Assuming your functions

f[x_] := 3 Sin[x] 
g[x_] := x - 1

are real valued, you can use square root of square to parametrize the absolute value. This then gives:

Integrate[Sqrt[(f[x] - g[x])^2], x]

(((-2 + x) x + 6 Cos[x]) Sqrt[(-1 + x - 3 Sin[x])^2])/(2 (-1 + x -
3 Sin[x]))

share|improve this answer

answered 34 mins ago

KagaratschKagaratsch

4,83831348

$endgroup$

add a comment | 

Your Answer

StackExchange.ifUsing("editor", function ()
return StackExchange.using("mathjaxEditing", function ()
StackExchange.MarkdownEditor.creationCallbacks.add(function (editor, postfix)
StackExchange.mathjaxEditing.prepareWmdForMathJax(editor, postfix, [["$", "$"], ["\\(","\\)"]]);
);
);
, "mathjax-editing");

StackExchange.ready(function()
var channelOptions =
tags: "".split(" "),
id: "387"
;
initTagRenderer("".split(" "), "".split(" "), channelOptions);

StackExchange.using("externalEditor", function()
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled)
StackExchange.using("snippets", function()
createEditor();
);

else
createEditor();

);

function createEditor()
StackExchange.prepareEditor(
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: false,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: null,
bindNavPrevention: true,
postfix: "",
imageUploader:
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
,
onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
);



);

Ryan is a new contributor. Be nice, and check out our Code of Conduct.

draft saved

draft discarded

Sign up or log in

StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);

Sign up using Google

Sign up using Facebook

Sign up using Email and Password

Post as a guest

Name

Email

Required, but never shown

StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f195049%2ffinding-the-area-between-two-curves-with-integrate%23new-answer', 'question_page');

);

Post as a guest

Name

Email

Required, but never shown

2

$begingroup$

Use Assumptions:

Integrate[Abs[f[x] - g[x]], x, Assumptions -> x [Element] Reals]

Or try RealAbs instead of Abs:

Integrate[RealAbs[f[x] - g[x]], x]

(They are equivalent antiderivatives.)

To get the area between the graphs, you need also to solve for the points of intersection.

area = Integrate[
 Abs[f[x] - g[x]], x, Sequence @@ MinMax[x /. Solve[f[x] == g[x], x, Reals]]]

The area is approximately:

N[area]
(* 5.57475 *)

share|improve this answer

edited 29 mins ago

answered 32 mins ago

Michael E2Michael E2

150k12203482

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  RealAbs is awesome to know about! :O
  $endgroup$
  – Kagaratsch
  32 mins ago
  

  
  
  
  

add a comment | 

2

$begingroup$

Use Assumptions:

Integrate[Abs[f[x] - g[x]], x, Assumptions -> x [Element] Reals]

Or try RealAbs instead of Abs:

Integrate[RealAbs[f[x] - g[x]], x]

(They are equivalent antiderivatives.)

To get the area between the graphs, you need also to solve for the points of intersection.

area = Integrate[
 Abs[f[x] - g[x]], x, Sequence @@ MinMax[x /. Solve[f[x] == g[x], x, Reals]]]

The area is approximately:

N[area]
(* 5.57475 *)

share|improve this answer

edited 29 mins ago

answered 32 mins ago

Michael E2Michael E2

150k12203482

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  RealAbs is awesome to know about! :O
  $endgroup$
  – Kagaratsch
  32 mins ago
  

  
  
  
  

add a comment | 

$begingroup$

Use Assumptions:

Integrate[Abs[f[x] - g[x]], x, Assumptions -> x [Element] Reals]

Or try RealAbs instead of Abs:

Integrate[RealAbs[f[x] - g[x]], x]

(They are equivalent antiderivatives.)

To get the area between the graphs, you need also to solve for the points of intersection.

area = Integrate[
 Abs[f[x] - g[x]], x, Sequence @@ MinMax[x /. Solve[f[x] == g[x], x, Reals]]]

The area is approximately:

N[area]
(* 5.57475 *)

share|improve this answer

edited 29 mins ago

answered 32 mins ago

Michael E2Michael E2

150k12203482

$endgroup$

Integrate[Abs[f[x] - g[x]], x, Assumptions -> x [Element] Reals]

Integrate[RealAbs[f[x] - g[x]], x]

area = Integrate[
 Abs[f[x] - g[x]], x, Sequence @@ MinMax[x /. Solve[f[x] == g[x], x, Reals]]]

N[area]
(* 5.57475 *)

share|improve this answer

edited 29 mins ago

answered 32 mins ago

Michael E2Michael E2

150k12203482

answered 32 mins ago

Michael E2Michael E2

150k12203482

answered 32 mins ago

Michael E2Michael E2

150k12203482

1

$begingroup$

You need to add assumptions, like this

 Integrate[Abs[f[x] - g[x]], x, Assumptions :> Element[x, Reals]]

share|improve this answer

answered 33 mins ago

NasserNasser

58.7k490206

$endgroup$

add a comment | 

1

$begingroup$

You need to add assumptions, like this

 Integrate[Abs[f[x] - g[x]], x, Assumptions :> Element[x, Reals]]

share|improve this answer

answered 33 mins ago

NasserNasser

58.7k490206

$endgroup$

add a comment | 

$begingroup$

You need to add assumptions, like this

 Integrate[Abs[f[x] - g[x]], x, Assumptions :> Element[x, Reals]]

share|improve this answer

answered 33 mins ago

NasserNasser

58.7k490206

$endgroup$

 Integrate[Abs[f[x] - g[x]], x, Assumptions :> Element[x, Reals]]

share|improve this answer

answered 33 mins ago

NasserNasser

58.7k490206

answered 33 mins ago

NasserNasser

58.7k490206

answered 33 mins ago

NasserNasser

58.7k490206

0

$begingroup$

Assuming your functions

f[x_] := 3 Sin[x] 
g[x_] := x - 1

are real valued, you can use square root of square to parametrize the absolute value. This then gives:

Integrate[Sqrt[(f[x] - g[x])^2], x]

(((-2 + x) x + 6 Cos[x]) Sqrt[(-1 + x - 3 Sin[x])^2])/(2 (-1 + x -
3 Sin[x]))

share|improve this answer

answered 34 mins ago

KagaratschKagaratsch

4,83831348

$endgroup$

add a comment | 

0

$begingroup$

Assuming your functions

f[x_] := 3 Sin[x] 
g[x_] := x - 1

are real valued, you can use square root of square to parametrize the absolute value. This then gives:

Integrate[Sqrt[(f[x] - g[x])^2], x]

(((-2 + x) x + 6 Cos[x]) Sqrt[(-1 + x - 3 Sin[x])^2])/(2 (-1 + x -
3 Sin[x]))

share|improve this answer

answered 34 mins ago

KagaratschKagaratsch

4,83831348

$endgroup$

add a comment | 

$begingroup$

Assuming your functions

f[x_] := 3 Sin[x] 
g[x_] := x - 1

are real valued, you can use square root of square to parametrize the absolute value. This then gives:

Integrate[Sqrt[(f[x] - g[x])^2], x]

(((-2 + x) x + 6 Cos[x]) Sqrt[(-1 + x - 3 Sin[x])^2])/(2 (-1 + x -
3 Sin[x]))

share|improve this answer

answered 34 mins ago

KagaratschKagaratsch

4,83831348

$endgroup$

f[x_] := 3 Sin[x] 
g[x_] := x - 1

Integrate[Sqrt[(f[x] - g[x])^2], x]

share|improve this answer

answered 34 mins ago

KagaratschKagaratsch

4,83831348

answered 34 mins ago

KagaratschKagaratsch

4,83831348

answered 34 mins ago

KagaratschKagaratsch

4,83831348