I'm trying to include the legends inside the frame of the plot like this
Here is my Attempt:
ListPlot[{{2, 5, 2, 8, 6, 8, 3}, {1, 2, 5, 2, 3, 4, 3}},
PlotMarkers -> {"\[SixPointedStar]", 15}, Joined -> True,
PlotStyle -> {Orange, Green},
PlotLegends ->
Placed["line1", "line2",
LegendFunction -> (Framed[#, FrameMargins -> 0] &)], Frame -> True]
My references: