Hello there! I am trying to make some plots for a paper, and I want to make them as simple and elegant as possible. I managed to do some things, but I also want to add some text boxes (without using the editing tool) at any arbitrary position, similar in behavior like this:
PlotLegends -> Placed[{"Exp."}, {0.15, 0.75}]
How can I put some boxes in the plots? I want one somewhere in the top right, and a second one in the bottom right. I also want to make the ticks a little bit longer (I tried to use some Tick related options but I got no results.
Thank you in advance!!
p1 = Plot[x^2 + 2 x + 1, {x, 6, 50}, PlotStyle -> {Thick, Black},
Axes -> False, Frame -> True,
FrameLabel -> {"I [\[HBar]]", "E [MeV]"},
LabelStyle -> { Bold, FontSize -> 15, Black}, GridLines -> None,
PlotStyle -> {{Black, Thick}},
PlotLegends -> Placed[{"Th."}, {0.15, 0.75}], ImageSize -> Large,
PlotRange -> Automatic];
p2 = Plot[x^2 - x + 5, {x, 6, 50}, PlotStyle -> {Thick, Black},
Axes -> False, Frame -> True,
FrameLabel -> {"I [\[HBar]]", "E [MeV]"},
LabelStyle -> { Bold, FontSize -> 15, Black}, GridLines -> None,
PlotStyle -> {{Black, Thick}},
PlotLegends -> Placed[{"Exp."}, {0.15, 0.75}], ImageSize -> Large,
PlotRange -> Automatic];
Show[p1, p2]