Hi all,

I want to save a plot into Array or other and re-plot it by pointplot.

restart:with(plots):

f:=x->cos(x)+cos(x)^2;

plot(f(x),x=0..2*Pi);

With Array, I want to determine dx (step) of the plot (Array) and the dimension of Array (number of line and column).

If Pk:=plot(f(x),x=0..2*Pi); is Array, I can reproduce the plot as:

ef := {seq([Pk[i,1], Pk[i,2]], i = 1 .. N)}: # Pk[i,1] is x and Pk[i,2] is f(x), N number of line of Array

Answering to that question, I posted several procedures finding minimal polynomials for the elements of finite fields. The best one was the following,

alias(a=RootOf(T^100+T^97+T^96+T^93+T^91+T^89+T^87+T^86+T^82+T^81+T^71+T^70+T^67+T^61+
T^60+T^57+T^54+T^53+T^52+T^49+T^48+T^45+T^44+T^42+T^39+T^36+T^33+T^32+T^31+T^29+T^28+T^27+
T^26+T^24+T^23+T^22+T^18+T^17+T^16+T^14+T^13+T^12+T^10+T^8+T^7+T^6+T^3+T+1)):

F:=GF(2,100,op(a)):
z:=F:-input(2):

MinPolyGF:=proc(x,y:=_X)
local A, i;
A:=Matrix(100,...

I would like to do the following.

Ive got variables a(z) where z(tau). Now I would like to do something like:

>> t = z(tau);

>> a := a(z);

>> diff(a,tau);

  == (da/dz)*(dz/dtau)

Hi,

I have the function:

restart: with(plots): with(OrthogonalExpansions): with(DiscreteTransforms):

f:=t->piecewise(t<0,0,t<1,t,t<2,2-t,0);

The Fourier coefficients a[0], a[i] and b[i] can be calculated by:

T:=2: Trig:=FourierSeries(f(t),t=0..T,n,'Coefficients');

a[0]:= op(1, Coefficients);a[i]:= op(1, op(2, Coefficients))[1];b[i]:= op(1, op(2, Coefficients))[2];

I want to calculate those coefficients a[0...

Defined a demand function:

x:=(p,w)->w/(p[1]+p[2]+p[3])*Vector([p[2]/p[1],p[3]/p[2],p[1],p[3]])

The Slutsky Matrix is calculated as Dpx(p,w) + Dwx(p,w) x(p,w)^T with Dpx(p,w) = Jacobian for p1, p2, p3 and Dwx(p,w) is a column vector of the derivate of x1, x2, x3 in respect to w.

Step by step:

Dxp := Jacobian(x(p,w),[p[1],p[2],p[3]])

yields the correct Jacobian.

For Dwx I've tried several different methods, i.e.

Dwx := Jacobian(x(p,w),[w...

I am having a problem with variable assignment.

output 15 should be:

test :=[1]

[2]

[1 1]

At some point, the array test is being overwritten even though in my proceedure I use only local variables.

> I found this information and code quite useful. Now my set t1 changes slightly to include I and -I. I also set up conditionl statements to extract the right elements according to the criteria on the value of beta*Q as adviced previously. I then test this out using the values for (beta,Q) as (1,1), (-1,1),(0,1).

When beta*Q is positive (one in this case) I is not selected...

I'm looking for a quick way, preferrably without using any loops to 'map' a function using several vectors.

In the single vector case, this is quite easy, but with multiple vectors, I'm not sure if map is the correct command to use.

For example:

u:=<1,1,1>;
v:=<2,3,4>;

f:=(x,y)->ln(x-y);

What I'd like to do is create a new vector from the map of the function onto both vectors,...

Dear All,

I'm a beginner who is learning Finite Field under the help of Maple. I'm wondering is there a command to compute the minimal polynomials for the members of a finite field?

For instance, for GF(16) realized by the polynomial a^4 = a + 1,we know that for a's minimal polynomial is x^4 + x + 1, a^3's minimal polynomial is x^4 + x^3 + x^2 + x + 1. In Maple, how do I reproduce such result?

Thank you very much for your help,

Best,

Kelvin

Hi! Normally recursively defined functions work well, but if I use a sum inside, this happens:

> y:=n->sum(y(k),k=0..n-1);

                                   n - 1
                    ...

I need to send a Maple worksheet (.mw) to someone who is not a Maple user,doesn't have Maple installed.So what is the simplest possible solution now?How can I convert this into a pdf/doc/ps/eps  file so that any document viewer can open it?

Hi,

I'm having some troubles in solving an equation which has the following form:

S. Inv(R). T = L

whereas S is a [nx1] row vector, T is a [1xn] colomn vector, R is a [nxn]Matrix and L is a scalar.

The problem is that R is a quite complicated function of a single variable for which i want to solve this system. Thus the analytical matrix inversion doesnt work.

Do you have any suggestions how i can solve this in a numerical way?...

Hi, Can Maples Logic package solve these problems?

How can they be formulated and solved in Maple? rgds

Let's say that the following arguments are true: Some gatekeepers are warriors. Some warriors are cowards. Therefore, we can conclude that some gatekeepers must be cowards. Is this conclusion true or false? answer: F

 Let's say that the following arguments are true: All Parkers are Franks. All Franks are smart. Therefore, we can conclude...

Hi, I would like to fit my data with a physical model. Unfortunately, I have the model in the form of an ODE which can be solved numerically only. So made a procedure output as follows:

I solve one task. And as a result I receive a matrix and export it to a textfile. Then I receive another matrix and try to export it to the same textfile. Another words I need to add a last matrix to previous one but when I use exportmatrix command the last matrix overwrites previous one. What can do?