Benchmark Plots

SetDirectory[NotebookDirectory[]];
{nGS, GSnn, GStn,GStt,GSnt}=Transpose[Import["GSL_Data","Table"]];
{nMK, MKnn, MKtn,MKtt,MKnt}=Transpose[Import["MKL_Data","Table"]];
{nGScc, GSnncc, GStncc,GSttcc,GSntcc}=Transpose[Import["GSL_Data_cc","Table"]];

GSPic=ListLogLogPlot[ {
Transpose[{nGS,GSnn}],
Transpose[{nGS,GStn}],
Transpose[{nGS,GStt}],
Transpose[{nGS,GSnt}]
},
PlotLabel->"GS"
]
GSccPic=ListLogLogPlot[ {
Transpose[{nGScc,GSnncc}],
Transpose[{nGScc,GStncc}],
Transpose[{nGScc,GSttcc}],
Transpose[{nGScc,GSntcc}]
},
PlotLabel->"GScc"
]
MKPic=ListLogLogPlot[ {
Transpose[{nMK,MKnn}],
Transpose[{nMK,MKtn}],
Transpose[{nMK,MKtt}],
Transpose[{nMK,MKnt}]
},
PlotLabel->"MK"
]

ListLogLogPlot[ {
Transpose[{nMK,MKnn/GSnn}],
Transpose[{nMK,MKtn/GStn}],
Transpose[{nMK,MKtt/GStt}],
Transpose[{nMK,MKnt/GSnt}]
},
PlotLabel->"MK/GS",
FrameLabel->{"matrix dimensions n", "Speed Up MK/GS"}
]

ListLogLogPlot[ {
Transpose[{nMK,GSnncc/GSnn}],
Transpose[{nMK,GStncc/GStn}],
Transpose[{nMK,GSttcc/GStt}],
Transpose[{nMK,GSntcc/GSnt}]
},
PlotLabel->"GScc/GS",
Frame->True,
(* PlotRange->All, *)
FrameLabel->{"matrix dimensions n", "Speed Up GScc/GS"}
]

ListLogLogPlot[ {
Transpose[{nMK,MKnn/GSnn}],
Transpose[{nMK,MKtn/GStn}]
},
PlotLabel->"MK/GS",
(* PlotRange->All, *)
Frame->True,
FrameLabel->{"matrix dimensions n", "Speed Up MK/GS"}
]

ListLogLogPlot[ {
Transpose[{nMK,MKtt/GStt}],
Transpose[{nMK,MKnt/GSnt}]
},
PlotLabel->"MK/GS",
(* PlotRange->All, *)
Frame->True,
FrameLabel->{"matrix dimensions n", "Speed Up MK/GS"}
]

GSPic=ListLogLogPlot[ {
Transpose[{nGS,GSnn/GSnncc}],
Transpose[{nGS,GStn/GStncc}]
},
PlotRange->All,
PlotLabel->"GS/Gscc"
]