So I have an xls file with 5 Collums and a few thusand rows. Now i want to get only 3 of the collums plot them over the number of rows and then put them in one single graphic. But it should be variable so if I have a diffrent table with more, less collums or want to choose diffrent collums I just have to adopt some variables
i := 2;
j := 1;
t = 3;
testtabele =
Import[NotebookDirectory[] <> "test.xls"];
Do[Liwind[i + j] = testtabele[[1 ;;, 3 ;;, i + j]], {j, t}]
Do[Liwind[i + j] = Liwind[i + j]/1000, {j, t}]
Do[Print[ListLinePlot[Liwind[i + j]]], {j, t}]
(* Prints for every List one graph*)
Here are diffrent things I tried.
Do[
Print[
ListLinePlot[
{Liwind[i + j], Liwind[i + j],Liwind[i + j]}
]
],{j, 3}
]
Do[p[i+j]=[ListLinePlot[Liwind[i+j]]],{j,t}]
Show[p[i + j], p[i + j + 1], p[i + j + 2]]
Hope someone can Help me with that
Print
if you useTable
instead ofDo
. $\endgroup$