How do i use LSSolve to fit the correct resonance function to a set of experimental data, thanks

I want the data returned from a Maplet Evaluate to appear in a Table. I have listed below an example Maplet:
with(Maplets[Elements]):
> setdata:=proc()
> Maplets[Tools][Set]('expdata'= [[5,42.6],[10., 31.5], [15,28.8],[20., 22.3], [30., 18.7], [45., 14.1], [60., 11.1], [90., 7.7], [120.,4.9], [180., 2.5], [240., 1.3], [300., .7]]);
> end proc:
> maplet := Maplet([
> # [BoxCell(Table([A, B], 'expdata'), 'as_needed')],
> [BoxCell(TextBox['expdata'](3..30))],
> [Button("OK", Evaluate(function='setdata()'))]
> ]):
> Maplets[Display](maplet);
The Commented out "Table" line fails and the "TextBox" works OK. Is there a way to have this data appear in Table form?

Hi,
I have a matrix containing data read from an external file. I would like the user to select a colon number using a List box and, based on this number, build the resulting vector from the matrix. Is it possible to ask Maple to evaluate some parts (execution groups?) of a worksheet with some command (not menus)?
Thanks.

Does anyone here use or has ever used Maple-Connect ?
Also how long were you using Maple before first attempting this ?

After reviewing the help pages on the Logic package I noticed that the commands used in examples usually contained an ampersand "&" before them. Does this in any way alter the meaning of the logical operator or (connective) in any from it's usual meaning in standard text ? for example, is &iff "if and only if" ? does ∧ stand for "and" ? does ∨ mean the logically inclusive "or" does &implies mean "if antecedent then consequent" ? and so forth... Dan

Hello members,
My question is out of maple primes, but i was wondering if one of the members is and expert in MATLAB coding.
I am trying to write a MATLAB code for numerical integration for a double exponential equation of the form
i = io(exp(-alpha*t)-exp(-beta*t). The problem i am facing is how to eliminitate the error as the integration is taken as the area under the curve, say from time t=0.0 to t=25e-6.
Your comments in how to solve this problem is highly appreciated.
Regards,
JacquieD.

Is it possible to change and save the default background color and pen settings for a sketch?

HIIIIIIIIIIIIIII! :)
I'm doin a problem on the restricted 3 body problem...What i want is to creat a proc "equilibria(mu)" which finds all five equilibria of (DE) when mu_1=mu and displays, in a neat table, the (x,y)-position of each equilibrium and the eigenvalues of the vector field's Jacobian at that equilibrium. In addition, the table should indicate if the equilibrium is hyperbolic (all eigenvalues are real and non-zero), elliptic (all eigenvalues are imaginary and non-zero), hyperbolic-elliptic (a mixture of non-zero real and imaginary eigenvalues), or otherwise..
Now the difficulty is this, i can find the equ's and get the evalues, but i have a proble with gettin them into a table...i've been told that prinf is a good one to use, but i have no idea at which bit to use it..this is how far i've got

Hi guys ;)
I have a question. Is it possible to apply a PID controller with the following parameters(P=6,I=4,D=0.02)to a Non Linear System described with the differentiate
equation like this
mk*diff(x(t),t,t)+kfv*diff(x(t),t)-(ki^2*u(t)^2*kc)/(mk*(x(t)-x10)^2)-mk*g=0
or in the second form, as two differentiate equations like
dx1 := (x1,x2) ->x2;
dx2 := (x1,x2) ->((u*ki)^2*kc)/(mk*(x1-x10)^2)-g*mk/mk-kfv*x2/mk;
without linearisation in operating point, where u - is input variable, x - position,
dx/dt - velocity, d^2x/dt - acceleration ?
Thanks for your help.

I need to generate pimitive polynomials of degree 17 over GF(2^32) for use in an LFSR working over 32-bit words.
Does anyone know how it can be done?

I try to deduce distribution fonction from a parametrized set of points with Maple.
At this stage I have a dataset define through a relationship like y=f(x), and I want to obtain the distribution of y points, given that x in [-A,A]. The theoretic formula is : F[Y](z) = P(y<z).
i.e. F[Y](z) = Int(delta[f(x)< z],x=-A..A);
and I use the **piecewise** Maple function to implement it ( Int(piecewise(f(x)< z,1,0),x=-A..A) ), but for Maple :
Int(piecewise(f(x)< z,1,0),x=-A..A) = piecewise(Int(f(x)< z, x=-A..A),1,0))
which is totally different !

If I have f:=x^2+1000*y: and under contraint g:=1000-x-y: how Do i find this Min or max with the hessian Bordered style ..... I allready know how to do the Lagrange version but this hessien ... im out .. and if it's the same ( because it's gona give me the same answer as if I do it with the !!!!!! Student:-MultivariateCalculus:-LagrangeMultipliers(f,[g],[x,y]); !!!! ) Thanks very urgent ! ( Im using Maple 9,5 if that makes a diff) Tx Jp

Hi, I have been having problems using the three !!! button which calculates a whole spreadsheet. When it runs I have found that one of the lines in some of the sub routines doesn't always calculate. The line is a Spline interpolation function. If someone could help with this that would be great.

Is there a straightforward procedure to have a radical appear on the plot of a function? E.g, how can one display (2, sqrt(2)) in the plot but with the actual square-root symbol appearing. I've read in the knowledge base about the use of textplot. However, the routine is limited to exponents.

This is a program discribing the dynamic behavior of a N pendelum system. When I tried to comparae the result of different initial conditions, I found that every time i run it, the graph will be different.

I know that double pendelum system is a typical chaotic system, is this the reason why i have different result for each time?

Here I attach the file, but plz rename it to ***.mws file before run, b/c i wrote it in maple classic worksheet.

> restart:

interface(warnlevel=0):

with(SolveTools):with( plots ): with( plottools ):

with( DEtools ): with( PDEtools ):

g:=9.81:

x[0][2]:=0:

y[0][2]:=0:

#initialization function of each beam,in this function, we should give 3 variables, n=the number of this #beam, la=the length of this beam, ma=the mass of this beam,q=the initial angle of the beam,and qt=the initial angle velocity of the beam

beams:=proc(n,la,ma,q,qt)

global l,m,x,y,theta,icq,icqt:

icq[n]:=theta[n](0)=q:

icqt[n]:=D(theta[n])(0)=qt:

l[n]:=la: #length of beam n

m[n]:=ma: #mass of beam n

#initialize the positions of each beam

x[n][2]:=0: #the x position of the end point of each beam

y[n][2]:=0: #the x position of the end point of each beam

x[n][1]:=0: #the y position of the center point of each beam

y[n][1]:=0: #the y position of the center point of each beam

end proc;

#define the forces that applied on the end of beam n

Force:=proc(n,fm,fn)

global fx,fy:

fx[n]:=fm:

fy[n]:=fn:

end proc;