function = {x, x^2};
time = {10, 5};
TimeUnit="Seconds"
MapThread[Plot[#1, {x, 0, #2},
Epilog -> {Directive[{Thin, Black, Dotted}],
Line[{{2, 0}, {2, #1 /. x -> 2}}]}] &, {function, time}]
I need to be able to include both a description of the function and the epilog line in the plot legend for each pair of functions and time. It seems like I am only able to do one or the other, and I couldn't find a way to get Legended to work.
Also, it would be nice to be able to include exponents in my strings for the plot legend, or at least know how to format the numbers and strings in the proper format so they appear in the correct order in the legend:
PlotLegends -> {"Irr. Time= " #2 " " <> TimeUnit <> "; Max Act: " #1 /. x -> 2 " \[Mu]Ci"}
Mathematica is multiplying the actual values together (which makes sense), but if I try to correct this by passing the values in as strings and joining them together to keep them in order, the scientific expressions/exponents get distrorted when they do appear (the actual code is much more complex than this). Any help would be greatly appreciated.