Advertisement
Guest User

Untitled

a guest
Mar 29th, 2015
233
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.67 KB | None | 0 0
  1. data1 = {{{0, 2}, {1, 4}}, {{0, 2}, {1, 8}}};
  2. data2 = {{{0, 3}, {3, 4}}, {{1, 5}}};
  3. Manipulate[
  4. Show[
  5. ListLinePlot[data1[[n]], PlotRange -> {0, 10}, Joined -> true],
  6. ListLinePlot[data2[[n]], PlotRange -> {0, 10}, Joined -> true],
  7. {n, 1, 2, 1}]]
  8.  
  9. data1 = {{{0, 2}, {1, 4}}, {{0, 2}, {1, 8}}};
  10. data2 = {{{0, 3}, {3, 4}}, {{1, 5}}};
  11. Show /@ Transpose @ (Table[
  12. ListLinePlot[#[[n]], PlotRange -> {0, 10}, Joined -> True], {n,
  13. 1, 2, 1}] & /@ {data1, data2}) // ListAnimate
  14.  
  15. Manipulate[
  16. Show[ListLinePlot[data1[[n]], PlotRange -> {0, 10}, Joined -> true],
  17. ListLinePlot[data2[[n]], PlotRange -> {0, 10}, Joined -> true], {n,
  18. 1, 2, 1}]]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement