Plot list with structure of each item x, y, z
Clash Royale CLAN TAG#URR8PPP
up vote
6
down vote
favorite
Given the data below:
x, y, z =
0.1, 0.013070604, 1.00015, 0.6, 0.078698955, 1.0054247,
1.1, 0.14552025, 1.0184426, 1.6, 0.21458577, 1.0398293,
2.1, 0.28706229,1.0712175, 2.6, 0.3643249, 1.1155575
How can I plot column x
with column z
and z
with y
?
plotting data
add a comment |Â
up vote
6
down vote
favorite
Given the data below:
x, y, z =
0.1, 0.013070604, 1.00015, 0.6, 0.078698955, 1.0054247,
1.1, 0.14552025, 1.0184426, 1.6, 0.21458577, 1.0398293,
2.1, 0.28706229,1.0712175, 2.6, 0.3643249, 1.1155575
How can I plot column x
with column z
and z
with y
?
plotting data
add a comment |Â
up vote
6
down vote
favorite
up vote
6
down vote
favorite
Given the data below:
x, y, z =
0.1, 0.013070604, 1.00015, 0.6, 0.078698955, 1.0054247,
1.1, 0.14552025, 1.0184426, 1.6, 0.21458577, 1.0398293,
2.1, 0.28706229,1.0712175, 2.6, 0.3643249, 1.1155575
How can I plot column x
with column z
and z
with y
?
plotting data
Given the data below:
x, y, z =
0.1, 0.013070604, 1.00015, 0.6, 0.078698955, 1.0054247,
1.1, 0.14552025, 1.0184426, 1.6, 0.21458577, 1.0398293,
2.1, 0.28706229,1.0712175, 2.6, 0.3643249, 1.1155575
How can I plot column x
with column z
and z
with y
?
plotting data
plotting data
edited 21 mins ago
m_goldberg
81.9k869190
81.9k869190
asked 12 hours ago
Gallagher
745
745
add a comment |Â
add a comment |Â
5 Answers
5
active
oldest
votes
up vote
7
down vote
This is also a good place to apply patterns to re-arrange the elements of the data.
list = 0.1, 0.013070604, 1.00015, 0.6, 0.078698955,1.0054247,
1.1, 0.14552025, 1.0184426, 1.6, 0.21458577,1.0398293,
2.1, 0.28706229, 1.0712175, 2.6, 0.3643249,1.1155575;
ListPlot[list /. x_, y_, z_ -> x, z, list /. x_, y_, z_ -> z, y]
add a comment |Â
up vote
6
down vote
How about this
data = Flatten /@ 0.1, 0.013070604, 1.00015, 0.6, 0.078698955,
1.0054247, 1.1, 0.14552025, 1.0184426, 1.6, 0.21458577,
1.0398293, 2.1, 0.28706229, 1.0712175, 2.6, 0.3643249,
1.1155575;
ListPlot[data[[All, 3, 1]], data[[All, 2 ;;]]]
add a comment |Â
up vote
2
down vote
Here is another way:
a =
0.1, 0.013070604, 1.00015, 0.6, 0.078698955,
1.0054247, 1.1, 0.14552025, 1.0184426, 1.6, 0.21458577,
1.0398293, 2.1, 0.28706229, 1.0712175, 2.6, 0.3643249,
1.1155575
;
x, y, z = MapAt[Transpose, Transpose[a], 2];
ListPlot[Transpose[x, z], Transpose[z, y]]
add a comment |Â
up vote
2
down vote
Yet another way:
data2 = Flatten /@ data;
yz, xz = data2[[All, 2, 3]], data2[[All, 1, 3]] ;
ListPlot[yz , xz,
PlotStyle -> Red, Blue,
PlotLegends -> "y Vs z", "x Vs z" ,
PlotRange -> .8, 1.2,
AxesOrigin -> 0, .8,
AxesLabel -> Column[Style[#, 16] & /@ "x", "y"], Style[ "z", 16]]ÃÂ
ListPlot[-#[[1]], #[[2]] & /@ yz , xz,
ÃÂ PlotStyle -> Red, Blue,
ÃÂ PlotLegends -> "y Vs z", "x Vs z" ,
ÃÂ PlotRange -> -3, 3, .8, 1.2,
ÃÂ AxesOrigin -> 0, .8,
ÃÂ AxesLabel -> None, Style[ "z", 16],
ÃÂ Epilog -> Text[Style["y", 16], Offset[-15, 0, Scaled@0, 0] ],
Text[Style["x", 16], Offset[15, 0, Scaled@1, 0]],
ÃÂ PlotRangeClipping -> False,
ÃÂ ImagePadding -> Scaled[.05],
ÃÂ ImageSize -> 600,
Ticks -> Join[Charting`FindTicks[3, 0, -3, 0][-3, 0],
Charting`FindTicks[0, 1, 0, 1][0, 3] ], Automatic]
add a comment |Â
up vote
1
down vote
Another way
data=0.1,0.013070604,1.00015,0.6,0.078698955,1.0054247,
1.1,0.14552025,1.0184426,1.6,0.21458577,1.0398293,
2.1,0.28706229,1.0712175,2.6,0.3643249,1.1155575
x,y,z=#[[;;,1]],#[[;;,2,1]],#[[;;,2,2]]&@data
ListPlot[MapThread[List,#]&/@z,x,y,z]
add a comment |Â
5 Answers
5
active
oldest
votes
5 Answers
5
active
oldest
votes
active
oldest
votes
active
oldest
votes
up vote
7
down vote
This is also a good place to apply patterns to re-arrange the elements of the data.
list = 0.1, 0.013070604, 1.00015, 0.6, 0.078698955,1.0054247,
1.1, 0.14552025, 1.0184426, 1.6, 0.21458577,1.0398293,
2.1, 0.28706229, 1.0712175, 2.6, 0.3643249,1.1155575;
ListPlot[list /. x_, y_, z_ -> x, z, list /. x_, y_, z_ -> z, y]
add a comment |Â
up vote
7
down vote
This is also a good place to apply patterns to re-arrange the elements of the data.
list = 0.1, 0.013070604, 1.00015, 0.6, 0.078698955,1.0054247,
1.1, 0.14552025, 1.0184426, 1.6, 0.21458577,1.0398293,
2.1, 0.28706229, 1.0712175, 2.6, 0.3643249,1.1155575;
ListPlot[list /. x_, y_, z_ -> x, z, list /. x_, y_, z_ -> z, y]
add a comment |Â
up vote
7
down vote
up vote
7
down vote
This is also a good place to apply patterns to re-arrange the elements of the data.
list = 0.1, 0.013070604, 1.00015, 0.6, 0.078698955,1.0054247,
1.1, 0.14552025, 1.0184426, 1.6, 0.21458577,1.0398293,
2.1, 0.28706229, 1.0712175, 2.6, 0.3643249,1.1155575;
ListPlot[list /. x_, y_, z_ -> x, z, list /. x_, y_, z_ -> z, y]
This is also a good place to apply patterns to re-arrange the elements of the data.
list = 0.1, 0.013070604, 1.00015, 0.6, 0.078698955,1.0054247,
1.1, 0.14552025, 1.0184426, 1.6, 0.21458577,1.0398293,
2.1, 0.28706229, 1.0712175, 2.6, 0.3643249,1.1155575;
ListPlot[list /. x_, y_, z_ -> x, z, list /. x_, y_, z_ -> z, y]
answered 12 hours ago
bill s
50.9k373144
50.9k373144
add a comment |Â
add a comment |Â
up vote
6
down vote
How about this
data = Flatten /@ 0.1, 0.013070604, 1.00015, 0.6, 0.078698955,
1.0054247, 1.1, 0.14552025, 1.0184426, 1.6, 0.21458577,
1.0398293, 2.1, 0.28706229, 1.0712175, 2.6, 0.3643249,
1.1155575;
ListPlot[data[[All, 3, 1]], data[[All, 2 ;;]]]
add a comment |Â
up vote
6
down vote
How about this
data = Flatten /@ 0.1, 0.013070604, 1.00015, 0.6, 0.078698955,
1.0054247, 1.1, 0.14552025, 1.0184426, 1.6, 0.21458577,
1.0398293, 2.1, 0.28706229, 1.0712175, 2.6, 0.3643249,
1.1155575;
ListPlot[data[[All, 3, 1]], data[[All, 2 ;;]]]
add a comment |Â
up vote
6
down vote
up vote
6
down vote
How about this
data = Flatten /@ 0.1, 0.013070604, 1.00015, 0.6, 0.078698955,
1.0054247, 1.1, 0.14552025, 1.0184426, 1.6, 0.21458577,
1.0398293, 2.1, 0.28706229, 1.0712175, 2.6, 0.3643249,
1.1155575;
ListPlot[data[[All, 3, 1]], data[[All, 2 ;;]]]
How about this
data = Flatten /@ 0.1, 0.013070604, 1.00015, 0.6, 0.078698955,
1.0054247, 1.1, 0.14552025, 1.0184426, 1.6, 0.21458577,
1.0398293, 2.1, 0.28706229, 1.0712175, 2.6, 0.3643249,
1.1155575;
ListPlot[data[[All, 3, 1]], data[[All, 2 ;;]]]
answered 12 hours ago
ÃÂûÃÂþñýôÃÂÿàÃÂõóó
1,828721
1,828721
add a comment |Â
add a comment |Â
up vote
2
down vote
Here is another way:
a =
0.1, 0.013070604, 1.00015, 0.6, 0.078698955,
1.0054247, 1.1, 0.14552025, 1.0184426, 1.6, 0.21458577,
1.0398293, 2.1, 0.28706229, 1.0712175, 2.6, 0.3643249,
1.1155575
;
x, y, z = MapAt[Transpose, Transpose[a], 2];
ListPlot[Transpose[x, z], Transpose[z, y]]
add a comment |Â
up vote
2
down vote
Here is another way:
a =
0.1, 0.013070604, 1.00015, 0.6, 0.078698955,
1.0054247, 1.1, 0.14552025, 1.0184426, 1.6, 0.21458577,
1.0398293, 2.1, 0.28706229, 1.0712175, 2.6, 0.3643249,
1.1155575
;
x, y, z = MapAt[Transpose, Transpose[a], 2];
ListPlot[Transpose[x, z], Transpose[z, y]]
add a comment |Â
up vote
2
down vote
up vote
2
down vote
Here is another way:
a =
0.1, 0.013070604, 1.00015, 0.6, 0.078698955,
1.0054247, 1.1, 0.14552025, 1.0184426, 1.6, 0.21458577,
1.0398293, 2.1, 0.28706229, 1.0712175, 2.6, 0.3643249,
1.1155575
;
x, y, z = MapAt[Transpose, Transpose[a], 2];
ListPlot[Transpose[x, z], Transpose[z, y]]
Here is another way:
a =
0.1, 0.013070604, 1.00015, 0.6, 0.078698955,
1.0054247, 1.1, 0.14552025, 1.0184426, 1.6, 0.21458577,
1.0398293, 2.1, 0.28706229, 1.0712175, 2.6, 0.3643249,
1.1155575
;
x, y, z = MapAt[Transpose, Transpose[a], 2];
ListPlot[Transpose[x, z], Transpose[z, y]]
answered 10 hours ago
Henrik Schumacher
38.4k253114
38.4k253114
add a comment |Â
add a comment |Â
up vote
2
down vote
Yet another way:
data2 = Flatten /@ data;
yz, xz = data2[[All, 2, 3]], data2[[All, 1, 3]] ;
ListPlot[yz , xz,
PlotStyle -> Red, Blue,
PlotLegends -> "y Vs z", "x Vs z" ,
PlotRange -> .8, 1.2,
AxesOrigin -> 0, .8,
AxesLabel -> Column[Style[#, 16] & /@ "x", "y"], Style[ "z", 16]]ÃÂ
ListPlot[-#[[1]], #[[2]] & /@ yz , xz,
ÃÂ PlotStyle -> Red, Blue,
ÃÂ PlotLegends -> "y Vs z", "x Vs z" ,
ÃÂ PlotRange -> -3, 3, .8, 1.2,
ÃÂ AxesOrigin -> 0, .8,
ÃÂ AxesLabel -> None, Style[ "z", 16],
ÃÂ Epilog -> Text[Style["y", 16], Offset[-15, 0, Scaled@0, 0] ],
Text[Style["x", 16], Offset[15, 0, Scaled@1, 0]],
ÃÂ PlotRangeClipping -> False,
ÃÂ ImagePadding -> Scaled[.05],
ÃÂ ImageSize -> 600,
Ticks -> Join[Charting`FindTicks[3, 0, -3, 0][-3, 0],
Charting`FindTicks[0, 1, 0, 1][0, 3] ], Automatic]
add a comment |Â
up vote
2
down vote
Yet another way:
data2 = Flatten /@ data;
yz, xz = data2[[All, 2, 3]], data2[[All, 1, 3]] ;
ListPlot[yz , xz,
PlotStyle -> Red, Blue,
PlotLegends -> "y Vs z", "x Vs z" ,
PlotRange -> .8, 1.2,
AxesOrigin -> 0, .8,
AxesLabel -> Column[Style[#, 16] & /@ "x", "y"], Style[ "z", 16]]ÃÂ
ListPlot[-#[[1]], #[[2]] & /@ yz , xz,
ÃÂ PlotStyle -> Red, Blue,
ÃÂ PlotLegends -> "y Vs z", "x Vs z" ,
ÃÂ PlotRange -> -3, 3, .8, 1.2,
ÃÂ AxesOrigin -> 0, .8,
ÃÂ AxesLabel -> None, Style[ "z", 16],
ÃÂ Epilog -> Text[Style["y", 16], Offset[-15, 0, Scaled@0, 0] ],
Text[Style["x", 16], Offset[15, 0, Scaled@1, 0]],
ÃÂ PlotRangeClipping -> False,
ÃÂ ImagePadding -> Scaled[.05],
ÃÂ ImageSize -> 600,
Ticks -> Join[Charting`FindTicks[3, 0, -3, 0][-3, 0],
Charting`FindTicks[0, 1, 0, 1][0, 3] ], Automatic]
add a comment |Â
up vote
2
down vote
up vote
2
down vote
Yet another way:
data2 = Flatten /@ data;
yz, xz = data2[[All, 2, 3]], data2[[All, 1, 3]] ;
ListPlot[yz , xz,
PlotStyle -> Red, Blue,
PlotLegends -> "y Vs z", "x Vs z" ,
PlotRange -> .8, 1.2,
AxesOrigin -> 0, .8,
AxesLabel -> Column[Style[#, 16] & /@ "x", "y"], Style[ "z", 16]]ÃÂ
ListPlot[-#[[1]], #[[2]] & /@ yz , xz,
ÃÂ PlotStyle -> Red, Blue,
ÃÂ PlotLegends -> "y Vs z", "x Vs z" ,
ÃÂ PlotRange -> -3, 3, .8, 1.2,
ÃÂ AxesOrigin -> 0, .8,
ÃÂ AxesLabel -> None, Style[ "z", 16],
ÃÂ Epilog -> Text[Style["y", 16], Offset[-15, 0, Scaled@0, 0] ],
Text[Style["x", 16], Offset[15, 0, Scaled@1, 0]],
ÃÂ PlotRangeClipping -> False,
ÃÂ ImagePadding -> Scaled[.05],
ÃÂ ImageSize -> 600,
Ticks -> Join[Charting`FindTicks[3, 0, -3, 0][-3, 0],
Charting`FindTicks[0, 1, 0, 1][0, 3] ], Automatic]
Yet another way:
data2 = Flatten /@ data;
yz, xz = data2[[All, 2, 3]], data2[[All, 1, 3]] ;
ListPlot[yz , xz,
PlotStyle -> Red, Blue,
PlotLegends -> "y Vs z", "x Vs z" ,
PlotRange -> .8, 1.2,
AxesOrigin -> 0, .8,
AxesLabel -> Column[Style[#, 16] & /@ "x", "y"], Style[ "z", 16]]ÃÂ
ListPlot[-#[[1]], #[[2]] & /@ yz , xz,
ÃÂ PlotStyle -> Red, Blue,
ÃÂ PlotLegends -> "y Vs z", "x Vs z" ,
ÃÂ PlotRange -> -3, 3, .8, 1.2,
ÃÂ AxesOrigin -> 0, .8,
ÃÂ AxesLabel -> None, Style[ "z", 16],
ÃÂ Epilog -> Text[Style["y", 16], Offset[-15, 0, Scaled@0, 0] ],
Text[Style["x", 16], Offset[15, 0, Scaled@1, 0]],
ÃÂ PlotRangeClipping -> False,
ÃÂ ImagePadding -> Scaled[.05],
ÃÂ ImageSize -> 600,
Ticks -> Join[Charting`FindTicks[3, 0, -3, 0][-3, 0],
Charting`FindTicks[0, 1, 0, 1][0, 3] ], Automatic]
edited 2 hours ago
answered 3 hours ago
kglr
160k8184384
160k8184384
add a comment |Â
add a comment |Â
up vote
1
down vote
Another way
data=0.1,0.013070604,1.00015,0.6,0.078698955,1.0054247,
1.1,0.14552025,1.0184426,1.6,0.21458577,1.0398293,
2.1,0.28706229,1.0712175,2.6,0.3643249,1.1155575
x,y,z=#[[;;,1]],#[[;;,2,1]],#[[;;,2,2]]&@data
ListPlot[MapThread[List,#]&/@z,x,y,z]
add a comment |Â
up vote
1
down vote
Another way
data=0.1,0.013070604,1.00015,0.6,0.078698955,1.0054247,
1.1,0.14552025,1.0184426,1.6,0.21458577,1.0398293,
2.1,0.28706229,1.0712175,2.6,0.3643249,1.1155575
x,y,z=#[[;;,1]],#[[;;,2,1]],#[[;;,2,2]]&@data
ListPlot[MapThread[List,#]&/@z,x,y,z]
add a comment |Â
up vote
1
down vote
up vote
1
down vote
Another way
data=0.1,0.013070604,1.00015,0.6,0.078698955,1.0054247,
1.1,0.14552025,1.0184426,1.6,0.21458577,1.0398293,
2.1,0.28706229,1.0712175,2.6,0.3643249,1.1155575
x,y,z=#[[;;,1]],#[[;;,2,1]],#[[;;,2,2]]&@data
ListPlot[MapThread[List,#]&/@z,x,y,z]
Another way
data=0.1,0.013070604,1.00015,0.6,0.078698955,1.0054247,
1.1,0.14552025,1.0184426,1.6,0.21458577,1.0398293,
2.1,0.28706229,1.0712175,2.6,0.3643249,1.1155575
x,y,z=#[[;;,1]],#[[;;,2,1]],#[[;;,2,2]]&@data
ListPlot[MapThread[List,#]&/@z,x,y,z]
answered 10 hours ago
That Gravity Guy
54637
54637
add a comment |Â
add a comment |Â
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
StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fmathematica.stackexchange.com%2fquestions%2f182046%2fplot-list-with-structure-of-each-item-x-y-z%23new-answer', 'question_page');
);
Post as a guest
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
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
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