Advertisement
Guest User

Untitled

a guest
Sep 2nd, 2014
237
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.41 KB | None | 0 0
  1. data = Import[#, "Data"] & /@ filesall;
  2. files = FileNames["*.dat"];
  3. legend = StringReplace[files, ".dat" -> ""];
  4.  
  5. plot1 = ListLinePlot[data[[1]], PlotLegends -> legendcfinal[[1]]];
  6. plot2 = ListLinePlot[data[[2]], PlotLegends -> legendcfinal[[2]]];
  7.  
  8. Manipulate[
  9. Show[
  10. If[x1 == True, plotall, Sequence @@ {}],
  11. If[x2 == True, plotf1, Sequence @@ {}],
  12. {{x1, True, "plot1"}, {True, False}}, {{x2, True, "plot2"}]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement