janhardo

700 Reputation

12 Badges

11 years, 47 days

MaplePrimes Activity


These are replies submitted by janhardo

Thanks, yes this definitely became an overhaul of the procedure ( I didn't expect )
I definitely need to study this : how some things have been changed and why.
What is the objection to using a function operator instead of an expression notation ?
This procedure is still for simple surfaces it appears
For more complicated surfaces it becomes f(x,y,z) and the domain becomes a space curve
I still want to try to extend the existing procedure... 

If this should work the VisualizeFunctionAndCurve () procedure, then a further modification for the domain curve  

A plane curve can be represented in two ways: by an equation H(x,y)=0 (the implicit description) and parametrically by a pair of equations with one parameter (the parameter description).

@sija 
Thanks, i will look at it again

Interesting, but from the looks of it, none of the animations work in Maple 2024, or am I mistaken? 

Have revisited the task and have the idea that this elaboration could be better in Maple ? 

restart;
 

"maple.ini in users"

(1)

# Define functions and variables
f := (x, y) -> 2*x + y^2;  # Function f(x, y)
x := t -> 1 + t;           # Function x(t)
y := t -> 2*t;             # Function y(t)
 

proc (x, y) options operator, arrow; 2*x+y^2 end proc

 

proc (t) options operator, arrow; t+1 end proc

 

proc (t) options operator, arrow; 2*t end proc

(2)

# Compute derivatives
dx_dt := D(x);  # Derivative of x with respect to t
dy_dt := D(y);  # Derivative of y with respect to t
 

1

 

2

(3)

# Definitie van de functies x(t) en y(t)
x(t) := t + 1;
y(t) := 2*t;

# Definitie van de functie f(x(t), y(t))
f(x, y) := 2*x + y^2;
f_t := unapply(f(x(t), y(t)), t);  # Omzetten van f in termen van t

# Berekenen van de afgeleiden
dx_dt := diff(x(t), t);
dy_dt := diff(y(t), t);

# Definitie van de uitdrukking voor booglengte (ds)
ds := sqrt(dx_dt^2 + dy_dt^2);

# Bereken de booglengte van de kromme van t = 0 tot t = 1
curve_length := Int(f_t(t)*ds, t = 0 .. 1);
evaluated_curve_length := value(Int(f_t(t)*ds, t = 0 .. 1));

# Output van de inerte en geëvalueerde vorm van de booglengte
curve_length = evaluated_curve_length;

t+1

 

2*t

 

y^2+2*x

 

proc (t) options operator, arrow; 4*t^2+2*t+2 end proc

 

1

 

2

 

5^(1/2)

 

Int((4*t^2+2*t+2)*5^(1/2), t = 0 .. 1)

 

(13/3)*5^(1/2)

 

Int((4*t^2+2*t+2)*5^(1/2), t = 0 .. 1) = (13/3)*5^(1/2)

(4)

# Plotting
with(plots):
    surface := plot3d(f(x, y), x = 0..3, y = 0..4, axes=boxed, labels=['x', 'y', 'z'], style=surfacecontour):  # 3D surface plot of the function f
    curve := spacecurve([x(t), y(t), f(x(t), y(t))], t = 0..1, color=red, thickness=2):  # Parametric space curve
    line_xy := spacecurve([[1, 0, 0], [2, 2, 0]], color=black, thickness=2, linestyle=2):  # Line in the xy-plane from (1,0) to (2,2)
    vertical_line1 := spacecurve([[1, 0, 0], [1, 0, f(1,0)]], color=blue, thickness=2):  # Vertical line from the xy-plane to the spacecurve at x=(1,0)
    vertical_line2 := spacecurve([[x(0.5), y(0.5), 0], [x(0.5), y(0.5), f(x(0.5), y(0.5))]], color=blue, thickness=2):  # Vertical line at t=0.5
    vertical_line3 := spacecurve([[x(1), y(1), 0], [x(1), y(1), f(x(1), y(1))]], color=blue, thickness=2):  # Vertical line at t=1

   

 # Display all plots together in a single visualization
    display(surface, curve, line_xy, vertical_line1, vertical_line2, vertical_line3, title="3D Plot of f(x,y) = 2x + y^2 with Curve and Vertical Lines");

 
 

 

Download lijnintegraal_2e_poging_maple_primes.mw

@Carl Love 
I asked the AI for an alternative to the is () command and it didn't come up with a thoughtful answer anyway.
Fine to is ( ) command and apparently there are no alternatives to this?
I find it tricky with that evaluation in Maple with the cauchy-riemann equations.

@janhardo 
Can I also do that check on the cauchy riemann equations via : evalb ?

if evalb(u_x = v_y) and evalb(u_y = -v_x) then
    printf("The function is analytic (holomorphic) at this point.\n");
    printf("The derivative f'(z) is %a + I*%a\n", u_x, v_y);
else
    printf("The function does not satisfy the Cauchy-Riemann equations and is not analytic.\n");
end if

@Carl Love 
Thanks, Yes, that "is" command is essential to establish that the cauchy-riemannt equations are true for all variables

@Axel Vogt 
Thanks, forms a nice basis to rewrite the procedure and the hereby use the D operator instead of diff command.

@acer 
Yes, when to use a branch from a topic?
There are several ways to derive that zeta(2) value. 
I thought this was 1 branch to explore this further and another branch for a different approach to derive zeta( 2).
Otherwise it will be one long thread of proof methods topics , fine by me too and forget the branches.

How about checking this with ODESteps in Student package ?

@vv 

Thanks, I think you are absolutely right to study the methods of evidence.
The difficulty for me is still how to start translating this into Maple, and your elaboration is an example of how it can be done.

Don't make any progress yet , let me ask Maple AI to come up with the code variants to solve the Basel problem ( The Zeta (2) value ). 
Note: get the impression that the standard AI 3.5 works better for Mathematica ? (not the plugin yet ) 
May try this for the Basel problem for Maple as well...

@janhardo 

It is about comparing series expansion and product expansion of Sin[x]/x. The coefficient of x^2 in the series must coincide with coefficient of x^2 in the product (after expanding the product and collecting powers of x).
Seems to me one of the proofmethods...

simply this equation?
 

eq1 := Product(1 - x^2/(n^2*Pi^2), n = 1 .. infinity) = Sum((-1)^n*x^(2*n)/(2*n+1)!, n = 0 .. infinity) = sin(x)/x;

 

@sand15 
 

"More generally, ChatGPT does not shine for its clarity (Point 6 is quite obscure)."

You can challenge chatGPT to come up with a better answer and also zoom in on a detail 
I'm using the public chatGPT 3.5 (free) and not the one in Maple itself and therein is a better version chatGPT 4.5?, but don't find it working conveniently in Maple yet 
Also mathematica has developed its own language model plugin and that requires chatgtp 4.5 with a subscription
I wonder how this works in Mathematica 
Ideal would be if Maple would use its own language model focused on Maple content and then you can ask anything, at least it seems to me that this is possible ?

First 32 33 34 35 36 37 38 Last Page 34 of 73