User Portlet

@Ronai,  You can just modify the LineLegend option a little bit to have the legend markers in one column: [mcode]colorList = {Black, Blue, Red, Orange, Green, Blue, Green, Black, Red, Orange, Black}; f[x_, b_] := 2 x + b; Plot[{f[x, 0], f[x, 1],...