Hfrhyu

Why would the Red Woman birth a shadow if she worshipped the Lord of the Light?

What type of content (depth/breadth) is expected for a short presentation for Asst Professor interview in the UK?

Forming a German sentence with/without the verb at the end

Why doesn't using multiple commands with a || or && conditional work?

Unlock My Phone! February 2018

How can I deal with my CEO asking me to hire someone with a higher salary than me, a co-founder?

How would I stat a creature to be immune to everything but the Magic Missile spell? (just for fun)

How can saying a song's name be a copyright violation?

CAST throwing error when run in stored procedure but not when run as raw query

Why can't we play rap on piano?

Why didn't Boeing produce its own regional jet?

Is it logically or scientifically possible to artificially send energy to the body?

Plagiarism or not?

Can we compute the area of a quadrilateral with one right angle when we only know the lengths of any three sides?

Apex Framework / library for consuming REST services

Valid term from quadratic sequence?

Expand and Contract

Is there an expression that means doing something right before you will need it rather than doing it in case you might need it?

Why was the shrinking from 8″ made only to 5.25″ and not smaller (4″ or less)?

Can mass be shunted off into hyperspace, but the matter remains?

What method can I use to design a dungeon difficult enough that the PCs can't make it through without killing them?

Can my sorcerer use a spellbook only to collect spells and scribe scrolls, not cast?

How to compactly explain secondary and tertiary characters without resorting to stereotypes?

How much of data wrangling is a data scientist's job?

Vector calculus integration identity problem

$LaTeX$ format copy problemNumerical-Symbolical Integration (Calculus)Is it possible to do vector calculus in Mathematica?Dipolar magnetic field lines inside a cylinderComparing unit normal definition in calculus with FrenetSerretSystemNon-Newtonian calculusSymbolic representation of vector functionmatrix calculus with types (similar to matrixcalculus.org)How do I verify a vector identity using Mathematica?Einstein summation convention for symbolic vector calculusVector calculus with index notation

5

$begingroup$

This is a follow up from another post. I was using the integration symbols available in the Basic Math Assistant palette.

I am new to vector calculus operations. There is a known identity found in my textbook.

$$qquad int _4 pi hats (hatscdot A) d omega=frac4 pi3A$$

I have no idea how to do this type of integration. This is what I tried, but it returns a disaster:

Integrate[s*(Dot[s, A]), s, 0, 4 π]

Also without success:

Integrate[Sin[θ], Cos[θ]*(Dot[Sin[θ], Cos[θ], a1, a2]), θ, 0, 4 π]

It is obvious that I am doing something fundamentally not correct. I go to the documentation on Vector Calculus, but it does not offer much in substance or examples. How do you enter the integral expression shown above in order to return the identity in the right?

Update

In response to comments, here is a copy of the text. This is from page 10 of Optical-Thermal Response of Laser-Irradiated Tissue.

$omega$ is the surface area of a sphere in steradians. $hat s$ is the directional vector of a pencil of radiation located inside the sphere

symbolic vector-calculus

share|improve this question

edited 2 days ago

J. M. is slightly pensive♦

99k10311467

asked 2 days ago

Jose Enrique CalderonJose Enrique Calderon

1,073719

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  What are $s$ and $omega$ supposed to be? It might be helpful if you can give an example of the textbook with the formula.
  $endgroup$
  – J. M. is slightly pensive♦
  2 days ago
  

  
  
  
  


• 
  
  
  

  
  2
  

  
  
  
  
  
  

  
  $begingroup$
  Here's my guess: With[s = x, y, z, A = A1, A2, A3, Integrate[s (s.A), s [Element] Sphere[]] ] --- or this: With[s = x, y, z, A = A1, A2, A3, Integrate[s (s.A), s [Element] Sphere[]] == 4 Pi/3 A ]
  $endgroup$
  – Michael E2
  2 days ago
  
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  @Michael, yes, that does seem to be it. This is why people should always define what their variables mean in their formulae.
  $endgroup$
  – J. M. is slightly pensive♦
  2 days ago
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  @Michael E2 please post it as an answear for upvote
  $endgroup$
  – Jose Enrique Calderon
  2 days ago
  
  

  
  
  
  


• 
  
  
  

  
  2
  

  
  
  
  
  
  

  
  $begingroup$
  I've never seen this author's notation. My guess is that $int_4picdots$ means the integral over the sphere of measure $4pi$, i.e., the unit sphere.
  $endgroup$
  – Michael E2
  2 days ago
  
  

  
  
  
  

 | 
show 3 more comments

5

$begingroup$

This is a follow up from another post. I was using the integration symbols available in the Basic Math Assistant palette.

I am new to vector calculus operations. There is a known identity found in my textbook.

$$qquad int _4 pi hats (hatscdot A) d omega=frac4 pi3A$$

I have no idea how to do this type of integration. This is what I tried, but it returns a disaster:

Integrate[s*(Dot[s, A]), s, 0, 4 π]

Also without success:

Integrate[Sin[θ], Cos[θ]*(Dot[Sin[θ], Cos[θ], a1, a2]), θ, 0, 4 π]

It is obvious that I am doing something fundamentally not correct. I go to the documentation on Vector Calculus, but it does not offer much in substance or examples. How do you enter the integral expression shown above in order to return the identity in the right?

Update

In response to comments, here is a copy of the text. This is from page 10 of Optical-Thermal Response of Laser-Irradiated Tissue.

$omega$ is the surface area of a sphere in steradians. $hat s$ is the directional vector of a pencil of radiation located inside the sphere

symbolic vector-calculus

share|improve this question

edited 2 days ago

J. M. is slightly pensive♦

99k10311467

asked 2 days ago

Jose Enrique CalderonJose Enrique Calderon

1,073719

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  What are $s$ and $omega$ supposed to be? It might be helpful if you can give an example of the textbook with the formula.
  $endgroup$
  – J. M. is slightly pensive♦
  2 days ago
  

  
  
  
  


• 
  
  
  

  
  2
  

  
  
  
  
  
  

  
  $begingroup$
  Here's my guess: With[s = x, y, z, A = A1, A2, A3, Integrate[s (s.A), s [Element] Sphere[]] ] --- or this: With[s = x, y, z, A = A1, A2, A3, Integrate[s (s.A), s [Element] Sphere[]] == 4 Pi/3 A ]
  $endgroup$
  – Michael E2
  2 days ago
  
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  @Michael, yes, that does seem to be it. This is why people should always define what their variables mean in their formulae.
  $endgroup$
  – J. M. is slightly pensive♦
  2 days ago
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  @Michael E2 please post it as an answear for upvote
  $endgroup$
  – Jose Enrique Calderon
  2 days ago
  
  

  
  
  
  


• 
  
  
  

  
  2
  

  
  
  
  
  
  

  
  $begingroup$
  I've never seen this author's notation. My guess is that $int_4picdots$ means the integral over the sphere of measure $4pi$, i.e., the unit sphere.
  $endgroup$
  – Michael E2
  2 days ago
  
  

  
  
  
  

 | 
show 3 more comments

$begingroup$

This is a follow up from another post. I was using the integration symbols available in the Basic Math Assistant palette.

I am new to vector calculus operations. There is a known identity found in my textbook.

$$qquad int _4 pi hats (hatscdot A) d omega=frac4 pi3A$$

I have no idea how to do this type of integration. This is what I tried, but it returns a disaster:

Integrate[s*(Dot[s, A]), s, 0, 4 π]

Also without success:

Integrate[Sin[θ], Cos[θ]*(Dot[Sin[θ], Cos[θ], a1, a2]), θ, 0, 4 π]

It is obvious that I am doing something fundamentally not correct. I go to the documentation on Vector Calculus, but it does not offer much in substance or examples. How do you enter the integral expression shown above in order to return the identity in the right?

Update

In response to comments, here is a copy of the text. This is from page 10 of Optical-Thermal Response of Laser-Irradiated Tissue.

$omega$ is the surface area of a sphere in steradians. $hat s$ is the directional vector of a pencil of radiation located inside the sphere

symbolic vector-calculus

share|improve this question

edited 2 days ago

J. M. is slightly pensive♦

99k10311467

asked 2 days ago

Jose Enrique CalderonJose Enrique Calderon

1,073719

$endgroup$

Integrate[s*(Dot[s, A]), s, 0, 4 π]

Integrate[Sin[θ], Cos[θ]*(Dot[Sin[θ], Cos[θ], a1, a2]), θ, 0, 4 π]

share|improve this question

edited 2 days ago

J. M. is slightly pensive♦

99k10311467

asked 2 days ago

Jose Enrique CalderonJose Enrique Calderon

1,073719

share|improve this question

edited 2 days ago

J. M. is slightly pensive♦

99k10311467

asked 2 days ago

Jose Enrique CalderonJose Enrique Calderon

1,073719

edited 2 days ago

J. M. is slightly pensive♦

99k10311467

edited 2 days ago

J. M. is slightly pensive♦

99k10311467

asked 2 days ago

Jose Enrique CalderonJose Enrique Calderon

1,073719

asked 2 days ago

Jose Enrique CalderonJose Enrique Calderon

1,073719

1 Answer
1

active

oldest

votes

5

$begingroup$

Here's my guess:

With[s = x, y, z,
 A = A1, A2, A3, Integrate[s (s.A), s ∈ Sphere[]] ] 
(* (4 A1 π)/3, (4 A2 π)/3, (4 A3 π)/3 *)

--- or this:

With[s = x, y, z, A = A1, A2, A3,
 Integrate[s (s.A), s ∈ Sphere[]] == 4 Pi/3 A ]
(* True *)

share|improve this answer

answered 2 days ago

Michael E2Michael E2

150k12203482

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  Why it simply does not work with limits of integration s,0,4Pi
  $endgroup$
  – Jose Enrique Calderon
  2 days ago
  

  
  
  
  


• 
  
  
  

  
  3
  

  
  
  
  
  
  

  
  $begingroup$
  @Jose, the author was being lazy with the limits (basically, shorter than saying "integrate over the whole area of the unit sphere"). It is fine to be lazy in mathematics, but not so much when programming.
  $endgroup$
  – J. M. is slightly pensive♦
  2 days ago
  
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  @J.M. is slightly pensive Ok.. but why Mathematica function proposed in the answear does not work with With[s = x, y, z, A = A1, A2, A3, Integrate[s (s.A), s,0,4Pi] ]
  $endgroup$
  – Jose Enrique Calderon
  2 days ago
  
  

  
  
  
  


• 
  
  
  

  
  2
  

  
  
  
  
  
  

  
  $begingroup$
  @Jose The syntax s, 0, 4 Pi already implies one-dimensional s from Mathematica's view, while in the "abuse of notation" used in your reference, $hats$ is implied to be a vector.
  $endgroup$
  – J. M. is slightly pensive♦
  2 days ago
  
  

  
  
  
  


• 
  
  
  

  
  3
  

  
  
  
  
  
  

  
  $begingroup$
  @Jose: the easiest way is that you have to switch to spherical coordinates if you need to integrate across arbitrary angles. If you insist on keeping yourself to regions, you can use RegionIntersection[] with Sphere[] and either ConicHullRegion[] or HalfSpace[].
  $endgroup$
  – J. M. is slightly pensive♦
  2 days ago
  

  
  
  
  

 | 
show 2 more comments

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
);



);

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%2f194347%2fvector-calculus-integration-identity-problem%23new-answer', 'question_page');

);

Post as a guest

Name

Email

Required, but never shown

5

$begingroup$

Here's my guess:

With[s = x, y, z,
 A = A1, A2, A3, Integrate[s (s.A), s ∈ Sphere[]] ] 
(* (4 A1 π)/3, (4 A2 π)/3, (4 A3 π)/3 *)

--- or this:

With[s = x, y, z, A = A1, A2, A3,
 Integrate[s (s.A), s ∈ Sphere[]] == 4 Pi/3 A ]
(* True *)

share|improve this answer

answered 2 days ago

Michael E2Michael E2

150k12203482

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  Why it simply does not work with limits of integration s,0,4Pi
  $endgroup$
  – Jose Enrique Calderon
  2 days ago
  

  
  
  
  


• 
  
  
  

  
  3
  

  
  
  
  
  
  

  
  $begingroup$
  @Jose, the author was being lazy with the limits (basically, shorter than saying "integrate over the whole area of the unit sphere"). It is fine to be lazy in mathematics, but not so much when programming.
  $endgroup$
  – J. M. is slightly pensive♦
  2 days ago
  
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  @J.M. is slightly pensive Ok.. but why Mathematica function proposed in the answear does not work with With[s = x, y, z, A = A1, A2, A3, Integrate[s (s.A), s,0,4Pi] ]
  $endgroup$
  – Jose Enrique Calderon
  2 days ago
  
  

  
  
  
  


• 
  
  
  

  
  2
  

  
  
  
  
  
  

  
  $begingroup$
  @Jose The syntax s, 0, 4 Pi already implies one-dimensional s from Mathematica's view, while in the "abuse of notation" used in your reference, $hats$ is implied to be a vector.
  $endgroup$
  – J. M. is slightly pensive♦
  2 days ago
  
  

  
  
  
  


• 
  
  
  

  
  3
  

  
  
  
  
  
  

  
  $begingroup$
  @Jose: the easiest way is that you have to switch to spherical coordinates if you need to integrate across arbitrary angles. If you insist on keeping yourself to regions, you can use RegionIntersection[] with Sphere[] and either ConicHullRegion[] or HalfSpace[].
  $endgroup$
  – J. M. is slightly pensive♦
  2 days ago
  

  
  
  
  

 | 
show 2 more comments

5

$begingroup$

Here's my guess:

With[s = x, y, z,
 A = A1, A2, A3, Integrate[s (s.A), s ∈ Sphere[]] ] 
(* (4 A1 π)/3, (4 A2 π)/3, (4 A3 π)/3 *)

--- or this:

With[s = x, y, z, A = A1, A2, A3,
 Integrate[s (s.A), s ∈ Sphere[]] == 4 Pi/3 A ]
(* True *)

share|improve this answer

answered 2 days ago

Michael E2Michael E2

150k12203482

$endgroup$

• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  Why it simply does not work with limits of integration s,0,4Pi
  $endgroup$
  – Jose Enrique Calderon
  2 days ago
  

  
  
  
  


• 
  
  
  

  
  3
  

  
  
  
  
  
  

  
  $begingroup$
  @Jose, the author was being lazy with the limits (basically, shorter than saying "integrate over the whole area of the unit sphere"). It is fine to be lazy in mathematics, but not so much when programming.
  $endgroup$
  – J. M. is slightly pensive♦
  2 days ago
  
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  $begingroup$
  @J.M. is slightly pensive Ok.. but why Mathematica function proposed in the answear does not work with With[s = x, y, z, A = A1, A2, A3, Integrate[s (s.A), s,0,4Pi] ]
  $endgroup$
  – Jose Enrique Calderon
  2 days ago
  
  

  
  
  
  


• 
  
  
  

  
  2
  

  
  
  
  
  
  

  
  $begingroup$
  @Jose The syntax s, 0, 4 Pi already implies one-dimensional s from Mathematica's view, while in the "abuse of notation" used in your reference, $hats$ is implied to be a vector.
  $endgroup$
  – J. M. is slightly pensive♦
  2 days ago
  
  

  
  
  
  


• 
  
  
  

  
  3
  

  
  
  
  
  
  

  
  $begingroup$
  @Jose: the easiest way is that you have to switch to spherical coordinates if you need to integrate across arbitrary angles. If you insist on keeping yourself to regions, you can use RegionIntersection[] with Sphere[] and either ConicHullRegion[] or HalfSpace[].
  $endgroup$
  – J. M. is slightly pensive♦
  2 days ago
  

  
  
  
  

 | 
show 2 more comments

$begingroup$

Here's my guess:

With[s = x, y, z,
 A = A1, A2, A3, Integrate[s (s.A), s ∈ Sphere[]] ] 
(* (4 A1 π)/3, (4 A2 π)/3, (4 A3 π)/3 *)

--- or this:

With[s = x, y, z, A = A1, A2, A3,
 Integrate[s (s.A), s ∈ Sphere[]] == 4 Pi/3 A ]
(* True *)

share|improve this answer

answered 2 days ago

Michael E2Michael E2

150k12203482

$endgroup$

With[s = x, y, z,
 A = A1, A2, A3, Integrate[s (s.A), s ∈ Sphere[]] ] 
(* (4 A1 π)/3, (4 A2 π)/3, (4 A3 π)/3 *)

With[s = x, y, z, A = A1, A2, A3,
 Integrate[s (s.A), s ∈ Sphere[]] == 4 Pi/3 A ]
(* True *)

share|improve this answer

answered 2 days ago

Michael E2Michael E2

150k12203482

answered 2 days ago

Michael E2Michael E2

150k12203482

answered 2 days ago

Michael E2Michael E2

150k12203482