Ttdfjt

Can the DM override racial traits?

Derivation tree not rendering

Did God make two great lights or did He make the great light two?

Windows 10: How to Lock (not sleep) laptop on lid close?

How should I replace vector<uint8_t>::const_iterator in an API?

Can smartphones with the same camera sensor have different image quality?

When did F become S in typeography, and why?

What's the point in a preamp?

Word for: a synonym with a positive connotation?

Does Parliament hold absolute power in the UK?

Is there a writing software that you can sort scenes like slides in PowerPoint?

First use of “packing” as in carrying a gun

How to copy the contents of all files with a certain name into a new file?

Is this wall load bearing? Blueprints and photos attached

Typeface like Times New Roman but with "tied" percent sign

Why did all the guest students take carriages to the Yule Ball?

Working through the single responsibility principle (SRP) in Python when calls are expensive

Segmentation fault output is suppressed when piping stdin into a function. Why?

How to delete random line from file using Unix command?

Can the prologue be the backstory of your main character?

Semisimplicity of the category of coherent sheaves?

What was the last x86 CPU that did not have the x87 floating-point unit built in?

Can a novice safely splice in wire to lengthen 5V charging cable?

How to split my screen on my Macbook Air?

Finding the area between two curves with Integrate

3

$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 2 days ago

m_goldberg

88.6k873200

asked 2 days ago

RyanRyan

161

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
  2 days ago
  

  
  
  
  

add a comment | 

3

$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 2 days ago

m_goldberg

88.6k873200

asked 2 days ago

RyanRyan

161

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
  2 days 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 2 days ago

m_goldberg

88.6k873200

asked 2 days ago

RyanRyan

161

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 2 days ago

m_goldberg

88.6k873200

asked 2 days ago

RyanRyan

161

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 2 days ago

m_goldberg

88.6k873200

asked 2 days ago

RyanRyan

161

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 2 days ago

m_goldberg

88.6k873200

edited 2 days ago

m_goldberg

88.6k873200

asked 2 days ago

RyanRyan

161

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 2 days ago

RyanRyan

161

3 Answers
3

active

oldest

votes

4

$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 2 days ago

answered 2 days ago

Michael E2Michael E2

150k12203482

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  RealAbs is awesome to know about! :O
  $endgroup$
  – Kagaratsch
  2 days ago
  

  
  
  
  

add a comment | 

2

$begingroup$

You need to add assumptions, like this

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

share|improve this answer

answered 2 days 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 2 days ago

KagaratschKagaratsch

4,83831348

$endgroup$

add a comment | 

Your Answer

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

4

$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 2 days ago

answered 2 days ago

Michael E2Michael E2

150k12203482

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  RealAbs is awesome to know about! :O
  $endgroup$
  – Kagaratsch
  2 days ago
  

  
  
  
  

add a comment | 

4

$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 2 days ago

answered 2 days ago

Michael E2Michael E2

150k12203482

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  RealAbs is awesome to know about! :O
  $endgroup$
  – Kagaratsch
  2 days 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 2 days ago

answered 2 days 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 2 days ago

answered 2 days ago

Michael E2Michael E2

150k12203482

answered 2 days ago

Michael E2Michael E2

150k12203482

answered 2 days ago

Michael E2Michael E2

150k12203482

2

$begingroup$

You need to add assumptions, like this

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

share|improve this answer

answered 2 days ago

NasserNasser

58.7k490206

$endgroup$

add a comment | 

2

$begingroup$

You need to add assumptions, like this

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

share|improve this answer

answered 2 days 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 2 days ago

NasserNasser

58.7k490206

$endgroup$

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

share|improve this answer

answered 2 days ago

NasserNasser

58.7k490206

answered 2 days ago

NasserNasser

58.7k490206

answered 2 days 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 2 days 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 2 days 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 2 days 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 2 days ago

KagaratschKagaratsch

4,83831348

answered 2 days ago

KagaratschKagaratsch

4,83831348

answered 2 days ago

KagaratschKagaratsch

4,83831348