Items tagged with points




as screen shot shown i just was wondering if the mechanic is available my engine dispatched again so um i guess i can pay in reputation points or food stamps, i just dont see why engine would desire either tho being an artificial entity and all. i mean its not like you need to eat.

Something simple. 

Two points and there doesn't seem to be an internal command to define a vector from it. 

say for example we have p=(3,6,-1) and q=(4,-2,2)

How to write pq and have the answer of q-p as a vector returned?



trying to make table of points of the pair(lambda1,lambda2) to get the approximate function this technique  is called interpolation

contourplot(4*lambda2*result^2/(Pi*(lambda2+1)^2)-lambda1,lambda1=0..1,lambda2=0..1,contours=[0],axes=boxed,title=tit,titlefont=[SYMBOL,16],thickness=1,color=black,font=[1,1,18],tickmarks=[2, 4],linestyle=1,view=[0.002..1,0.002..1]);

any one knows how to find it

I can not understand why the following statement works perfectly:
with (plots);
P1: = plot (f (x), x = xmin .. xmax, y = ymin .. ymax, color = "green");
P2: = plot (orddir, x = xmin .. xmax, y = ymin .. ymax, color = "blue");

Plots [display] (plottools [line] ([ascf, ymin], [ascf, 10]), color = red;
Plot ([5, y, y = 0 .. 10]);
P3: = implicit plot (x = ascf, x = xmin .. xmax, y = ymin .. ymax, color = red, linestyle = 3, thickness = 2);
P4: = plot (points, x = xmin .. xmax, y = ymin .. ymax, style = point, symbol = circle, symbolsize = 20, color = "black");
P5: = plot (h, x = xmin .. xmax, y = ymin .. ymax, color = "yellow");
Display ({p1, p2, p3, p4, p5}, axes = normal, scaling = unconstrained, title = "Parallel, vertice, focus, direction and axis of symmetry", gridlines = true);

While in the following
Points: = [F, V, A, B];
with (plots):
P1: = plot (f (x), x = xmin .. xmax, y = ymin .. ymax, color = "green");
P2: = plot (yd, x = xmin .. xmax, y = ymin .. ymax, color = "blue");
P3: = implicitplot (x = xv, x = xmin .. xmax, y = ymin .. ymax, color = red, linestyle = 3, thickness = 2);
P4: = plot (points, x = xmin .. xmax, y = ymin .. ymax, style = point, symbol = circle, symbolsize = 20, color = "black");

Do (% Plot0 = display ({p1, p2, p3, p4}, axes = normal, scaling = unconstrained, title = "Parallel, vertices, focus, direction and axis of symmetry", gridlines = true));

P4 does not print anything. In thanking you for the kind attention, I cordially greet you. Carmine Marotta ..

I have a task. Draw a cylinder of a certain diameter and length. And there is a table of values with points inside this cylinder. How to display the points inside the cylinder (the table of values has 3 parameters - angle (sin (a)), radius (R), length?

I've got some points:

I have to find the (equation of) line which has minimum distance from these points but the distance formula that I have to use is:

I think we should settle with a for loop.

Thanks in advance



I have to calculate a sort of trend line, but I don't know how it works with maple.
I tried with Excel.

Do you think the method is right? How can I replicate it on maple?

Thanks in advance

Good evening all,

How can I plot a straightline with points 

LogAt = - 0.097,  -0.20, -0.22, -0.25, -0.30 ,-0.40, -0.45, -1.01 and

t = 0, 20, 40, 60, 80, 100, 120, 140

Where LogA[t] on y-axis and t on x-axis. 

I have try this before . 

plot([[0,-0.097], [20,-0.20], [40,-0.22], [60,-0.25], [80,-0.30], [100,-0.40],  [120,-0.45],  [140,-1.01]]);

I use Mathematica. This code finds integer points on the sphere

(x-2)^2 + (y-4)^2 + (c-6)^2 =15

and select two of them so that distance of two this points equal to 4.

ClearAll[a, b, r, c];
a = 2;
b = 4;
c = 6;
r = 15; ss =
Subsets[{x, y, z} /.
Solve[{(x \[Minus] a)^2 + (y \[Minus] b)^2 + (z \[Minus] c)^2 ==
r^2, x != a, y != b, z != c, x y z != 0}, {x, y, z},
Integers], {2}];
t = Select[ss, And @@ Unequal @@@ Subsets[Flatten[#], {2}] &];
Select[ss, Apply[EuclideanDistance, #] === 4 &]


and this code select four points on the shere so that none of three points make a right triangle

ClearAll[a, b, r, c];
a = 2;
b = 4;
c = 6;
r = 15;
ss = Subsets[{x, y, z} /.
Solve[{(x - a)^2 + (y - b)^2 + (z - c)^2 == r^2, x != a, y != b,
z != c, x y z != 0, x > y}, {x, y, z}, Integers], {4}];
nonright =
Pick[ss, (FreeQ[#, \[Pi]/2] &) /@ ({VectorAngle[#2 - #1, #3 - #1],
VectorAngle[#1 - #2, #3 - #2],
VectorAngle[#1 - #3, #2 - #3]} & @@@ ss)];
Select[nonright, (12 == Length[Union @@ #] &)]

 I am looking for a  procedure in Maple.  I have some problems with this sphere. For example:

Choose four points so that 12 coordinates difference and it makes a square.

Can your code improve with sphere?

Dear Maple T.A. users

I have just begun using Maple T.A. I have access to a number of questions, some of which involves placing points in a coordinate system. It works for most students, but for a few, including myself, it doesn't work. I am not able to place those points in the coordinate system at hand when leftclicking. What can be the reason for this issue?



I try to use a Catmull-Rom spline which has to match on several points.

I use a code extracted from the book "Geometry and curves with maple".

Here you can find an extract which is visible from google book :

I have slightly modified the initial procedure crom_2d. I didn't find the error in my procedure. May you help me to find the blocking point of my procedure ?

Here I attached my code:

Thank you for your help.

I want to plot points when it =1,2,3,..,11,12 instead of a continous line displayed in the worksheet I uploaded. How to modify the function? Thank you for helping:)

I want to paste a list of points generated by another program into a maple worksheet. 

However, when I paste the list of points into the Maple worksheet, I get a command prompt after each defined point in the list.  Whereby, the executable code will not run.

I need a way to paste the list of points into the worksheet without any command prompts.  Is there a special entry mode?  


Here's the list of points I want to paste into the worksheet:










Below is the worksheet code that I want to paste the list of points.

However, when I paste the list of points within the "pointPlot3D" function -- I get a command prompt after each defined point in the list of points.  (So 30 points gives 30 command prompts.)  Whereby, when this code is executed, there is an error.    What I need is a means to paste this list of points into the worksheet WITHOUT the command prompts showing up. 


> with(geom3d):

> with(plots):

> sphere1:=(x,y,z,R)->[x+R*cos(phi)*cos(theta),y+R*cos(phi)*sin(theta),z+R*sin(phi)]:

> Explore(display(        


               scaling = constrained, axes = boxed, style=wireframe, labels=[x,y,z],                


> [
> [20,0,0],
> [20,4,0],
> [19,8,0],
> [17,11,0],
> [14,14,0],
> [11,17,0]

> ],

               symbol=circle,symbolsize=10)  ),        

       parameters=[Rp=3..20],         initialvalues=[Rp=20] );


I need to make a lot of similar calculations and wonder if it can be done in a smart way in Maple. Microsoft Excel is perfect for this kind of calculations, because you can downcopy cells. I would like to do everything in Maple, if possible, though. I have a number of points A, B, C, D, E, ... , which all lie on various circles in the plane. For every point radius and angle is given, so actually you can say that every point is delivered with polar coordinates. I want to have their rectangular coordinates. 

Maybe I could deliver their radii in a list and their angles in degrees in another list?

r:=[12,56,29,...., 78]:

v:=[15,45,75,..., 102]: 


I need to be able to refer to a certain point thorugh an index. At best it would be A, B, C, ... , but 1, 2, 3, ... will be acceptable. So in the end I need to be able to access say x_C and y_C or x_3 and y_3 (understood as index lowered). I hope someone can help me do the task in a nice a efefctive way.

NB! Maybe you have a solution, which involve transformation from polar to rectangular coordinates. That will be nice, but please also tell me how it can be done from scratch, because I want to be able to know about handling many points at once for other purposes, when the function is not r*cos(v), but an arbitrary function.



1 2 Page 1 of 2