Axel Vogt

5821 Reputation

20 Badges

20 years, 228 days
Munich, Bavaria, Germany

MaplePrimes Activity


These are answers submitted by Axel Vogt

Search for dsolve, at the bottom you will find the link to dsolve/system (or type it in with the leading '?'), it shows some examples.

May be you need some restrictions for your parameters

This indicates, that the system does not know what the command means:

highlight it and press F1 (or F2 in the standard) for the worksheet help, plots[display] would be better

(and I ignore that you have other things in your code ....)

I did the following in a VBA project with Excel 2000 and Maple 12, for
which one has to add a reference to WMIMPLEX.xla in the project (that
addin is at C:\Programme\Microsoft Office\Office\Makro on my PC and it
comes with Maple, it is password protected - so you need to look into
the example cited above for calling Maple from VB).

Sub tst_differentiating()
Dim str As String
Dim dummy

dummy = (Maple("Digits:=16"))

Debug.Print "-----------------------"
dummy = (Maple("diff(-cos(x), x)"))
Debug.Print dummy
Debug.Print TypeName(dummy)

Debug.Print "-----------------------"
Debug.Print (Maple("f:= x -> cos(x)"))
Debug.Print (Maple("D(f)"))
Debug.Print (Maple("a:=1.0"))
Debug.Print (Maple("D(f)(a)"))

Debug.Print "-----------------------"
dummy = (Maple("D(f)(Z)"))
str = Replace(dummy, "Z", "1.0")
Debug.Print str
Debug.Print Evaluate(str)

Debug.Print (Maple("sin(a)")), Sin(1#)

End Sub


That Excel makro gives the following output at the debug window:

-----------------------
sin(x)
String
-----------------------
f := x -> cos(x)
x -> -sin(x)
a := 1.0
-.8414709848078965
-----------------------
-sin(1.0)
-0,841470984807897 
.8414709848078965            0,841470984807897 

 

You will have to know both sides and if you are new to Maple it is better to learn some handling working through the small introductory handbook:

the (univariate) function is sin (not sin(x)) and differeniating can be done through D(sin), but also other ways, if you can specify the 'variable' in your expression

in general that will only work for functions defined in Maple, not in VB

examples are given in ..\samples\OpenMaple\msvb of your Maple installation

Having no VB I think the communication for what you want is through strings and probably is close to what is done in connecting Maple and Excel (not sure how open those codes are).

But certainly challenging for a new user (and you are supposed to know VB coding well)

Seems to be homework or do you use pluralis majestatis? :-)

At +-infinity you decide by the leading coefficient and as long as p' is
strictly positive your p is strictly increasing - if p' has a zero then it
is isolated iff p' is not a constant. From that you build your intervals,
assuming the Reals are meant.

If it is for Maple then it is likely you need concrete polynomials and you
probably have to use Numerics if degree is beyond 4.

PS: if somebody posts a question which should be substantiated it is
better to do that in public, ok?

so what is your actual question?

Then it may (silently) depend on the precision used and that is not good at all ... explicit conversion to Naturals is trivial, if one really wants it (and knows which one is desired)

  Digits:=10; evalf(Pi * 1e14); round(%);

                           314159265400000

  Digits:=14; evalf(Pi * 1e14); round(%);

                           314159265358980


Do not hesitate to check the help ... which says, that the 2nd parameter has to be a positive integer while 1E6 is a float (just type that in).

So just modify it for your intended usage:

  mySample:= (X,n) -> Sample(X,round(n));
  xs:=mySample(X,1E1);

If I remember correctly one can use Splines for that by setting degree = 1

# re-write ln a sum
> ln(x);  
> convert(%, Sum, dummy=k) assuming abs(1-x)<1;
> simplify(%); combine(%); simplify(%);
> 
> # integrate each summand
> op(1,%); Int( %*ln(1-x)^2,x=0..1);
> Change(%, 1-x=y,y); value(%) assuming 0 < k; factor(%);
> 
> # sum it
> Sum(%, k=0..infinity);
> value(%);
> evalf(%);


                                            2
                                          Pi
                         -6 + 2 Zeta(3) + ---
                                           3


                             -0.306018060


What do you mean by "Compare the fit and LeastSquare commands to the simplicity and elegance of the ShapiroWilkWTest in Maple where the output is just like a dream ..."?

do not know Aple, but if you tye in the command "libname" Maple should show you its pathes and from that you may guess how to proceed (for a backslash you may need 2 of them, as above, if it is an escape character). Otherwise you may want to check the documentation (or wait until somebody provides a definite answer ...)

i find that at c\programme\maple12\bin.win, which is my standard path

Export(R, "D:\\temp\\Employees.xls","Payroll", "B2"); lets me put it to a desired location

PS: i find it quite odd, that these commands do not work with the classical interface ... really odd.

what is sin2 ? use multiplication signs - or do you mean square?

what is cos^2(teta) ? ( cos(theta) )^2 or cos(cos(theta))

does rcos have a meaning?

and pi is written in UpperCase for Maple, use Pi, not pi

you 'always' can use numerical evaluation to check whether your input makes sense

I prefer either UpperCase Sum or would use add, if only plotting or evaluation is needed
f:= n -> Sum(Sum((-1)^(k-j)*binomial(k,j)*j^(n), j=1..k ), k=1..n);
g:= n -> add(add((-1)^(k-j)*binomial(k,j)*j^(n), j=1..k ), k=1..n);

[seq([n,ln(f(n))], n=0 ..40)]:  # using log, since values become large
evalf(%):                       # compute the values now
plots[pointplot](%);            # plot the pairs
To get single values you can use
f(5); evalf(%);
                                 541.

g(6);
                                 4683

First 65 66 67 68 69 70 71 Last Page 67 of 92