SHARE
TWEET

Untitled

a guest Jun 27th, 2019 66 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Tab1 = Table[i*10, {i, 0, 20}];
  2.  
  3. Tab2 = Table[i, {i, 0, 20}];
  4.  
  5. Tab3 = Table[i*0.1, {i, 0, 20}];
  6.      
  7. plot1 = ListPlot[Transpose[{Tab1, Tab3}],
  8. Frame -> {True, True, False, False},
  9. FrameLabel -> {"Parameter 1", "Y axis", None, None},
  10. ImagePadding -> 50, FrameTicks -> {{All, None}, {All, None}}];
  11.  
  12. plot2 = ListPlot[Transpose[{Tab2, Tab3}],
  13. Frame -> {False, False, True, True},
  14. FrameLabel -> {None, None, "Parameter 2", "Y axis"},
  15. ImagePadding -> 50, FrameTicks -> {{None, All}, {None, All}}];
  16.  
  17. Overlay[{plot1, plot2}]
  18.      
  19. tab1 = Table[i*10, {i, 0, 20}];(*Parameter 1*)
  20.  
  21. tab2 = Table[i, {i, 0, 20}];(*Parameter 2*)
  22.  
  23. tab3 = Table[i*0.1, {i, 0, 20}];
  24.  
  25. tab4 = Transpose[{tab1, tab2, tab3}];
  26.  
  27. ListDensityPlot[tab4,
  28. ColorFunction -> "Rainbow", PlotLegends -> Automatic,
  29. Frame -> True,
  30. FrameLabel -> {"Parameter 1", "Parameter 2"},
  31. LabelStyle -> Directive[Black, 14], ImageSize -> Large]
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top