1. Forum
  2. Usenet
  3. COMP.SOFT-SYS.MATH.MAPLE

  • marking each curve in a 2-D plot

    From jfh@21:1/5 to All on Thu May 2 18:37:27 2019
    This little two-line Maple program draws two curves y=f(x,H) on the same (x,y) plane with different values of the variable H.

    f:=(x,H)->(cos(x)*exp(H*cos(x)));
    plot([f(x,0.2),f(x,1)], x=0..2*Pi,scaling=constrained);

    How does one get the value of H written halfway along its own curve at the point
    [Pi,f(Pi,H)] ? I am using Maple 2017 (X86 64 LINUX).

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From none) (Rouben Rostamian@21:1/5 to [email protected] on Fri May 3 02:49:27 2019
    In article <[email protected]>,
    jfh <[email protected]> wrote:
    This little two-line Maple program draws two curves y=f(x,H) on the same >(x,y) plane with different values of the variable H.

    f:=(x,H)->(cos(x)*exp(H*cos(x)));
    plot([f(x,0.2),f(x,1)], x=0..2*Pi,scaling=constrained);

    How does one get the value of H written halfway along its own curve at
    the point
    [Pi,f(Pi,H)] ? I am using Maple 2017 (X86 64 LINUX).

    Give a name to that plot, as in:
    restart;
    with(plots):
    f:=(x,H)->(cos(x)*exp(H*cos(x)));
    p := plot([f(x,0.2),f(x,1)], x=0..2*Pi,scaling=constrained);

    Then add text:
    display([p,
    textplot([Pi,f(Pi,0.2), typeset(H = 0.2)], align=below),
    textplot([Pi,f(Pi,1.0), typeset(H = 1.0)], align=above)]);

    The result is not great because the added text overlaps with
    the axis labels, making a mess. It's better to add the text
    at the far right, as in
    display([p,
    textplot([2*Pi,f(2*Pi,0.2), typeset(H = 0.2)], align=right),
    textplot([2*Pi,f(2*Pi,1.0), typeset(H = 1.0)], align=right)]);


    --
    Rouben Rostamian

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From jfh@21:1/5 to none Rouben Rostamian on Sun May 5 16:40:25 2019
    On Friday, May 3, 2019 at 2:49:28 PM UTC+12, none Rouben Rostamian wrote:
    In article <[email protected]>,
    jfh <[email protected]> wrote:
    This little two-line Maple program draws two curves y=f(x,H) on the same >(x,y) plane with different values of the variable H.

    f:=(x,H)->(cos(x)*exp(H*cos(x)));
    plot([f(x,0.2),f(x,1)], x=0..2*Pi,scaling=constrained);

    How does one get the value of H written halfway along its own curve at
    the point
    [Pi,f(Pi,H)] ? I am using Maple 2017 (X86 64 LINUX).

    Give a name to that plot, as in:
    restart;
    with(plots):
    f:=(x,H)->(cos(x)*exp(H*cos(x)));
    p := plot([f(x,0.2),f(x,1)], x=0..2*Pi,scaling=constrained);

    Then add text:
    display([p,
    textplot([Pi,f(Pi,0.2), typeset(H = 0.2)], align=below),
    textplot([Pi,f(Pi,1.0), typeset(H = 1.0)], align=above)]);

    The result is not great because the added text overlaps with
    the axis labels, making a mess. It's better to add the text
    at the far right, as in
    display([p,
    textplot([2*Pi,f(2*Pi,0.2), typeset(H = 0.2)], align=right),
    textplot([2*Pi,f(2*Pi,1.0), typeset(H = 1.0)], align=right)]);


    --
    Rouben Rostamian

    Thank you. My problem was that none of ?plot ?plot/details or ?plot/options led to textplot or warn me that with(plots) and display were needed.

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)