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}]