MaplePrimes Questions

Hi,

I'm just doing a small project/HW for school where I am trying to create a histogram of the appearance of the digits of Pi. My problem is that I lose connection with the Maple Kernel whenever I go over 1000 digits. Why? Is this because my function scales badly? Any help would be appreciated.

Thanks in advance.

d:=1500;
Digits:=d;
                              1500
                              1500
valpi:=evalf(Pi):

dg:=proc(n,k)
floor(n/10^(ceil(log10(n)-k))) mod 10;
end:

with(Statistics):
L:=[seq(dg(valpi,i),i=1..d)]:
Histogram(L)

 

I apologise if this information is available on the support pages or on these forums already.

I have found the general solution to a differential equation and now need to plot multiple solution curves that correspond to a different value of a constant.

For example if I had y(x) = x + k, how would I go about plotting this for all the different values of k.

Many Thanks. 

There are many conventions for the Euler angles or other angles used to define o rotation of a 3d plot.
In Maple these angles are in the plot option orientation, but I think that the help page is not correct about them.
The same info appears in a worksheet (see ?rotateplot), so I am even more intrigued. [Note that many authors also switch phi and theta in spherical coordinates].

The help file says:

orientation=[theta, phi, psi]
This orientation specified by these angles is obtained by rotating the plot
1. psi about the x-axis,
2. then phi about the (transformed) z-axis, and
3. then theta about the (transformed) y-axis.
  These angles, given in degrees, are the Euler angles for the transformation matrix, using the axes specified. The angle psi is optional and is assumed to be 0 if not given. If the orientation option is not specified, the default value used is [55, 75, 0].


After some tests it seems that y and z should be switched, i.e. keeping the names (and order) for the angles ==>
1. psi about the x-axis,
2. then phi about the (transformed) y-axis, and
3. then theta about the (transformed) z-axis.

 
Am I right?

 

 


 

restart

G := 6.6743*10^(-8); 1; R := 1336599.126346; 1; rho := 2.2450*10^14; 1; c := 2.9799*10^10; 1; a := 1/(8/3*(6.67*10^(-8)*Pi*rho/c^2))^.5

0.6674300000e-7

 

1336599.126346

 

0.2245000000e15

 

0.2979900000e11

 

4715700.713/Pi^.5

(1)

y(x) = rho*c((1-(x/a)^2)^(1/2)-(1-(R/a)^2)^(1/2))^2/(3*(1-(R/a)^2)^(1/2)-(1-(x/a)^2)^(1/2))

y(x) = 0.1993516000e36/(3*(1-0.8033593953e-1*Pi^1.0)^(1/2)-(1-0.4496840993e-13*x^2*Pi^1.0)^(1/2))

(2)

``


 

Download y(x).mw

I want to have a display() function that plots a certain expression that I already have defined, but then I also want to include a variable number of pointplots into the same graph. I basically want the user to define a set of x and y coordinates into two different arrays in the start of the Maple Worksheet, then later down the worksheet, I want to plot these x,y coordinates as a pointplot, for each point.

But for example, if there are 5 points, I would define the pointplots as p1,p2,p3,p4,p5, which I already have a loop to do automatically depending on however many points that has been defined in the previous arrays. But when I want to plot these in a display() function, I have to write display(p1,p2,p3,p4,p5) individually, and I can't therefore seem to find a way to make it like display(p1,...,pn). I want the display to add more pointplots depending on how many points are defined in the arrays.

Can anyone help me? Sorry if it was difficult to understand, I can explain further if you didn't understand.

I have four matrix equations

P1, P2, P3 are known 4x4 matrix.

A1 A2 A3 A4 are known 1x4 matrix.

x1 x2 x3 x4 are 1x1 known matrix.

U is 4x4 unknown matrix.

These equations are 

(A1T*U*P1*A1) +( (P2*A1)T*U*P1*A1) + ( (P3*A1)T*U*A1) + ( ( P3*A 2)T*U*P1*A1) + x1 =0;

(A2T*U*P1*A2) +( (P2*A2)T*U*P1*A2) + ( (P3*A2)T*U*A2) + ( ( P3*A2 )T*U*P1*A2) + x2 =0;

(A3T*U*P1*A3) +( (P2*A3)T*U*P1*A3) + ( (P3*A3)T*U*A3) + ( ( P3*A3 )T*U*P1*A3) + x3 =0;

(A4T*U*P1*A4) +( (P2*A4)T*U*P1*A4) + ( (P3*A4)T*U*A4) + ( ( P3*A4 )T*U*P1*A4) + x4 =0;

How can i find 4x4 matrix U by using these above four equations??

Thank you

Is it possible to display an internet webpage in a maple?

Hello everybody,

In the linearised theory of gravity, I want to do some symbolic calculations.  First, I need to set that:

Then I want to see how the Christoffel symbols will change by putting the above in this:

Any hint someone?  I really appreciate the help for learning the Physics package.  Thank you in advance.

Mario

 

 

 

I am running MAPLE 2016.1

I am able to set the color option to a function in fieldplot, e.g.

plots[fieldplot]([y, -sin(x)-(1/10)*y], x = -10 .. 10, y = -10 .. 10, arrows = SLIM, color = sin(x)*sin(y))

works as expected.  

However, for plots[fieldplot3d] I cannot set color = f(x,y,z) . E.g.

plots[fieldplot3d]([2*x, 2*y, 2*z], x = -1 .. 1, y = -1 .. 1, z = -1 .. 1, grid = [5, 5, 5], arrows = SLIM, color = sin(x)*sin(y)*sin(z));

Error, (in plot/color) invalid color specification: sin(x)*sin(y)*sin(z)

Please can anyone help?

MRB  

First Question: How to define nx1 matrix Y:=(y1,y2,...,yn) ? (n is a Natural number while it is ungiven)

Second Question: How to derivative of matrix Y with respect to nx1 matrix X:=(x1,x2,...,xn) ?

 


My efforts for the first question:  (I know to define 6x1 matrix etc. , but I dont know to define nx1 matrix

restart: Matrix(1..6,1,symbol=y) 

 

My efforts for the second question:

restart; with(VectorCalculus);
Matrix([x^2, x*y, x*z]);
Jacobian([x^2, x*y, x*z], [x, y, z]);


Can you help me? 

Hello

I am trying to write my Measuring Data into several Arrays with lengt of rowdim

I was able to extract them from the Datafile and Refering them to separate Vectors

My Code is in the attachemend and the Datafile too.

Insert the txt Path in the Messdaten in definition of A to load it.

I was able to convert the Time from Seconds to Minutes. What i realy want is an x-Axis wich is like hh:mm:ss

and Plot for Example T__1,T__2,T__Scheibe together in one Plot as y Axis and t__Minuten as x Axis

But the

plot([seq([`t__Sekunden`[i],`T__1`[i]],i=1..rowdim,LinearAlgebra[rowdim](`t__Sekunden`))

doesnt work and i also tried others

Thank you for your Help

 

Hallo,

im currently using Mathcad 15 and i want to change to a newer and better software with more possibilities.

But up to now i have not found a better software for calculating. One big advantage with mathcad is the possibilitie of symbolic formula input and calculation with units.

Now my question: Is it possible with Maple to write symbolic formulas (2D Structure of big formulas)

I dont write a formula in one row. Its nearly impossible ...

And can i calculate with units?

Thx Stefan

 

I wrote an equation and intended to iterate P(r) till that value of r when P(r) becomes 0.what is the value of r for which P(r)=0, and also  obtained its convergent decreasing graph which show convergence of P(r) to 0.
 

restart

NULL

G := 6.6743*10^(-8);

0.6674300000e-7

 

0.2997924580e11

 

0.7321400000e36

(1)

``

sys2 := diff(P(r), r) = -G*(epsilon+P(r))*((8.98*10^14*(1/3))*Pi*r^3+4*Pi*r^3*P(r)/c^2)/(c^2*(r^2-(2*G*r*(8.98*10^14*(1/3))*Pi*(r^3))/c^2)), P(0.1e-9) = 8.5561*10^34

diff(P(r), r) = -0.7426160269e-28*(0.7321400000e36+P(r))*(0.2993333333e15*Pi*r^3+0.4450600224e-20*Pi*r^3*P(r))/(r^2-0.4445794614e-13*r^4*Pi), P(0.1e-9) = 0.8556100000e35

(2)

``

``


 

Download decreasing_graph.mw

Error, More than two dependent variables, please indicate the desired scene

Trace an ellipse that has 3 or more foci using Maple.

First 1038 1039 1040 1041 1042 1043 1044 Last Page 1040 of 2429