## 571 Reputation

17 years, 282 days
Technical professional in industry or government
Budapest, Hungary

## random samples in fixed interval...

In newer Maple versions one can use the Sample command with the range option for this purpose:

restart;
with(Statistics):
m:=2903.5;sigma:=3;
Lower:=m-5;Upper:=m+5;
SampleNo:=10;
X := RandomVariable(Normal(m, sigma));
samples := Sample(X, SampleNo, method = [envelope, range = Lower ..Upper]);

## InertForm:-NoSimpl...

Another variant in Maple 18 using InertForm:-NoSimpl:

use InertForm:-NoSimpl in F:=x*(y+z)/x end use;
subs({`%/`=Divide,`%*`=Mult,`%+`=Plus},F);

## forward slash or two backslashes...

Try it with / or  \\  instead of backslash in the path name. Maple uses the backslash for other purposes.

` L := Import("C:/parameters15.xlsx", "Sheet1", "A2:I2");`

## It's ok with classic worksheet...

Thanks for the answers.

It seems to me that the problem occurs when I execute expand.

I 've tried it with classic worskheet, it works perferctly.

I also acitvated the invisible' characters menu but I haven't seen any strange characters.

## typeset...

You can use the typeset structure too:

plot(x,labels=["x values",typeset(SAO[2],"(%)")]);

See it in the help: ?plot/typesetting

## Physics[diff]...

You can use the diff command from the Physics package too.

Physics[diff](T,diff(U[2,1](t),t));

## solvefor...

solvefor[d]({r*rr=0, a*p*d=rr});

[{d = 0, rr = 0}, {d = rr/(a*p), r = 0}]

## `diff/f`...

`diff/f` := proc () 2*x end proc;

diff(f(x),x);

Diff(f(x),x)=value(Diff(f(x),x));

## semicolon...

A semicolon or a colon is also missing at the end of the local variables definition line.

## missing < and Fit instead of fit...

There are problems with two lines in your original code, I have corrected them as follows:

Y:=<3.7,9.39,23.09,58.60,153.41,309.43,1103.63,2988.98,1112.08,22036.47>:

solution := Statistics:-Fit(eqn, X, Y, x, output = parametervalues);

## increasing distance...

You can increase the distance between the output expressions using a pair of left single qoutes (empty symbol):

A := Array([x^4-4, ``, x^3+8]);
map(factor, A);

## textplot or legend...

A solution with textplot (using Joe Riel's one-liner )  :

p1:=seq(plot(2*x+i/2,x),i=0..10):
p2:=seq(plots:-textplot([0.5,2*.5+i/2,y=i/2],align = {right}),i=0..10):
plots:-display(p1,p2,view=[-1..3,-1..8]);

You can also use the legend option and the setcolors command to assign different colors for the curves:

plots:-setcolors(["Red","Blue","Green","Orange","Turquoise","Violet","Brown","NavyBlue", "SkyBlue","Pink","Gold"]):

plot([seq(2*x+i/2,i=0..10)],legend=[seq(y=i/2,i=0..10)],view=[-5..5,-5..5]);

## SystemConnect in Maple 14...

You can use the SystemConnect command for this purpose in Maple 14. (It is part of the DynamicSystems package).

## allsolve from Maple Advisor Database...

You can also use the allsolve command from the free Maple Advisor Database:

allsolve(A3,S=0..1);

[0.4329927503e-1, .9619584407]

## difff from Aladjev's library...

You can use difff  from the free Aladjev's library:

F:=y(x)^2;

difff(F,y(x));

2*y(x)

z := y^2*diff(y(x),x)^3;

difff(z,diff(y(x),x));

3*y^2*(diff(y(x), x))^2

 1 2 3 4 5 Page 1 of 5
﻿