gkokovidis

2370 Reputation

13 Badges

20 years, 287 days
Draeger Medical Systems, Inc.

 

 

Regards,
Georgios Kokovidis
Dräger Medical

MaplePrimes Activity


These are answers submitted by gkokovidis

Use restart instead of Restart.  It is case sensitive. 

The problem lies with your use of ?gamma, which has an internal value.  You can declare is as local and use it.  Otherwise, if you want to use it as global, call it something like ggama or change the name completely and see if you get the desired result.

 

Regards,

Georgios

Attach your file using the big green up arrow.  Without the file, we can't help.

 

Regards,

Georgios Kokovidis

Dräger Medical

Add a square bracket around the solve command.

a := [solve(.601 = 60*(360*60)/(2*Pi*((R*AU)^3/(G*M))^.5)*3600, R)];

 

Regards,

Georgios Kokovidis

Dräger Medical

See link below.  You might have to re-install Maple.

http://www.maplesoft.com/support/faqs/detail.aspx?sid=150505

 

Regards,

Georgios

Use the command below at the Maple prompt.

libname();

It will display a list of files that get read from the maple.ini file.  My maple.ini file,

on a Windows 7 64-bit installation, is in the C:\Maple18\Users directory.

 

Regards,

Georgios

See the help file for the display command.

At the Maple prompt, type ?display

In order to use this command, you either need to load the plots package, or use the short form of the command.

 

Regards,

Georgios

Try reducing the SOR value.  1.12 works for your particular example.

Compare your results with your specified tolerance (10^(-2))  to the solutions given by the LinearSolve command in the LinearAlgebra library.

 

Regards,

Georgios

See if the example below will meet your needs.  I changed some of the elements of A for illustration.

restart:

A:=<1,5,1|1,3,1|6,2,1>;

subs(1=0,eval(A));

Regards,

Georgios

a:=10;

plot([a,y,y=-10..10]);

Modifiy the range variable for y to your liking.

 

Regards,

Georgios

The immediate problem I see is Digits:=2:

Change this to Digits:=15: and the plot will work fine.  See ?Digits for more help on this.

 

Regards,

Georgios

The display option seems like the easiest way to combine different linestyles for one particular curve over multiple ranges, just like you mentioned.

> restart:with(plots):
> p1:=plot(x^2,x=0..1,linestyle=Solid,thickness=4):
> p2:=plot(x^2,x=1..2,linestyle=Dot,thickness=4):
> p3:=plot(x^2,x=2..3,linestyle=DashDot,thickness=4):
> display(p1,p2,p3);

Here is another way, using the Roots command, which is part of the Student[Calculus1] package.  The plot shows that your function has an infinite number of roots, so you can choose a bounded interval and solve.

restart:
g:=0.88641:
e:=2.53128:
eq:=tan(g)-e*sin(f)/(1+e*cos(f)):
plot(eq,f=-10..10,discont=true);
with(Student[Calculus1]):

Roots(eq,-3 .. 3);

Roots(eq,-10 .. 10);

Regards,

Georgios

You can use the ?display command, which is part of the ?plots package to plot multiple functions.

restart:

with(Student[NumericalAnalysis]); with(plots);
xy := [[0, 4.0], [.5, 0], [1.0, -2.0], [1.5, 0], [2.0, 1.0], [2.5, 0], [3.0, -.5]];
p1 := CubicSpline(xy, independentvar = x):
expand(Interpolant(p1));
x1 := Draw(p1):
p2 := CubicSpline(xy, independentvar = x, boundaryconditions = clamped(0, 6)):
x2 := Draw(p2):
display(x1,x2);

Regards,

Georgios

Try adding a multiplication sign after the "Pi".  See example below.  I also moved your 1.4448608475 to the left hand side, and solved for "s".

 

solve(-.9900000000*sqrt(Pi*(s^2-1/100))*s^2/((4*(s^2-.5000000000))*s-2*s*sqrt(s^2-0.1000000000e-1)*sqrt(s^2-1)-1.*s^3*sqrt(s^2-1)/sqrt(s^2-0.1000000000e-1)-s^3*sqrt(s^2-0.1000000000e-1)/sqrt(s^2-1))-1.448608475,s);

 

Regards,

Georgios

Look at the help page for ?display:

restart:with(plots):
p1:=pointplot({seq([n, sin((1/10)*n)], n = 0 .. 30)}):
p2:=pointplot({seq([n, cos((1/10)*n)], n = 0 .. 30)},color=green):
display(p1,p2);

Regards,

Georgios

5 6 7 8 9 10 11 Last Page 7 of 75