Blog List View

ListDensityPlot密度图和图例是分开的,怎么保存成一张图片 

2016-09-12 15:58:45
666 次阅读

代码如下:

resultAlpha = Import["e:\\AwarenessSIR\\WS\\r.xlsx", {"Data", 1}];

ListDensityPlot[Table[resultAlpha[[j, i]], {i, 1, 100}, {j, 1, 100}], 

 PlotTheme -> "Minimal", DataRange -> {{0, 1}, {0, 1}}, 

 FrameTicksStyle -> 

  Directive[FontColor -> Black, FontSize -> 12, 

   FontFamily -> "Times"], ColorFunction -> "ThermometerColors", 

 Frame -> True, FrameStyle -> Black, 

 FrameLabel -> {Style["\[Beta]", 12, Black, FontFamily -> "Times"], 

   Style["r", 10, Black, Italic, FontFamily -> "Times"]}, 

 PlotLegends -> 

  Placed[BarLegend[Automatic, 

    LabelStyle -> {Black, FontFamily -> "Times"}, 

    LegendMarkerSize -> {15, 220}], Right], 

 ImageSize -> 72*{3.4, 3.4}]

结果如图,

blob.png  blob.png

图中点击图片右键保存时为两个图片,没法同时保存为一个,尝试了Export导出也不行,求教各位大神如何解决~~~


发表评论