Hello,

Because of the sum of squares form there is also an easy parametric description of this curve :

t=linspace(0,2*%pi,1000);
x=cos(t);
y=(sin(t)+sqrt(abs(x)))/1.25;
plot(x,y)

S.

Le 28/09/2017 à 11:38, CRETE Denis a écrit :
Hello,
It is also possible to use the couple of solutions (auricle, ventricle) of Z=0:
// Start of code
nx=201;
x=linspace(0,1,nx)'; // computation is done only for x=0 (it saves time for 
urgent needs!-)
auricle=(sqrt(x)+sqrt(1-x.^2))/1.2;
ventricle=(sqrt(x)-sqrt(1-x.^2))/1.2;
X0=[x;x($:-1:1);-x;-x($:-1:1)];
Y0=[auricle;ventricle($:-1:1);ventricle;auricle($:-1:1)];
scf();
// plot of a symmetrical polygone
xset("color",5);
xfpoly(X0,Y0);
// End of code

Thank you, I learned about "xfpoly" !
Denis

-----Message d'origine-----
De : users [mailto:[email protected]] De la part de Hermes
Envoyé : mercredi 27 septembre 2017 22:29
À : [email protected]
Objet : Re: [Scilab-users] Plot Heart Curve in Scilab

Hi Rafa,
Here I present the task solved:
//start of code
nx=300;
ny=200;
X0=linspace(-1.2,1.2,nx);
Y0=linspace(-1.5,2,ny);
X=X0.*.ones(ny,1);
Y=(Y0.*.ones(nx,1))';
Z=(1.25*Y-sqrt(abs(X))).^2+X.^2-1;
clf()
a=gca();
a.x_label.text="X";
a.y_label.text="Y";
contour(X0,Y0,Z',[0,0]);
*Polyline=a.children.children(1)
Polyline.fill_mode="on";
Polyline.foreground=5;
Polyline.background=5;
Polyline.thickness=2;*
a.view="2d";
//end code

Two questions:
in the Helps of Scilab, where can I find the hierarchy trees for the graphic 
objects?
How do I copy from SciNote to the Forum scripts and maintain the format of it?
Thank you
Hermes



--
Sent from: 
http://mailinglists.scilab.org/Scilab-users-Mailing-Lists-Archives-f2602246.html
_______________________________________________
users mailing list
[email protected]
http://lists.scilab.org/mailman/listinfo/users
_______________________________________________
users mailing list
[email protected]
http://lists.scilab.org/mailman/listinfo/users


--
Stéphane Mottelet
Ingénieur de recherche
EA 4297 Transformations Intégrées de la Matière Renouvelable
Département Génie des Procédés Industriels
Sorbonne Universités - Université de Technologie de Compiègne
CS 60319, 60203 Compiègne cedex
Tel : +33(0)344234688
http://www.utc.fr/~mottelet

_______________________________________________
users mailing list
[email protected]
http://lists.scilab.org/mailman/listinfo/users

Reply via email to