I would like to plot multiple curves in a single graph with proper legends for different values of θ, similar to the sample figure. However, I am encountering an error while generating the legend. What modifications should I make to correct this? Additionally, how can I display labels such as θ=0.4, θ=0.5 etc., directly inside the plot as shown in the sample?

Graph_legend_error.mw

When I solve for Pr and q simultaneously using Maple, I obtain a solution that differs from my manual derivation. I suspect there may be an issue with the solve function or the way it is specified. Could anyone please suggest how this can be corrected?
Manually solving q* = (Cv-Cd+Ce*tau-Ci)/(4Cr-t) which is different from maple results.

Sheet:Question_1.mw

How can I display numerical values alongside a plot as shown in the sample below? What is the syntax?

Q_legend.mw

I want to present my regional plot similar to the sample shown, using appropriate legends and labels. What syntax should I use to achieve this? Also, the axis labels need to be clear and bold, as they currently appear faded. What modifications should I make in the syntax?

Q1.mw

SAMPLE:

I would like to express the decision variables Pn_W,w_W,Ce_W,i1_W,Pn_D,w_D,Ce_D...other variables...​ in a compact form. Since their analytical expressions are lengthy, I want to identify terms and define appropriate composite parameters to simplify their representation.

Q_shorten_1.mw

For example ,  Suppose the original expression is: q := ((Cn - a)^2 + (P - d - b)*x^2 + Cn - a - b)/y(Cn - a)^2

Lets say Cn - a =X , P - d - b =S

Then the expression can be rewritten as: q = (X^2 + S*x^2 + X - b)/yX^2