konvexe Hülle in Asymptote < Mathe-Software < Mathe < Vorhilfe
|
| Status: |
(Frage) überfällig  | | Datum: | 18:00 Fr 16.01.2009 | | Autor: | grenife |
| Aufgabe | | Zeichnung der konvexen Hülle des Bézier-Polygons im Programm Asymptote |
Hallo zusammen,
kann mit vielleicht jemand weiterhelfen. Ich würde gerne in die folgende Zeichnung eines Bézier-Polygons die konvexe Hülle schraffiert oder transparent grau einzeichnen.
Der bisherige Code sieht so aus:
import graph;
size(250,250);
//real Sin(real t, real w) {return sin(w*t);}
real bez0=-0.045;
real bez1=0.35;
real bez2=-0.025;
real bez3=-0.15;
real bez4=0.04;
xlimits(-0.1,1.1);
ylimits(-0.5,0.5);
real testo(real t) {return [mm] (bez0*(24/24)*(1-t)^4*t^0+bez1*(24/6)*(1-t)^3*t^1+bez2*(24/4)*(1-t)^2*t^2+bez3*(24/6)*(1-t)^1*t^3+bez4*(24/24)*(1-t)^0*t^4);}
[/mm]
//draw(graph(new real(real t) {return [mm] Sin(t,pi);},0,1),blue,"$\sin(\pi [/mm] x)$");
//draw(graph(new real(real t) {return [mm] Sin(t,2pi);},0,1),red,"$\sin(2\pi [/mm] x)$");
draw(graph(new real(real t) {return [mm] testo(t);},0,1),red,"$p_3$");
[/mm]
real[] xpt,ypt;
real [] xpt={0, 0.25, 0.5, 0.75, 1};
real [] ypt={bez0, bez1, bez2, bez3, bez4};
dot(pairs(xpt,ypt),3bp+0.7black);
draw((0,bez0)--(0.25,bez1));
draw((0.25,bez1)--(0.5,bez2));
draw((0.5,bez2)--(0.75,bez3));
draw((0.75,bez3)--(1,bez4));
xaxis("$x$",BottomTop,Ticks);
yaxis("$y$",LeftRight,Ticks);
attach(legend(),point(E),20E,UnFill);
Vielen Dank für Eure Hilfe!
Gregor
|
|
| |
|
| Status: |
(Mitteilung) Reaktion unnötig  | | Datum: | 18:20 Sa 31.01.2009 | | Autor: | matux |
$MATUXTEXT(ueberfaellige_frage)
|
|
|
|
