Identify maximum difference in Matrix The 2019 Stack Overflow Developer Survey Results Are InParallelize matrix operationsChecking powers of a matrix for zerosHow to plot a graph from its incidence matrix?Finding maximum value with position from Table of valuesExtract Transfer Matrix from TransferFunctionModelGenerate a simulated covariance matrixChange entire column of matrix using its own elements for calculationsDetermine n related elements with least sum from a matrix?how to derive a conditional covariance matrix (symbolically)Approximate results
Multiply Two Integer Polynomials
Does the shape of a die affect the probability of a number being rolled?
What is the meaning of the verb "bear" in this context?
"as much details as you can remember"
Output the Arecibo Message
Why didn't the Event Horizon Telescope team mention Sagittarius A*?
Landlord wants to switch my lease to a "Land contract" to "get back at the city"
If a Druid sees an animal’s corpse, can they wild shape into that animal?
Pokemon Turn Based battle (Python)
Why isn't the circumferential light around the M87 black hole's event horizon symmetric?
Delete all lines which don't have n characters before delimiter
Right tool to dig six foot holes?
Can someone be penalized for an "unlawful" act if no penalty is specified?
Why not take a picture of a closer black hole?
Which Sci-Fi work first showed weapon of galactic-scale mass destruction?
Should I use my personal e-mail address, or my workplace one, when registering to external websites for work purposes?
How to save as into a customized destination on macOS?
What is the closest word meaning "respect for time / mindful"
What is the most effective way of iterating a std::vector and why?
What is the motivation for a law requiring 2 parties to consent for recording a conversation
Origin of "cooter" meaning "vagina"
Write faster on AT24C32
How to manage monthly salary
What do hard-Brexiteers want with respect to the Irish border?
Identify maximum difference in Matrix
The 2019 Stack Overflow Developer Survey Results Are InParallelize matrix operationsChecking powers of a matrix for zerosHow to plot a graph from its incidence matrix?Finding maximum value with position from Table of valuesExtract Transfer Matrix from TransferFunctionModelGenerate a simulated covariance matrixChange entire column of matrix using its own elements for calculationsDetermine n related elements with least sum from a matrix?how to derive a conditional covariance matrix (symbolically)Approximate results
$begingroup$
i am trying to find the Maximum difference between two matrices and identify where this maximum occurs.
I illustrate what I mean using an example.
Given
X=3, 1, 8, 2, 10, 3
Y=5, 1, 4, 2, 5, 3
I calculate matrix which has (X-Y) and position as entries, specifically
d=-2, 1, 4, 2, 5, 3
As out pout I would like to have
5,3
What is the best way to code this?
matrix column
edited Apr 5 at 9:16
Henrik Schumacher
59.7k582166
asked Apr 5 at 9:08
AndreasAndreas
1028
$endgroup$
add a comment |
$begingroup$
i am trying to find the Maximum difference between two matrices and identify where this maximum occurs.
I illustrate what I mean using an example.
Given
X=3, 1, 8, 2, 10, 3
Y=5, 1, 4, 2, 5, 3
I calculate matrix which has (X-Y) and position as entries, specifically
d=-2, 1, 4, 2, 5, 3
As out pout I would like to have
5,3
What is the best way to code this?
matrix column
edited Apr 5 at 9:16
Henrik Schumacher
59.7k582166
asked Apr 5 at 9:08
AndreasAndreas
1028
$endgroup$
1
$begingroup$
Ordering[Abs[X[[All, 1]] - X[[All, 2]]], -1][[1]]should give the the position3. The value of the difference can than be found easily.
$endgroup$
– Henrik Schumacher
Apr 5 at 9:18
add a comment |
$begingroup$
i am trying to find the Maximum difference between two matrices and identify where this maximum occurs.
I illustrate what I mean using an example.
Given
X=3, 1, 8, 2, 10, 3
Y=5, 1, 4, 2, 5, 3
I calculate matrix which has (X-Y) and position as entries, specifically
d=-2, 1, 4, 2, 5, 3
As out pout I would like to have
5,3
What is the best way to code this?
matrix column
edited Apr 5 at 9:16
Henrik Schumacher
59.7k582166
asked Apr 5 at 9:08
AndreasAndreas
1028
$endgroup$
i am trying to find the Maximum difference between two matrices and identify where this maximum occurs.
I illustrate what I mean using an example.
Given
X=3, 1, 8, 2, 10, 3
Y=5, 1, 4, 2, 5, 3
I calculate matrix which has (X-Y) and position as entries, specifically
d=-2, 1, 4, 2, 5, 3
As out pout I would like to have
5,3
What is the best way to code this?
matrix column
matrix column
edited Apr 5 at 9:16
Henrik Schumacher
59.7k582166
asked Apr 5 at 9:08
AndreasAndreas
1028
edited Apr 5 at 9:16
Henrik Schumacher
59.7k582166
asked Apr 5 at 9:08
AndreasAndreas
1028
edited Apr 5 at 9:16
Henrik Schumacher
59.7k582166
edited Apr 5 at 9:16
Henrik Schumacher
59.7k582166
edited Apr 5 at 9:16
Henrik Schumacher
59.7k582166
59.7k582166
asked Apr 5 at 9:08
AndreasAndreas
1028
asked Apr 5 at 9:08
AndreasAndreas
1028
asked Apr 5 at 9:08
AndreasAndreas
1028
1028
1
$begingroup$
Ordering[Abs[X[[All, 1]] - X[[All, 2]]], -1][[1]]should give the the position3. The value of the difference can than be found easily.
$endgroup$
– Henrik Schumacher
Apr 5 at 9:18
add a comment |
1
$begingroup$
Ordering[Abs[X[[All, 1]] - X[[All, 2]]], -1][[1]]should give the the position3. The value of the difference can than be found easily.
$endgroup$
– Henrik Schumacher
Apr 5 at 9:18
1
1
$begingroup$
Ordering[Abs[X[[All, 1]] - X[[All, 2]]], -1][[1]] should give the the position 3. The value of the difference can than be found easily.$endgroup$
– Henrik Schumacher
Apr 5 at 9:18
$begingroup$
Ordering[Abs[X[[All, 1]] - X[[All, 2]]], -1][[1]] should give the the position 3. The value of the difference can than be found easily.$endgroup$
– Henrik Schumacher
Apr 5 at 9:18
add a comment |
1 Answer
1
active
oldest
votes
$begingroup$
Depending on your taste,
d = MapThread[#1[[1]] - #2[[1]], #1[[2]] &, X, Y]
or
d = Transpose@X[[All, 1]] - Y[[All, 1]], X[[All, 2]]
define the differences d, if you need them. The symbol D is already in use in Mathematica, don't use it for variables.
Then you can compute
MaximalBy[d, Abs@*Last]
5, 3
As @HenrikSchumacher comments you don't really need the intermediate d though, and you don't need the second elements in each entry denoting their position: using Ordering is more elegant:
X = 3, 8, 10;
Y = 5, 4, 5;
j = First@Ordering[Abs[X - Y], -1]
3
(X - Y)[[j]]
5
answered Apr 5 at 9:24
RomanRoman
4,95511130
$endgroup$
$begingroup$
Thank you so much
$endgroup$
– Andreas
Apr 5 at 18:13
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
);
);
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
Required, but never shown
StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f194661%2fidentify-maximum-difference-in-matrix%23new-answer', 'question_page');
);
Post as a guest
Required, but never shown
1 Answer
1
active
oldest
votes
1 Answer
1
active
oldest
votes
active
oldest
votes
active
oldest
votes
$begingroup$
Depending on your taste,
d = MapThread[#1[[1]] - #2[[1]], #1[[2]] &, X, Y]
or
d = Transpose@X[[All, 1]] - Y[[All, 1]], X[[All, 2]]
define the differences d, if you need them. The symbol D is already in use in Mathematica, don't use it for variables.
Then you can compute
MaximalBy[d, Abs@*Last]
5, 3
As @HenrikSchumacher comments you don't really need the intermediate d though, and you don't need the second elements in each entry denoting their position: using Ordering is more elegant:
X = 3, 8, 10;
Y = 5, 4, 5;
j = First@Ordering[Abs[X - Y], -1]
3
(X - Y)[[j]]
5
answered Apr 5 at 9:24
RomanRoman
4,95511130
$endgroup$
$begingroup$
Thank you so much
$endgroup$
– Andreas
Apr 5 at 18:13
add a comment |
$begingroup$
Depending on your taste,
d = MapThread[#1[[1]] - #2[[1]], #1[[2]] &, X, Y]
or
d = Transpose@X[[All, 1]] - Y[[All, 1]], X[[All, 2]]
define the differences d, if you need them. The symbol D is already in use in Mathematica, don't use it for variables.
Then you can compute
MaximalBy[d, Abs@*Last]
5, 3
As @HenrikSchumacher comments you don't really need the intermediate d though, and you don't need the second elements in each entry denoting their position: using Ordering is more elegant:
X = 3, 8, 10;
Y = 5, 4, 5;
j = First@Ordering[Abs[X - Y], -1]
3
(X - Y)[[j]]
5
answered Apr 5 at 9:24
RomanRoman
4,95511130
$endgroup$
$begingroup$
Thank you so much
$endgroup$
– Andreas
Apr 5 at 18:13
add a comment |
$begingroup$
Depending on your taste,
d = MapThread[#1[[1]] - #2[[1]], #1[[2]] &, X, Y]
or
d = Transpose@X[[All, 1]] - Y[[All, 1]], X[[All, 2]]
define the differences d, if you need them. The symbol D is already in use in Mathematica, don't use it for variables.
Then you can compute
MaximalBy[d, Abs@*Last]
5, 3
As @HenrikSchumacher comments you don't really need the intermediate d though, and you don't need the second elements in each entry denoting their position: using Ordering is more elegant:
X = 3, 8, 10;
Y = 5, 4, 5;
j = First@Ordering[Abs[X - Y], -1]
3
(X - Y)[[j]]
5
answered Apr 5 at 9:24
RomanRoman
4,95511130
$endgroup$
Depending on your taste,
d = MapThread[#1[[1]] - #2[[1]], #1[[2]] &, X, Y]
or
d = Transpose@X[[All, 1]] - Y[[All, 1]], X[[All, 2]]
define the differences d, if you need them. The symbol D is already in use in Mathematica, don't use it for variables.
Then you can compute
MaximalBy[d, Abs@*Last]
5, 3
As @HenrikSchumacher comments you don't really need the intermediate d though, and you don't need the second elements in each entry denoting their position: using Ordering is more elegant:
X = 3, 8, 10;
Y = 5, 4, 5;
j = First@Ordering[Abs[X - Y], -1]
3
(X - Y)[[j]]
5
answered Apr 5 at 9:24
RomanRoman
4,95511130
edited Apr 5 at 9:32
answered Apr 5 at 9:24
RomanRoman
4,95511130
answered Apr 5 at 9:24
RomanRoman
4,95511130
answered Apr 5 at 9:24
RomanRoman
4,95511130
4,95511130
$begingroup$
Thank you so much
$endgroup$
– Andreas
Apr 5 at 18:13
add a comment |
$begingroup$
Thank you so much
$endgroup$
– Andreas
Apr 5 at 18:13
$begingroup$
Thank you so much
$endgroup$
– Andreas
Apr 5 at 18:13
$begingroup$
Thank you so much
$endgroup$
– Andreas
Apr 5 at 18:13
add a comment |
Thanks for contributing an answer to Mathematica Stack Exchange!
- Please be sure to answer the question. Provide details and share your research!
But avoid …
- Asking for help, clarification, or responding to other answers.
- Making statements based on opinion; back them up with references or personal experience.
Use MathJax to format equations. MathJax reference.
To learn more, see our tips on writing great answers.
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
Required, but never shown
StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f194661%2fidentify-maximum-difference-in-matrix%23new-answer', 'question_page');
);
Post as a guest
Required, but never shown
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
Required, but never shown
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
Required, but never shown
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
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
1
$begingroup$
Ordering[Abs[X[[All, 1]] - X[[All, 2]]], -1][[1]]should give the the position3. The value of the difference can than be found easily.$endgroup$
– Henrik Schumacher
Apr 5 at 9:18