ListPointPlot3D filling between two listsList plot with vertical lines between corresponding data pointsCreate filling between two trig functionsFilling between two 3D surfacesLooking for mismatches between two listsFilling between two spheres in SphericalPlot3DComputing a map between two listsFind (longest) overlapping elements between two listsFilling between more than two boundariesFilling between two listplotsEfficiently exchange elements between two listsLookup between two lists
Agena docking and RCS Brakes in First Man
Checking if two expressions are related
A factorization game
Trigonometry substitution issue with sign
Python 3 - simple temperature program
Copy previous line to current line from text file
Why do these characters still seem to be the same age after the events of Endgame?
How to pass hash as password to ssh server
Is there precedent or are there procedures for a US president refusing to concede to an electoral defeat?
What do I do if my advisor made a mistake?
Should I mention being denied entry to UK due to a confusion in my Visa and Ticket bookings?
Dangerous workplace travelling
Why didn't this character get a funeral at the end of Avengers: Endgame?
Is the book wrong about the Nyquist Sampling Criterion?
Endgame puzzle: How to avoid stalemate and win?
Is there a word for food that's gone 'bad', but is still edible?
Has the United States ever had a non-Christian President?
Is 'contemporary' ambiguous and if so is there a better word?
What is a common way to tell if an academic is "above average," or outstanding in their field? Is their h-index (Hirsh index) one of them?
Are there terms in German for different skull shapes?
Why am I receiving the identity insert error even after explicitly setting IDENTITY_INSERT ON and using a column list?
Why aren't nationalizations in Russia described as socialist?
Would a small hole in a Faraday cage drastically reduce its effectiveness at blocking interference?
Is there an age requirement to play in Adventurers League?
ListPointPlot3D filling between two lists
List plot with vertical lines between corresponding data pointsCreate filling between two trig functionsFilling between two 3D surfacesLooking for mismatches between two listsFilling between two spheres in SphericalPlot3DComputing a map between two listsFind (longest) overlapping elements between two listsFilling between more than two boundariesFilling between two listplotsEfficiently exchange elements between two listsLookup between two lists
$begingroup$
I'm trying to connect pairs of corresponding points from two lists in a ListPointPlot3D (similar to what was done here but in 3D). Filling-> 1->2 isn't working for me, so I presume the problem must lie in how I'm passing the two lists.
SeedRandom[11];
sigma = DiagonalMatrix[0.001, 0.001, 0.000001];
sp = 5;
means1 = Flatten /@
Transpose[Table[RandomReal[0, 1, 2], sp], Table[0.8, sp]];
dist1 = MixtureDistribution[Table[1, sp],
Table[MultinormalDistribution[means1[[i]], sigma], i,
Table[j, j, sp]]
];
means2 = Flatten /@
Transpose[Table[RandomReal[0, 1, 2], sp], Table[0.2, sp]];
dist2 = MixtureDistribution[Table[1, sp],
Table[MultinormalDistribution[means2[[i]], sigma], i,
Table[j, j, sp]]
];
n = 50;
data1 = RandomVariate[dist1, n];
data2 = RandomVariate[dist2, n];
ListPointPlot3D[data1, data2, PlotRange -> 0, 1, 0, 1, 0, 1,
Filling -> 1 -> 2]
plotting list-manipulation
asked 4 hours ago
user12734user12734
675
$endgroup$
add a comment |
$begingroup$
I'm trying to connect pairs of corresponding points from two lists in a ListPointPlot3D (similar to what was done here but in 3D). Filling-> 1->2 isn't working for me, so I presume the problem must lie in how I'm passing the two lists.
SeedRandom[11];
sigma = DiagonalMatrix[0.001, 0.001, 0.000001];
sp = 5;
means1 = Flatten /@
Transpose[Table[RandomReal[0, 1, 2], sp], Table[0.8, sp]];
dist1 = MixtureDistribution[Table[1, sp],
Table[MultinormalDistribution[means1[[i]], sigma], i,
Table[j, j, sp]]
];
means2 = Flatten /@
Transpose[Table[RandomReal[0, 1, 2], sp], Table[0.2, sp]];
dist2 = MixtureDistribution[Table[1, sp],
Table[MultinormalDistribution[means2[[i]], sigma], i,
Table[j, j, sp]]
];
n = 50;
data1 = RandomVariate[dist1, n];
data2 = RandomVariate[dist2, n];
ListPointPlot3D[data1, data2, PlotRange -> 0, 1, 0, 1, 0, 1,
Filling -> 1 -> 2]
plotting list-manipulation
asked 4 hours ago
user12734user12734
675
$endgroup$
1
$begingroup$
It seems that forListPointPlot3DtheFillinglimits can only beTop,Bottom,AxisorNone. DoesGraphics3D[PointSize[Medium], Red, Point[data1], Blue, Point[data2], Gray, Line /@ Transpose[data1, data2], Boxed -> True]give what you need.
$endgroup$
– kglr
4 hours ago
$begingroup$
Almost! What I'd like to for each point in the top layer to be connected to only one point in the bottom layer. Which point is connected to which is determined by their position (order) in the data (i.e. first point in data1 connects to first point in data2). thanks
$endgroup$
– user12734
3 hours ago
$begingroup$
user12734,Transpose[data1, data2]pairs points fromdata1anddata2based on position.
$endgroup$
– kglr
2 hours ago
add a comment |
$begingroup$
I'm trying to connect pairs of corresponding points from two lists in a ListPointPlot3D (similar to what was done here but in 3D). Filling-> 1->2 isn't working for me, so I presume the problem must lie in how I'm passing the two lists.
SeedRandom[11];
sigma = DiagonalMatrix[0.001, 0.001, 0.000001];
sp = 5;
means1 = Flatten /@
Transpose[Table[RandomReal[0, 1, 2], sp], Table[0.8, sp]];
dist1 = MixtureDistribution[Table[1, sp],
Table[MultinormalDistribution[means1[[i]], sigma], i,
Table[j, j, sp]]
];
means2 = Flatten /@
Transpose[Table[RandomReal[0, 1, 2], sp], Table[0.2, sp]];
dist2 = MixtureDistribution[Table[1, sp],
Table[MultinormalDistribution[means2[[i]], sigma], i,
Table[j, j, sp]]
];
n = 50;
data1 = RandomVariate[dist1, n];
data2 = RandomVariate[dist2, n];
ListPointPlot3D[data1, data2, PlotRange -> 0, 1, 0, 1, 0, 1,
Filling -> 1 -> 2]
plotting list-manipulation
asked 4 hours ago
user12734user12734
675
$endgroup$
I'm trying to connect pairs of corresponding points from two lists in a ListPointPlot3D (similar to what was done here but in 3D). Filling-> 1->2 isn't working for me, so I presume the problem must lie in how I'm passing the two lists.
SeedRandom[11];
sigma = DiagonalMatrix[0.001, 0.001, 0.000001];
sp = 5;
means1 = Flatten /@
Transpose[Table[RandomReal[0, 1, 2], sp], Table[0.8, sp]];
dist1 = MixtureDistribution[Table[1, sp],
Table[MultinormalDistribution[means1[[i]], sigma], i,
Table[j, j, sp]]
];
means2 = Flatten /@
Transpose[Table[RandomReal[0, 1, 2], sp], Table[0.2, sp]];
dist2 = MixtureDistribution[Table[1, sp],
Table[MultinormalDistribution[means2[[i]], sigma], i,
Table[j, j, sp]]
];
n = 50;
data1 = RandomVariate[dist1, n];
data2 = RandomVariate[dist2, n];
ListPointPlot3D[data1, data2, PlotRange -> 0, 1, 0, 1, 0, 1,
Filling -> 1 -> 2]
plotting list-manipulation
plotting list-manipulation
asked 4 hours ago
user12734user12734
675
asked 4 hours ago
user12734user12734
675
asked 4 hours ago
user12734user12734
675
asked 4 hours ago
user12734user12734
675
asked 4 hours ago
user12734user12734
675
675
1
$begingroup$
It seems that forListPointPlot3DtheFillinglimits can only beTop,Bottom,AxisorNone. DoesGraphics3D[PointSize[Medium], Red, Point[data1], Blue, Point[data2], Gray, Line /@ Transpose[data1, data2], Boxed -> True]give what you need.
$endgroup$
– kglr
4 hours ago
$begingroup$
Almost! What I'd like to for each point in the top layer to be connected to only one point in the bottom layer. Which point is connected to which is determined by their position (order) in the data (i.e. first point in data1 connects to first point in data2). thanks
$endgroup$
– user12734
3 hours ago
$begingroup$
user12734,Transpose[data1, data2]pairs points fromdata1anddata2based on position.
$endgroup$
– kglr
2 hours ago
add a comment |
1
$begingroup$
It seems that forListPointPlot3DtheFillinglimits can only beTop,Bottom,AxisorNone. DoesGraphics3D[PointSize[Medium], Red, Point[data1], Blue, Point[data2], Gray, Line /@ Transpose[data1, data2], Boxed -> True]give what you need.
$endgroup$
– kglr
4 hours ago
$begingroup$
Almost! What I'd like to for each point in the top layer to be connected to only one point in the bottom layer. Which point is connected to which is determined by their position (order) in the data (i.e. first point in data1 connects to first point in data2). thanks
$endgroup$
– user12734
3 hours ago
$begingroup$
user12734,Transpose[data1, data2]pairs points fromdata1anddata2based on position.
$endgroup$
– kglr
2 hours ago
1
1
$begingroup$
It seems that for
ListPointPlot3D the Filling limits can only be Top, Bottom, Axis or None. Does Graphics3D[PointSize[Medium], Red, Point[data1], Blue, Point[data2], Gray, Line /@ Transpose[data1, data2], Boxed -> True] give what you need.$endgroup$
– kglr
4 hours ago
$begingroup$
It seems that for
ListPointPlot3D the Filling limits can only be Top, Bottom, Axis or None. Does Graphics3D[PointSize[Medium], Red, Point[data1], Blue, Point[data2], Gray, Line /@ Transpose[data1, data2], Boxed -> True] give what you need.$endgroup$
– kglr
4 hours ago
$begingroup$
Almost! What I'd like to for each point in the top layer to be connected to only one point in the bottom layer. Which point is connected to which is determined by their position (order) in the data (i.e. first point in data1 connects to first point in data2). thanks
$endgroup$
– user12734
3 hours ago
$begingroup$
Almost! What I'd like to for each point in the top layer to be connected to only one point in the bottom layer. Which point is connected to which is determined by their position (order) in the data (i.e. first point in data1 connects to first point in data2). thanks
$endgroup$
– user12734
3 hours ago
$begingroup$
user12734,
Transpose[data1, data2] pairs points from data1 and data2 based on position.$endgroup$
– kglr
2 hours ago
$begingroup$
user12734,
Transpose[data1, data2] pairs points from data1 and data2 based on position.$endgroup$
– kglr
2 hours ago
add a comment |
2 Answers
2
active
oldest
votes
$begingroup$
Show[ListPointPlot3D[data1, data2, PlotStyle -> Red, Blue,
PlotLegends -> "data1", "data2"],
Graphics3D[Gray, Line @ Transpose[data1, data2]]]
Alternatively, you can use Graphics3D to plot both points and connecting lines:
Legended[Graphics3D[PointSize[Medium], Red, Point[data1], Blue,
Point[data2], Gray, Line /@ Transpose[data1, data2], BoxRatios -> 1, 1, 0.4],
PointLegend[Red, Blue, "data1", "data2"]]
answered 2 hours ago
kglrkglr
191k10210429
$endgroup$
$begingroup$
You're exactly right! I was thinking about my data incorrectly. thanks!
$endgroup$
– user12734
1 hour ago
add a comment |
$begingroup$
The following might be useful for others to see my mistake:
SeedRandom[11];
sp = 4;
maxVar = 0.02;
means = Table[RandomReal[0, 1, 2], sp];
dist = MixtureDistribution[Table[1, sp],
Table[BinormalDistribution[means[[i]],
RandomReal[0.01, maxVar, 2], 0.5], i, Table[j, j, sp]]
];
n = 50;
pos = RandomVariate[dist, n];
data1 = Flatten /@ Transpose[pos, Table[0.8, n]];
data2 = Flatten /@ Transpose[pos, Table[0.2, n]];
Show[ListPointPlot3D[data1, data2, PlotStyle -> Red, Blue,
PlotLegends -> "data1", "data2"],
Graphics3D[Gray, Line@Transpose[data1, data2]]]
answered 1 hour ago
user12734user12734
675
$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
);
);
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%2f197626%2flistpointplot3d-filling-between-two-lists%23new-answer', 'question_page');
);
Post as a guest
Required, but never shown
2 Answers
2
active
oldest
votes
2 Answers
2
active
oldest
votes
active
oldest
votes
active
oldest
votes
$begingroup$
Show[ListPointPlot3D[data1, data2, PlotStyle -> Red, Blue,
PlotLegends -> "data1", "data2"],
Graphics3D[Gray, Line @ Transpose[data1, data2]]]
Alternatively, you can use Graphics3D to plot both points and connecting lines:
Legended[Graphics3D[PointSize[Medium], Red, Point[data1], Blue,
Point[data2], Gray, Line /@ Transpose[data1, data2], BoxRatios -> 1, 1, 0.4],
PointLegend[Red, Blue, "data1", "data2"]]
answered 2 hours ago
kglrkglr
191k10210429
$endgroup$
$begingroup$
You're exactly right! I was thinking about my data incorrectly. thanks!
$endgroup$
– user12734
1 hour ago
add a comment |
$begingroup$
Show[ListPointPlot3D[data1, data2, PlotStyle -> Red, Blue,
PlotLegends -> "data1", "data2"],
Graphics3D[Gray, Line @ Transpose[data1, data2]]]
Alternatively, you can use Graphics3D to plot both points and connecting lines:
Legended[Graphics3D[PointSize[Medium], Red, Point[data1], Blue,
Point[data2], Gray, Line /@ Transpose[data1, data2], BoxRatios -> 1, 1, 0.4],
PointLegend[Red, Blue, "data1", "data2"]]
answered 2 hours ago
kglrkglr
191k10210429
$endgroup$
$begingroup$
You're exactly right! I was thinking about my data incorrectly. thanks!
$endgroup$
– user12734
1 hour ago
add a comment |
$begingroup$
Show[ListPointPlot3D[data1, data2, PlotStyle -> Red, Blue,
PlotLegends -> "data1", "data2"],
Graphics3D[Gray, Line @ Transpose[data1, data2]]]
Alternatively, you can use Graphics3D to plot both points and connecting lines:
Legended[Graphics3D[PointSize[Medium], Red, Point[data1], Blue,
Point[data2], Gray, Line /@ Transpose[data1, data2], BoxRatios -> 1, 1, 0.4],
PointLegend[Red, Blue, "data1", "data2"]]
answered 2 hours ago
kglrkglr
191k10210429
$endgroup$
Show[ListPointPlot3D[data1, data2, PlotStyle -> Red, Blue,
PlotLegends -> "data1", "data2"],
Graphics3D[Gray, Line @ Transpose[data1, data2]]]
Alternatively, you can use Graphics3D to plot both points and connecting lines:
Legended[Graphics3D[PointSize[Medium], Red, Point[data1], Blue,
Point[data2], Gray, Line /@ Transpose[data1, data2], BoxRatios -> 1, 1, 0.4],
PointLegend[Red, Blue, "data1", "data2"]]
answered 2 hours ago
kglrkglr
191k10210429
answered 2 hours ago
kglrkglr
191k10210429
answered 2 hours ago
kglrkglr
191k10210429
answered 2 hours ago
kglrkglr
191k10210429
191k10210429
$begingroup$
You're exactly right! I was thinking about my data incorrectly. thanks!
$endgroup$
– user12734
1 hour ago
add a comment |
$begingroup$
You're exactly right! I was thinking about my data incorrectly. thanks!
$endgroup$
– user12734
1 hour ago
$begingroup$
You're exactly right! I was thinking about my data incorrectly. thanks!
$endgroup$
– user12734
1 hour ago
$begingroup$
You're exactly right! I was thinking about my data incorrectly. thanks!
$endgroup$
– user12734
1 hour ago
add a comment |
$begingroup$
The following might be useful for others to see my mistake:
SeedRandom[11];
sp = 4;
maxVar = 0.02;
means = Table[RandomReal[0, 1, 2], sp];
dist = MixtureDistribution[Table[1, sp],
Table[BinormalDistribution[means[[i]],
RandomReal[0.01, maxVar, 2], 0.5], i, Table[j, j, sp]]
];
n = 50;
pos = RandomVariate[dist, n];
data1 = Flatten /@ Transpose[pos, Table[0.8, n]];
data2 = Flatten /@ Transpose[pos, Table[0.2, n]];
Show[ListPointPlot3D[data1, data2, PlotStyle -> Red, Blue,
PlotLegends -> "data1", "data2"],
Graphics3D[Gray, Line@Transpose[data1, data2]]]
answered 1 hour ago
user12734user12734
675
$endgroup$
add a comment |
$begingroup$
The following might be useful for others to see my mistake:
SeedRandom[11];
sp = 4;
maxVar = 0.02;
means = Table[RandomReal[0, 1, 2], sp];
dist = MixtureDistribution[Table[1, sp],
Table[BinormalDistribution[means[[i]],
RandomReal[0.01, maxVar, 2], 0.5], i, Table[j, j, sp]]
];
n = 50;
pos = RandomVariate[dist, n];
data1 = Flatten /@ Transpose[pos, Table[0.8, n]];
data2 = Flatten /@ Transpose[pos, Table[0.2, n]];
Show[ListPointPlot3D[data1, data2, PlotStyle -> Red, Blue,
PlotLegends -> "data1", "data2"],
Graphics3D[Gray, Line@Transpose[data1, data2]]]
answered 1 hour ago
user12734user12734
675
$endgroup$
add a comment |
$begingroup$
The following might be useful for others to see my mistake:
SeedRandom[11];
sp = 4;
maxVar = 0.02;
means = Table[RandomReal[0, 1, 2], sp];
dist = MixtureDistribution[Table[1, sp],
Table[BinormalDistribution[means[[i]],
RandomReal[0.01, maxVar, 2], 0.5], i, Table[j, j, sp]]
];
n = 50;
pos = RandomVariate[dist, n];
data1 = Flatten /@ Transpose[pos, Table[0.8, n]];
data2 = Flatten /@ Transpose[pos, Table[0.2, n]];
Show[ListPointPlot3D[data1, data2, PlotStyle -> Red, Blue,
PlotLegends -> "data1", "data2"],
Graphics3D[Gray, Line@Transpose[data1, data2]]]
answered 1 hour ago
user12734user12734
675
$endgroup$
The following might be useful for others to see my mistake:
SeedRandom[11];
sp = 4;
maxVar = 0.02;
means = Table[RandomReal[0, 1, 2], sp];
dist = MixtureDistribution[Table[1, sp],
Table[BinormalDistribution[means[[i]],
RandomReal[0.01, maxVar, 2], 0.5], i, Table[j, j, sp]]
];
n = 50;
pos = RandomVariate[dist, n];
data1 = Flatten /@ Transpose[pos, Table[0.8, n]];
data2 = Flatten /@ Transpose[pos, Table[0.2, n]];
Show[ListPointPlot3D[data1, data2, PlotStyle -> Red, Blue,
PlotLegends -> "data1", "data2"],
Graphics3D[Gray, Line@Transpose[data1, data2]]]
answered 1 hour ago
user12734user12734
675
answered 1 hour ago
user12734user12734
675
answered 1 hour ago
user12734user12734
675
answered 1 hour ago
user12734user12734
675
675
add a comment |
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%2f197626%2flistpointplot3d-filling-between-two-lists%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$
It seems that for
ListPointPlot3DtheFillinglimits can only beTop,Bottom,AxisorNone. DoesGraphics3D[PointSize[Medium], Red, Point[data1], Blue, Point[data2], Gray, Line /@ Transpose[data1, data2], Boxed -> True]give what you need.$endgroup$
– kglr
4 hours ago
$begingroup$
Almost! What I'd like to for each point in the top layer to be connected to only one point in the bottom layer. Which point is connected to which is determined by their position (order) in the data (i.e. first point in data1 connects to first point in data2). thanks
$endgroup$
– user12734
3 hours ago
$begingroup$
user12734,
Transpose[data1, data2]pairs points fromdata1anddata2based on position.$endgroup$
– kglr
2 hours ago