I have the following data:
TableA = {{5.72, 5.81, 1.13}, {4.81, 5.25, 0.86}, {4.31, 2.88,
0.73}, {3.98, 2.38, 0.71}, {3.81, 2.33, 0.84}, {2.37, 0.97, 0.74}};
TableB = {{20.2, 5.91, 2.00}, {15.0, 4.37, 1.41}, {12.1, 3.14,
1.13}, {10.2, 2.59, 1.02}, {9.19, 2.29, 1.08}, {4.90, 1.22,
0.88}};
And I want to create a MatrixPlot
of these:
PlotA3k =
MatrixPlot[TableA,
FrameLabel -> {Style["\!\(\*SubscriptBox[\(z\), \(i\)]\)", 20],
Style["\!\(\*SubscriptBox[\(k\), \(i\)]\)", 20]},
PlotLabel ->
Style["\[CapitalDelta]\!\(\*OverscriptBox[\(A\), \(_\)]\)", 22],
LabelStyle -> Directive[12],
PlotLegends -> Placed[BarLegend[Automatic], {After, Center}],
ColorFunction -> "Rainbow",
FrameTicks -> {{1, 2, 3, 4, 5, 6, 7, 8}, {1, 2, 3}},
DataReversed -> {True, False}];
PlotR3k =
MatrixPlot[TableB,
FrameLabel -> {Style["\!\(\*SubscriptBox[\(z\), \(i\)]\)", 20],
Style["\!\(\*SubscriptBox[\(k\), \(i\)]\)", 20]},
PlotLabel ->
Style["\[CapitalDelta]\!\(\*OverscriptBox[\(R\), \(_\)]\)", 22],
LabelStyle -> Directive[12],
PlotLegends -> Placed[BarLegend[Automatic], {After, Center}],
ColorFunction -> "Rainbow",
FrameTicks -> {{1, 2, 3, 4, 5, 6, 7, 8}, {1, 2, 3}},
DataReversed -> {True, False}];
I have problems with the numbers in the BarLegend.
I want to have kind of percentage bar, running from the lowest to the maximum value of the data. Also I notice that numbers doesn't appear as decimals.