Labels for each curve on a multi-curve plot using an efficient method(without writing a large code)

Question

I have a question on plot labeling in Mathematica. I have

y = 4 x / L + 2

where

L = {10, 20, 30, 40}

I want to draw a graph of y vs. x. When I evaluate

Plot[y, {x, 0, 100}, 
   ImageSize -> Scaled[1.0],
   PlotLabel ->  Style["y vs X ", FontSize -> 18]]

I get four different lines in the same plot. I want to know how to label each line with its relevant L value; e.g., "l = 10" for the corresponding line.

Could anyone please tell me how to do this?

As is, your plot plots all the lines on the same plane. Do you want an inset labeling each line on the plane, or four separate plots? — VF1, Mar 07 '13 at 05:01
yes, I want to label each line on the plane.(As l=10 for line corresponds to that) — TMH, Mar 07 '13 at 05:02
change like this: dat = "L=" <> ToString@# & /@ {10, 20, 30, 40}; — yulinlinyu, Mar 07 '13 at 05:10
@yulinlinyu Could you please send me the complete code which I want write? — TMH, Mar 07 '13 at 05:14
Take a look at http://mathematica.stackexchange.com/a/14149/193 — Dr. belisarius, Mar 07 '13 at 05:42

Vitaliy Kaurov · Accepted Answer · 2013-03-07T05:14:22.257

8

I think this is a duplicate but I couldn't find the original - so here it is along those lines:

y[x_, L_] := 4 x/L + 2

dat = {10, 20, 30, 40};

Plot[y[x, #] & /@ dat // Evaluate, {x, 0, 100}, 
 Epilog -> (Text["L = " <> ToString[#], {70, 0 + y[80, #]}] & /@ dat)]

enter image description here

edited Mar 07 '13 at 05:14

answered Mar 07 '13 at 05:03

Vitaliy Kaurov

73,078
9
204
355

not like this. I want a label "l=10" near the line correspond to l=10 – TMH Mar 07 '13 at 05:06
I am getting an error like this. SetDelayed::write: Tag List in {2+(2 x)/5,2+x/5,2+(2 x)/15,2+x/10}[x_,L_] is Protected. >> – TMH Mar 07 '13 at 05:18
@Vitaly Kaurov This is what I want. Unfortunately, I am getting an error. Could you explain me the reason? – TMH Mar 07 '13 at 05:23
@TMH You probably have some old definitions. Restart Mathematica. Or just compute Exit on a new line and re-evaluate. – Vitaliy Kaurov Mar 07 '13 at 05:23
Yes,It works now. Thanks a lot Vitaliy. – TMH Mar 07 '13 at 05:24
@VitaliyKaurov Here is a possibility (self promotional :D ) http://mathematica.stackexchange.com/a/14149/193 – Dr. belisarius Mar 07 '13 at 05:44
@belisarius well it worked - you got a +1 ;) – Vitaliy Kaurov Mar 07 '13 at 05:49

Labels for each curve on a multi-curve plot using an efficient method(without writing a large code)

1 Answers1