mschneider

50 Reputation

5 Badges

2 years, 210 days

MaplePrimes Activity


These are questions asked by mschneider

Hi all,

I am trying to have the following display correctly....

ans1:=7/9;

ans2:=1/4;

XMLTools[Print](MathML[Export](ans1;ans2);  THIS IS THE PROBLEM LINE:  I know why this is a problem but need a work around.

Essentially I would like to display:  ans1 ; ans2,  i.e with a semicolon between the two answers.

I am trying to construct a random set of angles measured in degrees with pairs that are the equivalent in radians.  for example [0,0],[90,Pi/2],[-30,-Pi/6],etc...  but completely random.

so far I have the following:

restart;
randomize();
a := rand(-90 .. 90);
seq([a(i), convert(a(i)*degrees, radians)], i = 1 .. 4);

the trouble is it appars it is randomizing a both times it is called in the sequence.  I would like to have it randomize for each iteration in the sequence.

thanks in advance.

Hello I have the following small piece of code.

XMLTools[Print](MathML[Export]('sin(theta)'=0.25));

which exports sin(theta)=.25, how do I force the 0 to display.

 

Also

why does the following fail:

sol:=solve([cot(x)=2,x>=0,x<2*Pi],x,AllSolutions, Explicit);

How do I get a system solve to dispaly an ordered triple and not {x=ans, y=ans, z=ans}

for instance

sys := { z = 4, x+y= 10, x-y = 5 };
L:=solve(sys, {x,y,z} );

displays

{x=7.5, y=2.5, z=4}

I want 

{7.5,2.5,4}

When I execute the following code in Maplesoft on my computer, there are no problems.  However when I execute the same code in mapleTA occasionally Maple only finds a single input value corresponding with h_given.  Anybody have any idea what is going on?

Basically I have a function, f,  that I am only interested in plotting and analyzing real-valued inputs, t, from =0 to 100 (or so).  At some point I assign an output value, h_given, and I wish to find the correlated real-valued inputs.  From the graph you can clearly see that there are 2 inputs, however the script occassionally only produces 1 output. (when running on mapleTA).

Thanks in advance,

with(Optimization):
with(plots):
restart:
randomize():
a := MapleTA:-Builtin:-range(1800, 2300, 100):
b := (1/10)*MapleTA:-Builtin:-range(4, 8, 1):
timeT := MapleTA:-Builtin:-range(70, 100, 10):
f := -t*(b*t-b*timeT)^2*(cos(.15*t+4)^2-3)/a:
maxs := NLPSolve(f, t = 0 .. timeT, maximize):
maxim := maxs[1]:
graph := plot(f, t = 0 .. timeT, gridlines = true, 0 .. maxim+10, labels = [t, h(t)], labeldirections = [horizontal, vertical]);
h_given := 10;
expr := h_given-f:
answer_t := Student:-Calculus1:-Roots(expr, t = 0 .. timeT+5);
evalf(answer_t, 2);

1 2 3 4 5 Page 4 of 5