Items tagged with table table Tagged Items Feed

If I want to make a display of data, say 2 columns of data, with a heading on top of each column, how would one go about this in Maple? This will be for display purposes only (say for final result of a homework result, etc..)  

In Mathematica, I use the Grid command. I am not sure how to do this in Maple. I could not find Grid like command in Maple.

I can generate the data in 2 sequences  in Maple, but need to insert a heading, and also need to insert frame around eveything.

Here is an example:

f:=x->x^2;
g:=x->x^3;
data=[seq([i,f(i),g(i)],i=0..5)];
    #data = [[0, 0, 0], [1, 1, 1], [2, 4, 8], [3, 9, 27], [4, 16, 64], [5, 25, 125]]

The above data has 3 columns, 6 rows. I need to insert first row also called {"index","f","g"} and then display all in nice table form. This is how I would do the above in Mathematica to give idea of what I looking for

f[x_] := x^2;
g[x_] := x^3;
data = Table[{i, f[i], g[i]}, {i, 0, 5}]
    (* {{0, 0, 0}, {1, 1, 1}, {2, 4, 8}, {3, 9, 27}, {4, 16, 64}, {5, 25, 125}} *)

And this is below the part I do not know how to emulate in Maple:

data = Insert[data, {"i", "f(i)", "g(i)"}, 1]
    #   {{"i", "f(i)", "g(i)"}, {0, 0, 0}, {1, 1, 1}, {2, 4, 8}, {3, 9, 27}, {4, 16, 64}, {5, 25, 125}}
    # now use Grid to format with frame around everything
Grid[data, Frame -> All]

Hi Maple friends.

I created this table using the table component from the componwnts palette. But I can't plot it - Maple just plots the second column as horizontal lines. I want the first column to be the x values, and the second column to be the y values. How can I plot it? 

Also, the table component automatically generates the the incremental values starting from 1, so I only need to create a 1 column table. But how can I plot the table, using the auto generated values?

Thanks in advance.

EDIT: There is a 'embedded plot window' component, which may somehow plot data in the table component, but I can't get it to work. I've tried dragging the table component into it with no succes.

 

Hi all;

I have following program for plotting numerous function using hybrid functions.

if g1(t) is arbitrary function and g2(t) is its approximate by hybrid functions, I want to have a table of g1(t)-g2(t) for different value of t. but the result is without numeric values. what part is wrong????

best wishes

OHB.mws

Mahmood   Dadkhah

Ph.D Candidate

Applied Mathematics Department

how to access the variable which is currently running in another worksheet

to use for loop to read the Table

when worksheet is evaluating for a very long time, 

expect to read the value Table T in anther worksheet

 

worksheet1

for i from 1 to nops(polylistresult) do

if i < j then
for j from 1 to nops(polylistresult) do
for k from 1 to nops(polylistresult) do

if j < k then

with(Groebner):
F := [polylistresult[i], polylistresult[j], polylistresult[k]];
h := function1(F, {x, y, z}, s);
T[h] := [op(T[h]), F];

end if:
od:

end if:
od:
od:

worksheet2 :

for i in indices(T) do
oo:=i[1];
od:

Hello,
I have some variables which usually have a specific value. I also have some parameters which are calculated using the previously mentioned constants. Sometimes though I want to change the value of the constants and re-calculate the parameters. Therefore I created a library with the initial values of the constants which I load inside a procedure which calculates the parameters. That way I can change the value of the constants and the initial values are not overwritten. My problem is that I want to export the calculated parameters and the value of the constants at the specific calculation. How do I do that_ I don't have an array, table or anything like that. Should I put my parameters in a table?

Thank you for your time.

https://drive.google.com/file/d/0B2D69u2pweEvaUNnVWdXbm9WT3c/edit?usp=sharing

for base 10

1 op1 5 = 

        01

op1   12

_________

first digit of first number 1     = 1

first digit of second number 1 = 2

 then find 12 in logic table, it is 1, separation is 1 means move the value 1

to left 1 digit become 10

convert 10 back from base 3 to base 10, it is 3

how to construct this unknown name operator table with the custom logic table Min, Except, Diff

based on the operation described

 

no matter the logic table is correct or not, hope to mechanize these calculation steps for developing 3 operation table for base 10 quickly.

is it possible to develop a new kind of algebra with 3 new operators with the use of 3 operation table?

 

 

How does one adjust the aspect ratio for Maple plot? I actually searched for aspect ratio for Maple on google and not able to find much of anything. Help does not have such phrase. May be it called something else in Maple? The reason I ask, is that when I change the size of bode plot, the aspect ratio become bad. So I need a way to adjust that. Here is an example

restart:
alias(DS=DynamicSystems):
sys:=DS:-TransferFunction(5*s/(s^2+4*s+25)):
DS:-BodePlot(sys,range=0.1..100);

Now if I do

DS:-BodePlot(sys,range=0.1..100,size=[300,"default"]);

I am finding so many problems with Bodeplot in Maple, but this is for another time. I think it needs much more polishing

Maple 18, windows 7

I have some data for a model in MapleSim that I would like to use a time look up table with.  I've found that the two options for interpolation are linear and 1st derivative, but the data was intended to be interpretted as piecewise constant.  Is there any way to acheive this option in MapleSim?

I am trying to find out the stiffness matrix of composite by using iterative loop that sums over each laminate and adds the result to the previously calculated matrix 

D=null matrix

for i to 4 do Dply := evalf(evalm((1/3)*Q[i]*(z(i+1)^3-z(i)^3))); D := evalm(D+Dply) end do;
evalm(D);

although the values are coming out fine but in the diagonalm elements, it shows the true value + _rtable[4456495426] which I am not able to figure out why is it coming?

 

hi,

I want to solve this to data table , i can plot but i need data in table 

 

sol1 := dsolve([diff(u(theta),theta) = 427.2461*u(theta)+385620.123/u(theta)-25671.3871, u(0) = .6], numeric);

plots[odeplot](sol1, 0..0.18, color = red);

 

thanks.

Hello

 

Is it me or is it not possible to hide table borders in Maple 18?

I can not hide the borders when I make tables ind Maple 18..

 

Jakob

Hello Hello everybody 
   I have to solve the following differential equation numerically 


``

 

restart:with(plots):

mb:=765 : mp:=587 : Ib:=76.3*10^3 : Ip:=7.3*10^3 : l:=0.92 : d:=10: F:=490: omega:=0.43 :

eq1:=(mp+mb)*diff(x(t),t$2)+mp*(d*cos(theta(t))+l*cos(alpha(t)+theta(t)))*diff(theta(t),t$2)+mp*l*cos(alpha(t)+theta(t))*diff(alpha(t),t$2)+mp*(d*diff(theta(t),t)^2*sin(theta(t))+l*(diff(theta(t),t)+diff(alpha(t),t))^2*sin(alpha(t)+theta(t)))-F*sin(omega*t)=0;

1352*(diff(diff(x(t), t), t))+587*(10*cos(theta(t))+.92*cos(alpha(t)+theta(t)))*(diff(diff(theta(t), t), t))+540.04*cos(alpha(t)+theta(t))*(diff(diff(alpha(t), t), t))+5870*(diff(theta(t), t))^2*sin(theta(t))+540.04*(diff(theta(t), t)+diff(alpha(t), t))^2*sin(alpha(t)+theta(t))-490*sin(.43*t) = 0

(1)

eq2:=(mp+mb)*diff(z(t),t$2)-mp*d*(sin(theta(t)+alpha(t))+sin(theta(t)))*diff(theta(t),t$2)-mp*l*sin(alpha(t)+theta(t))*diff(alpha(t),t$2)+mp*(d*diff(theta(t),t)^2*cos(theta(t))+l*(diff(theta(t),t)+diff(alpha(t),t))^2*cos(alpha(t)+theta(t)))+9.81*(mp+mb)-F*sin(omega*t)=0;

1352*(diff(diff(z(t), t), t))-5870*(sin(alpha(t)+theta(t))+sin(theta(t)))*(diff(diff(theta(t), t), t))-540.04*sin(alpha(t)+theta(t))*(diff(diff(alpha(t), t), t))+5870*(diff(theta(t), t))^2*cos(theta(t))+540.04*(diff(theta(t), t)+diff(alpha(t), t))^2*cos(alpha(t)+theta(t))+13263.12-490*sin(.43*t) = 0

(2)

eq3:=mp*(d*cos(theta(t))+l*cos(alpha(t)+theta(t)))*diff(x(t),t$2)-mp*(l*sin(theta(t)+alpha(t))+d*sin(theta(t)))*diff(z(t),t$2)+(Ip+Ib+mp*(d^2+l^2)+2*mp*d*l*cos(alpha(t)))*diff(theta(t),t$2)+[Ip+mp*l^2+mp*d*l*cos(alpha(t))]*diff(alpha(t),t$2)-mp*sin(alpha(t))*(l*d*diff(alpha(t),t)^2-l*d*(diff(alpha(t),t)+diff(theta(t),t))^2)+mp*9.81*l*sin(alpha(t)+theta(t))+mp*9.81*d*sin(theta(t))=0;

587*(10*cos(theta(t))+.92*cos(alpha(t)+theta(t)))*(diff(diff(x(t), t), t))-587*(.92*sin(alpha(t)+theta(t))+10*sin(theta(t)))*(diff(diff(z(t), t), t))+(142796.8368+10800.80*cos(alpha(t)))*(diff(diff(theta(t), t), t))+[7796.8368+5400.40*cos(alpha(t))]*(diff(diff(alpha(t), t), t))-587*sin(alpha(t))*(9.20*(diff(alpha(t), t))^2-9.20*(diff(theta(t), t)+diff(alpha(t), t))^2)+5297.7924*sin(alpha(t)+theta(t))+57584.70*sin(theta(t)) = 0

(3)

eq4:=mp*l*cos(alpha(t)+theta(t))*diff(x(t),t$2)-mp*l*sin(alpha(t)+theta(t))*diff(z(t),t$2)+(Ip+mp*l^2+mp*d*l*cos(alpha(t)))*diff(theta(t),t$2)+(Ip+mp*l^2)*diff(alpha(t),t$2)-mp*9.81*l*sin(alpha(t)+theta(t))+l*d*mp*diff(theta(t),t$1)^2*sin(alpha(t))=0;

540.04*cos(alpha(t)+theta(t))*(diff(diff(x(t), t), t))-540.04*sin(alpha(t)+theta(t))*(diff(diff(z(t), t), t))+(7796.8368+5400.40*cos(alpha(t)))*(diff(diff(theta(t), t), t))+7796.8368*(diff(diff(alpha(t), t), t))-5297.7924*sin(alpha(t)+theta(t))+5400.40*(diff(theta(t), t))^2*sin(alpha(t)) = 0

(4)

CI:= x(0)=0,z(0)=0,theta(0)=0,alpha(0)=0,D(x)(0)=0,D(alpha)(0)=0,D(z)(0)=0,D(theta)(0)=0;

x(0) = 0, z(0) = 0, theta(0) = 0, alpha(0) = 0, (D(x))(0) = 0, (D(alpha))(0) = 0, (D(z))(0) = 0, (D(theta))(0) = 0

(5)

solution:=dsolve([eq1,eq2,eq3,eq4, CI],numeric);

Error, (in f) unable to store '[0.]/(0.17571268341557e16+[-0.25659510610770e15])' when datatype=float[8]

 

 

 

I don't know why it says : Error, (in f) unable to store '[0.]/(0.17571268341557e16+[-0.25659510610770e15])' when datatype=float[8]

 

Help pleaase!

thank you !!!

Download systéme_complet.mw

 

In order to make worksheets more interactive in a teaching environment I have begun playing around with the Tables the standard GUI provides. The idea is that in the left column is the script we are working through while in the right column is space a student can work with the equations and formulae from the left side to, e.g., plot, change parameters etc. without affecting the script too much.

To build the tables I copy-pasted code from a normal worksheet (in document mode) into the left column, creating rows of appropriate length to have a logically coherent section in one row. Usually one row is one Section (in the technical sense of Maple Sections). The student gets to play in the right column.

In principle this seems to work quite well in my preliminary testing. I did find out rather quickly that on the right side one needs to be in 1-d input mode with a prompt for anything to be calculated interactively. Ok, actually probably easier to do. The table is set to evaluate by row so the right-left correspondence is preserved.

A potential issue I am facing however is with equation numbering: I use equation numbers extensively to reference back to upstream results. In the Table, it appears that equation numbers are not unique; in each row of the Table, eq. numbers start as (1.1), (1.2) etc. I am able to reference back to results from a prior row, even though the same equation number will show up again later in the new row. But I am concerned that eventually this all ends up in a big mess and my references point to the wrong expression or equation. Non-unique line numbers seem like a Really Bad Idea, and I'd like to avoid that if possible.

Does anyone know how the lines numbers work for code in Tables and how I make sure they are unique? I suppose I could explicitly assign results I need in other rows to names, but that does not prevent a reference to an eq. number from pulling in the wrong one from a prior row (assuming for the moment that Maple will never look forward to resolve a reference).

Thanks,

Mac Dude

Dear all;

Please I have maybe a simple question. I need to point these nodes in R^3 using Maple. Thanks for your help.

Tab := [[0, 0, 0], [1/5, 0, 0], [2/5, 0, 0], [0, 1/5, 0], [1/5, 1/5, 0], [2/5, 1/5, 0], [0, 2/5, 0], [1/5, 2/5, 0], [2/5, 2/5, 0], [0, 0, 1/5], [1/5, 0, 1/5], [2/5, 0, 1/5], [0, 1/5, 1/5], [1/5, 1/5, 1/5], [2/5, 1/5, 1/5], [0, 2/5, 1/5], [1/5, 2/5, 1/5], [2/5, 2/5, 1/5], [0, 0, 2/5], [1/5, 0, 2/5], [2/5, 0, 2/5], [0, 1/5, 2/5], [1/5, 1/5, 2/5], [2/5, 1/5, 2/5], [0, 2/5, 2/5], [1/5, 2/5, 2/5], [2/5, 2/5, 2/5]]

This table contains some point of R^3. How can I put these point.

Consider the ring R of upper-triangular matrices over the field of 3 elements.  I would like to have a multiplication table for this ring. Is it possible to generate such a table in Maple?  Thank you.

1 2 3 4 5 Page 1 of 5