Inverting the order of a Table - Prime numbers

In a previous post I asked for the possibility to have a binary image of the coprimality inside the natural numbers. The following code

     TableForm[
table = Table[Boole[CoprimeQ[m, n]], {m, 13}, {n, 13}],


together with

     table == Table[Boole[GCD[m, n] == 1], {m, 13}, {n, 13}]

(* True *)

ArrayPlot[table, FrameTicks -> {Range, Range}]


provides the following the result Unfortunately, I need a plot as given below. The problem is that the vertical axis should go from 1 to 13 and not vice versa. Any idea or tip?

• Reverse.....? – Henrik Schumacher Dec 31 '18 at 23:33
• I rolled back your latest edit that removed the contents of your question. Since somebody put in effort to answer your question, you should leave it intact so their answer makes sense. – MarcoB Mar 18 at 13:32

Use the option DataReversed:

ArrayPlot[table, Frame -> True, FrameTicks -> {Range, Range},
DataReversed -> True, Mesh -> All] table2 = Table[Boole[And @@ PrimeQ[{m, n}]], {m, 13}, {n, 13}];
ArrayPlot[table2, Frame -> True, FrameTicks -> {Range, Range},
DataReversed -> True, Mesh -> All] 