Skip to main content
deleted 39 characters in body
Source Link
Dr. belisarius
  • 116.2k
  • 13
  • 205
  • 456
ArrayPlot[FData, ColorFunction -> Function[With[{z},g = GrayLevel[1 - z]],#] &},
       ArrayPlot[FData, ColorFunction -> g, PlotLegends -> BarLegend[{GrayLevel[1 - #] &g, {Min@FData, Max@FData}}, 
                                    LabelStyle -> Directive[Blue, Large]]]Large]]]]

enter image description here

ArrayPlot[FData, ColorFunction -> Function[{z}, GrayLevel[1 - z]], 
           PlotLegends -> BarLegend[{GrayLevel[1 - #] &, {Min@FData, Max@FData}}, 
                                    LabelStyle -> Directive[Blue, Large]]]

enter image description here

With[{g = GrayLevel[1 - #] &},
       ArrayPlot[FData, ColorFunction -> g, PlotLegends -> BarLegend[{g, {Min@FData, Max@FData}}, 
                 LabelStyle -> Directive[Blue, Large]]]]

enter image description here

deleted 174 characters in body
Source Link
Dr. belisarius
  • 116.2k
  • 13
  • 205
  • 456
ArrayPlot[FData, ColorFunction -> Function[{z}, GrayLevel[1 - z]],  PlotLegends -> Automatic]

enter image description here

Edit Answering your comment

ArrayPlot[FData, ColorFunction -> Function[{z}, GrayLevel[1 - z]], 
           PlotLegends -> BarLegend[{GrayLevel[1 - #] &, {Min@FData, Max@FData}}, 
                                    LabelStyle -> Directive[Blue, Large]]]

enter image description here

ArrayPlot[FData, ColorFunction -> Function[{z}, GrayLevel[1 - z]],  PlotLegends -> Automatic]

enter image description here

Edit Answering your comment

ArrayPlot[FData, ColorFunction -> Function[{z}, GrayLevel[1 - z]], 
           PlotLegends -> BarLegend[{GrayLevel[1 - #] &, {Min@FData, Max@FData}}, 
                                    LabelStyle -> Directive[Blue, Large]]]

enter image description here

ArrayPlot[FData, ColorFunction -> Function[{z}, GrayLevel[1 - z]], 
           PlotLegends -> BarLegend[{GrayLevel[1 - #] &, {Min@FData, Max@FData}}, 
                                    LabelStyle -> Directive[Blue, Large]]]

enter image description here

deleted 50 characters in body
Source Link
Dr. belisarius
  • 116.2k
  • 13
  • 205
  • 456
ArrayPlot[FData, ColorFunction -> Function[{z}, GrayLevel[1 - z]],  
         PlotLegends -> Automatic,LegendFunction -> (Style[#, 40] &)]Automatic]

enter image description here

Edit Answering your comment

ArrayPlot[FData, ColorFunction -> Function[{z}, GrayLevel[1 - z]], 
           PlotLegends -> BarLegend[{GrayLevel[1 - #] &, {Min@FData, Max@FData}}, 
                                    LabelStyle -> Directive[Blue, Large]]]

enter image description here

ArrayPlot[FData, ColorFunction -> Function[{z}, GrayLevel[1 - z]],  
         PlotLegends -> Automatic,LegendFunction -> (Style[#, 40] &)]

enter image description here

Edit Answering your comment

ArrayPlot[FData, ColorFunction -> Function[{z}, GrayLevel[1 - z]], 
 PlotLegends -> BarLegend[{GrayLevel[1 - #] &, {Min@FData, Max@FData}}, 
                          LabelStyle -> Directive[Blue, Large]]]

enter image description here

ArrayPlot[FData, ColorFunction -> Function[{z}, GrayLevel[1 - z]],  PlotLegends -> Automatic]

enter image description here

Edit Answering your comment

ArrayPlot[FData, ColorFunction -> Function[{z}, GrayLevel[1 - z]], 
           PlotLegends -> BarLegend[{GrayLevel[1 - #] &, {Min@FData, Max@FData}}, 
                                    LabelStyle -> Directive[Blue, Large]]]

enter image description here

added 359 characters in body
Source Link
Dr. belisarius
  • 116.2k
  • 13
  • 205
  • 456
Loading
Source Link
Dr. belisarius
  • 116.2k
  • 13
  • 205
  • 456
Loading