I want to add legends in ArrayPlot and my code is like this:
Table[ArrayPlot[
FiniteGroupData[{"CyclicGroup", i}, "MultiplicationTable"],
PlotLegends -> Range[i],
ColorRules -> {x_ -> ColorData["Rainbow"][(x/i)]}],
{i, 1, 10}]
In the first 5 graphs this work well, but after the 6th graph...