Return to Answer

deleted 13 characters in body

Source Link

edited Jul 17, 2019 at 10:35

49.8k
2
57
131

ListPlot[
  Join[Select[data1{Select[data1, #[[1]] <= 0 &], Select[data2, #[[1]] >= 0 &]]&]}, 
  PlotRange -> {{-0.5, 0.5}, {0, 1.5}}, Frame -> True, 
  ImageSize -> 400, AspectRatio -> 2/3]

ListPlot[
  Join[Select[data1, #[[1]] <= 0 &], Select[data2, #[[1]] >= 0 &]], 
  PlotRange -> {{-0.5, 0.5}, {0, 1.5}}, Frame -> True, 
  ImageSize -> 400, AspectRatio -> 2/3]

ListPlot[{Select[data1, #[[1]] <= 0 &], Select[data2, #[[1]] >= 0 &]},
  PlotRange -> {{-0.5, 0.5}, {0, 1.5}}, Frame -> True, 
  ImageSize -> 400, AspectRatio -> 2/3]

Source Link

created Jul 17, 2019 at 9:58

Roman

49.8k
2
57
131

ListPlot[
  Join[Select[data1, #[[1]] <= 0 &], Select[data2, #[[1]] >= 0 &]], 
  PlotRange -> {{-0.5, 0.5}, {0, 1.5}}, Frame -> True, 
  ImageSize -> 400, AspectRatio -> 2/3]