0
|
3609 Views
|
2 Replies
|
3 Total Likes
View groups...
Share

make vice versa a diagram (reverse one axis)

Posted 10 years ago
 Hi every one. I wrote a command line to plot a graph now I need to vice versa the data to plot it. I want to plot the data from the last one to the first instead of the first to end. Would you please help me? Plot3 = Table[0, {NumberEigenf}]; For[j = 1, j <= NumberEigenf, j++, Plot3[[j]] = ListLinePlot[ {Table[{Numericalkx[[j + (i - 1)*15 + start3]], Numericalkkk[[j + (i - 1)*15 + start3]]}, {i, 1, (NumberK - 1)/3 + 1}]}, PlotStyle -> {Green}]] Figura3 = Show[Plot3[[1]], Plot3[[2]], Plot3[[3]], Plot3[[4]], Plot3[[5]], Plot3[[6]], Plot3[[7]], Plot3[[8]], Plot3[[9]], Plot3[[10]], Plot3[[11]], Plot3[[12]], Plot3[[13]], Plot3[[14]], Plot3[[15]], PlotRange -> {0, 7}, AxesOrigin -> {0, 0}] 
2 Replies
Sort By:
Posted 10 years ago
 Hi there,I cannot run your code, because it is incomplete. It would be helpful to have the entire code. If I understand what you want to achieve correctly, substituting your Plot3 function by Plot3[[j]] = ListLinePlot[ {Table[{Numericalkkk[[j + (i - 1)*15 + start3]],Numericalkx[[j + (i - 1)*15 + start3]]}, {i, 1, (NumberK - 1)/3 + 1}]}, PlotStyle -> {Green}]] should exchange the axes, shouldn't it?Cheers,Marco
Posted 10 years ago
 yes, Thank you very much Marco.
Reply to this discussion
Community posts can be styled and formatted using the Markdown syntax.