Listplot legend in one column

Question

I am trying to plot multiple curves with ListPlot. Since I have 12 curves to plot, the legend appears in two columns. I looked into this solution but it does not work with Listplot. Can anyone help?

Thanks, Saeid

Answer 1

SeedRandom[1234];

data = Reverse@Transpose[
    Sort /@ RandomReal[1, {10, 12}]];

If the ListPlot is Joined

ListPlot[data, Joined -> True,
 PlotLegends -> LineLegend[Automatic,
   LegendLayout -> {"Column", 1}]]

If not Joined

ListPlot[data,
 PlotLegends -> PointLegend[Automatic,
   LegendLayout -> {"Column", 1}]]