MaplePrimes Questions

Hi folks

I'm trying to integrate products of Bessel functions and reproduce known results in the literature. For example, the integral

Int(BesselJ(0,k*r)*BesselJ(1,q*r),r=0..infinity);

should evaluate to 1/q if q>k and 0 if q<k, but maple only gives the first solution, even when 'assuming q<k' is specified. It should give 1/2q when k=q -- which it does but only when I put k=q in the integral. For some reason, it always assumes q>k whatever I do. 

There's a lot of examples like this. Am I missing something? Is there a way to return an answer with all the (correct!) solutions?

Thanks in advance.

I am trying to solve (unsuccessfully) the title equation with MAPLE 2020.1

If someone could help me...

Here is my code, inspired by the above code :)


restart;
with(plots);
with(PDEtools);
a := 1;
b := 1;
rho := 8166;
h := 10^(-3);
Dp := 19.2615;
f := sin(7*x)*cos(4*y);
WavEq := [rho*h*diff(w(x, y, t), t $ 2)/Dp + diff(w(x, y, t), x $ 4) + 2*diff(w(x, y, t), x $ 2, y $ 2) + diff(w(x, y, t), y $ 4) = 0, u(0, y, t) = 0, u(a, y, t) = 0, u(x, 0, t) = 0, u(x, b, t) = 0, u(x, y, 0) = f];
sol := pdsolve(WavEq);

This get the following error message : "Error, (in pdsolve/sys) the input system cannot contain equations in the arbitrary parameters alone; found equation depending only on _F1(y,t): _F1(y,t)"

Hello, 

is there any possibility how to write just a part of axis label e.g. in Italic? For example if I want want a label to be "ln(h)" and i want just the "h" to be written in Italic font.

Thanks a lot.

Today I got some useful  graph datas  in the form of adjacency list like following:

1: 2 3 4 5
2: 1 5 6 7
3: 1 7 8 9
4: 1 9 10 11
5: 1 11 12 2
6: 2 12 13 7
7: 2 6 8 3
8: 3 7 13 14
9: 3 14 10 4
10: 4 9 15 16
11: 4 16 17 5
12: 5 17 18 6
13: 6 18 19 8
14: 8 19 15 9
15: 10 14 20 21
16: 10 21 22 11
17: 11 22 23 12
18: 12 23 24 13
19: 13 24 20 14
20: 15 19 25 21
21: 15 20 22 16
22: 16 21 25 17
23: 17 25 24 18
24: 18 23 25 19
25: 20 24 23 22

I originally planned to enter them in maple one by one manually,

with(GraphTheory):
G:=Graph({{1,2},{1,3},{1,4},{1,5},{2,5},{2,6},{2,7},{3,7},{3,8},{3,9},{4,9},{4,10},{4,11},{5,11},{5,12},{6,7},{6,12},{6,13},{7,8},{8, 7}, {8,13},{8,14},{9,14},{9,10},{10,15},{10,16},{11,16},{11,17},{12,17},{12,18},{13,18},{13,19},{14,19},{14,15},{15,20},{15,21},{16,21},{16,22},{17,22},{17,23},{10,9},{10,15},{10,16},{11,16},{11,17},{12,17},{12,18},{13,18},{13,19},{14,19},{14,15},{15,20},{15,20},{15,21},{16,21},{16,22},{17,22},{17,23},{18,23},{18,24},{19,20},{19,24},{20,21},{20,25},{21,22},
{22,25},{23,24},{23,25},{24,25}})

 

but I will consider a lot of graph datas, I don’t know if there is a program that can help, Thanks advance!

 

Dear all

I run a code But I obtained the following error 

 

Error, (in PW) cannot determine if this expression is true or false: (1/4)*10^(1/2) < 0.1000000000e-3


and  how can I display all iterations obtained from  PW and WDEF2 in a table.

 

PWW.mw

Thank you for any help 

 

Ennep := <u - u^3/3 + u*v^2, v - v^3/3 + v*u^2, u^2 - v^2>

plot3d(Ennep, u = -2 .. 2, v = -2 .. 2, shading = zhue, lightmodel = light1, orientation = [89, 54])

 

Do you know how I can make contours for this plot? Thanks in advance

Q- Use maple to find all quintic polynomials f(x) such that- f(1)=2, f(2)=3, f(3)=4, f(4)=6, f(5)=10

Dear all

I need to plot the solution obtained from dsolve for a system of differential equation 

 

 

plot_analytical_solution_system.mw

Thank you for any help 

Using latest TeXLive distribution, and current Maple 2021 maple.sty file, Maple generated Latex uses command called 

             \pdfstringdefDisableCommands

which is unknown. I found this when I was trying to compile latex generated from Student:-Calculus1:-ShowSolution command.

The above latex command is called/used in maple.sty file, but it is not defined anywhere outside. It might have been defined many years ago?  I only see one reference to it in an old posting at tex stackexchange from few years ago.

This is how to reproduce this error (one needs to have latex installed on your PC to compile the file). On windows MikTeX can be used. On Linux, TeXLive.

restart;
the_output:=Student:-Calculus1:-ShowSolution(Int(x^3,x=0..1));
latex(the_output)

Then copied the latex, and pasted it in my latex file

\documentclass{article}
\usepackage{amsmath}
\usepackage{array}
\usepackage{maple}% set the path to reach this in Maple etc/ folder in its installation
\begin{document}

\[
\begin{array}{ccc}
 & {} & \textrm{Integration Steps} 
\\
 {} & {} & \int_{0}^{1}x^{3}d x  
\\
 \textrm{▫} & {} & \textrm{1. Apply the}\textrm{power}\textrm{rule to the term}\int x^{3}d x  
\\
 {} & \textrm{◦} & \textrm{Recall the definition of the}\textrm{power}\textrm{rule, for n}\textrm{≠}\textrm{-1} 
\\
 {} & {} & \int x^{n}d x =\frac{x^{n +1}}{n +1} 
\\
 {} & \textrm{◦} & \textrm{This means:} 
\\
 {} & {} & \int x^{3}d x =\frac{x^{3+1}}{3+1} 
\\
 {} & \textrm{◦} & \textrm{So,} 
\\
 {} & {} & \int x^{3}d x =\frac{x^{4}}{4} 
\\
 {} & \textrm{◦} & \textrm{Apply limits of definite integral} 
\\
 {} & {} & \frac{x^{4}}{4}{\raisebox{-0.36em}{$\Big |$}}{\mstack{}{_{x \hiderel{=}1}}}-\left(\frac{x^{4}}{4}{\raisebox{-0.36em}{$\Big |$}}{\mstack{}{_{x \hiderel{=}0}}}\right) 
\\
  & {} & \textrm{We can rewrite the integral as:} 
\\
 {} & {} & \frac{1}{4} 
\end{array}
\]

\end{document}

And now when compiling the above using the latex compiler, it gives this error

(base) >pdflatex foo5.tex
This is pdfTeX, Version 3.14159265-2.6-1.40.21 (TeX Live 2020) (preloaded format=pdflatex)
 restricted \write18 enabled.
entering extended mode
(./foo5.tex
LaTeX2e <2020-10-01> patch level 2
L3 programming layer <2020-12-07> xparse <2020-03-03> (/usr/local/texlive/2020/texmf-dist/tex/latex/base/article.cls
Document Class: article 2020/04/10 v1.4m Standard LaTeX document class
(/usr/local/texlive/2020/texmf-dist/tex/latex/base/size10.clo)) (/usr/local/texlive/2020/texmf-dist/tex/latex/amsmath/amsmath.sty
For additional information on amsmath, use the `?' option.
(/usr/local/texlive/2020/texmf-dist/tex/latex/amsmath/amstext.sty (/usr/local/texlive/2020/texmf-dist/tex/latex/amsmath/amsgen.sty)) (/usr/local/texlive/2020/texmf-dist/tex/latex/amsmath/amsbsy.sty) (/usr/local/texlive/2020/texmf-dist/tex/latex/amsmath/amsopn.sty)) (/usr/local/texlive/2020/texmf-dist/tex/latex/tools/array.sty) (/mnt/g/public_html/styles/maple.sty
Package: maple 2005/03/17 v1.16
Defining Maple Utility Macros
Defining Maple Plot Environemnts
 ...Defaults to "dvips" Driver
(/usr/local/texlive/2020/texmf-dist/tex/latex/graphics/epsfig.sty (/usr/local/texlive/2020/texmf-dist/tex/latex/graphics/graphicx.sty (/usr/local/texlive/2020/texmf-dist/tex/latex/graphics/keyval.sty) (/usr/local/texlive/2020/texmf-dist/tex/latex/graphics/graphics.sty (/usr/local/texlive/2020/texmf-dist/tex/latex/graphics/trig.sty) (/usr/local/texlive/2020/texmf-dist/tex/latex/graphics-cfg/graphics.cfg) (/usr/local/texlive/2020/texmf-dist/tex/latex/graphics-def/dvips.def))))
Defining Automatic Style Generation Macros
Defining Maple Spreadsheet Environments
Maple Spreadsheet and Table Support
! Undefined control sequence.
l.3248 \pdfstringdefDisableCommands
                                   {\let\(\fakemath}    % 2.
?

The above command is on line 3248 in maple.sty file

 

I tried to workaround it, but do far could not find a way.

Is there a way to fix this problem in Maple 2021 latex?

Is there any predefined command in Maple that you can run it on a Maple code file such as an mpl file, or just on a piece of code written in the worksheet file and it edits the code by the easy usual styling preferences such as what pylint does in Python? Adding spaces arround ":=" or adding indentation etc.

to make this image I have just defined

f := (x, y) -> piecewise(y <> 0, 2*arctan((sqrt(y^2 + x^2) - x)/y), 0 < x and y = 0, 0, x < 0 and y = 0, Pi, x = 0 and y = 0, undefinied)

contourplot(f(x, y), x = -1 .. 1, y = -Pi .. Pi, color = black, numpoints = 10000);

ofc I could define z:=x+I*y and take


contourplot(argument(z), x = -1 .. 1, y = -Pi .. Pi, color = black, numpoints = 10000);

 

but I don't know how to delete this "tail" , I want to show only the ray (I thought that definition of argument in MAPLE is problematic so I redefined it but it doesn't matter)

I need this to create phase portrait and make better visualisation for complex function in MAPLE, so I would like to make and argument of function as two variable function which is modified such that this "tail" disappeared, thanks in advance

I want to find all roots of an function.we think there maybe 35 roots, but the commands


1. "SolveEquations" gives us 26 roots,

2."fsolve" gives us 10 roots,

3."Student[Calculus1]:-Roots" gives us 29 roots,

4.the proc "findroots" written by @acer 6 to 10 roots.

 I have tried everything but i cannot find all roots, what is th problem?
can anyone help?how many roots are there? and how to find all of them?

problem.mw

EDIT: the uploaded file is edited.

Hi.

I experience "broken links" in Maple. That is when I've used the the search field Alt+S or visited the help pages, very often thereafter I have to restart Maple in order to use e.g. the Help again, a task or whatever is essentially a link. Is this a known problem in Maple and if what do I do remedy it.
Thanks in advance.

BAC  and angle OAC

Hi!

I am double checking some textbook methods involving the arc length of a parabolic function of y.  I need to calculate the x coordinate that represents half the arc length of the parabola from x=0 to x=1

I have included my work in the form of a maple worksheet.  Help on this would be appreciated.

Have a great day!Test_solve_for_x.mw

First 303 304 305 306 307 308 309 Last Page 305 of 2308