Guest User

Untitled

a guest
Oct 23rd, 2018
114
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.67 KB | None | 0 0
  1. SetOptions[ListDensityPlot,
  2. Mesh -> None,
  3. PlotRange -> All,
  4. ColorFunctionScaling -> True,
  5. Frame -> True,
  6. BaseStyle -> {FontSize -> 18, FontFamily -> "Arial"},
  7. LabelStyle -> Directive[Black, FontSize -> 20],
  8. ImageSize -> UpTo[550]
  9.  
  10. ];
  11.  
  12. data = Table[{#, #2, Sin[#] Cos[#2]} & @@ RandomReal[{-3, 3}, 2], {1000}];
  13.  
  14. graph = ListDensityPlot[data,
  15. PlotLabel -> FileBaseName[file],
  16. ScalingFunctions -> {"Linear", "Linear", "Linear"},
  17. ColorFunction -> (ColorData["TemperatureMap"][#] &),
  18. PlotLegends -> BarLegend[Automatic, LegendMarkerSize -> 300, LabelingFunction -> (Style[NumberForm[#, {Infinity, 2}], Black, 20] &)]]
Add Comment
Please, Sign In to add comment