Advanced Search

Aixleft math

120 Reputation

5 Badges

1 years, 35 days
Singapore
Contact Aixleft math

MaplePrimes Activity


These are questions asked by Aixleft math

how to modify the size of toolbar in Map...

Aixleft math 120 Maple
gui high_resolution toolbar
September 24 2024
1 1

Hi everyone, I buy a new laptop with high resolution (2560x1600), I wanna zoom in the size of toolbar (like the icon size of File, Edit, View,......). I modify the fontsize, so for well-proportioned I wanna modify the icon size but I failed.


 

Draw a cube and label the vertices with ...

Aixleft math 120 Maple
cube textplot vertex
September 22 2024
2 5

Hi everyone, maybe this question is a picky cause handling with such issue is much more suitable for GeoGebra but I just wanna try. I wanna the output figure like below (NVM the sequence of pointname). As for my Maple output, I wanna: the vertex names and vertices should not overlap, keep a little distance to make it more beautiful. Moreover, how to color the planar BDD_1B_1 graph?


The below is Maple code:

NULL

> 

with(plots); with(plottools)
> 

display(cuboid([0, 0, 0], [1, 1, 1]), transparency = .6, scaling = constrained, size = [200, 200], axes = boxed, orientation = [-54, 78, 5], tickmarks = [0, 0, 0])

 
> 

p1 := display(line([0, 0, 0], [1, 1, 1]), axes = boxed, color = black, linestyle = dash, orientation = [-54, 78, 5], scaling = constrained, size = [200, 200], tickmarks = [0, 0, 0])

 
> 

Pointsname := textplot3d({[0, 0, 0, A], [0, 0, 1, A[1]], [0, 1, 0, D], [0, 1, 1, D[1]], [1, 0, 0, B], [1, 0, 1, B[1]], [1, 1, 0, C], [1, 1, 1, C[1]]}, axes = none, size = [200, 200]); P := plot3d(Points, style = point, color = "Black", symbol = solidcircle, symbolsize = 10, size = [200, 200], tickmarks = [0, 0, 0]); display({p1, Pointsname}, style = line)

 

 

 

NULL


 

Download cubic.mw

Cannot calculate the curve length of the...

Aixleft math 120 Maple
calculus integration homework
September 20 2024
1 1

Hi everyone, I wrote a complex 3D curve expression and wanted to calculate its length (0..Pi), but Maple was always calculating and could not get the answer. The code and worksheet are attached.
The idea came from: https://www.mapleprimes.com/questions/239065-Curve-Length-2d-3d

> 

with(plots); with(VectorCalculus)
> 

p1 := spacecurve([t*sin(t/cos(exp(t))), t*cos(t), (2*sqrt(2)*(1/3))*t^(3/2)], t = 0 .. Pi)

 
> 

curve := `<,>`(t*sin(t/cos(exp(t))), t*cos(t), (2*sqrt(2)*(1/3))*t^(3/2))

Vector(3, {(1) = t*sin(t/cos(exp(t))), (2) = t*cos(t), (3) = (2/3)*sqrt(2)*t^(3/2)})

 (1)
> 

NULL
> 

x := proc (t) options operator, arrow; t*sin(t/cos(exp(t))) end proc; y := proc (t) options operator, arrow; t*cos(t) end proc; z := proc (t) options operator, arrow; (2/3)*sqrt(2)*t^(3/2) end proc; arcLengthIntegrand := sqrt((diff(x(t), t))^2+(diff(y(t), t))^2+(diff(z(t), t))^2); AL := evalf(Int(arcLengthIntegrand, t = 0 .. Pi)); AL

proc (t) options operator, arrow; VectorCalculus:-`*`(t, sin(VectorCalculus:-`*`(t, cos(exp(t))^VectorCalculus:-`-`(1)))) end proc

  

proc (t) options operator, arrow; VectorCalculus:-`*`(t, cos(t)) end proc

  

proc (t) options operator, arrow; VectorCalculus:-`*`(VectorCalculus:-`*`(VectorCalculus:-`*`(2, sqrt(2)), 3^VectorCalculus:-`-`(1)), t^VectorCalculus:-`*`(3, 2^VectorCalculus:-`-`(1))) end proc

  

((sin(t/cos(exp(t)))+t*(1/cos(exp(t))+t*exp(t)*sin(exp(t))/cos(exp(t))^2)*cos(t/cos(exp(t))))^2+(cos(t)-t*sin(t))^2+2*t)^(1/2)

  

AL

 (2)

NULL

Download length_of_3d_curve.mw

Geometric sequence sum code issue...

Aixleft math 120 Maple
sum product evaluation
September 10 2024
2 2

Hi everyone! I meet some code issue when editing a easy sum of geometric sequence as belows, I can write another procedure sum total, it can run. But I wanna also try the sequence (the middle code) but failed, and why nops can not work? Thanks!

NULL

> 

myfac := proc (n::nonnegint) local out, i, a, q; a := [3]; q := 2; out := a[1]; for i from 0 to n do out := out*q^i end do; out end proc; myfac(4)

3072

 (1)
> 

sum(myfac[i], i = 0 .. nops(myfac))

myfac[0]+myfac[1]

 (2)
> 

sum(myfac[i], i = 0 .. 4)

myfac[0]+myfac[1]+myfac[2]+myfac[3]+myfac[4]

 (3)
> 

values := [seq(myfac(i), i = 0 .. nops(myfac))]; sum_values := sum(myfac(i), i = 0 .. nops(myfac)); values; sum_values

[3, 6]

  

Error, invalid input: myfac expects its 1st argument, n, to be of type nonnegint, but received i

  

[3, 6]

  

sum_values

 (4)
> 

sum_myfac := proc (n::nonnegint) local i, total; total := 0; for i from 0 to n do total := total+myfac(i) end do; total end proc; sum_myfac(3)

225

 (5)

NULL

Download sum_of_geometric_sequence.mw

Maple Programming Contest...

Aixleft math 120 Maple
programming competition
September 09 2024
0 6

Hi everyone, is there any source of Maple competitions? Or related questions? I have a hard time finding books on this subject. I am very interested in Maple and hope to improve my Maple programming skills. In addition to frequently browsing this website, I encounter problems on the Internet sporadically, so I think starting with competition questions will be a quick way to improve.

1 2 3 4 5 Page 3 of 5