Verfasst am: 10.01.2011, 01:18
Titel: Ball auf Sinuskurve
Hallo,
Ich habe vor kurzem folgendes Problem gestellt gekriegt:
Programmieren Sie den auf einer Sinuskurve laufenden Ball in einer ebenen Darstellung:
(a) Berechnen Sie den Mittelpunkt des Kreises, wenn er den Punkt (x; sin(x)) beruehrt.
(b) Zeichnen Sie den Kreis, loeschen Sie ihn wieder und gehen Sie zum naechsten Punkt.
das habe ich bis jetzt gemacht:
Code:
x1=[0:0.01:2*pi];
y1=sin(x1)+0.08;
y2=sin(x1);
f=figure;
p1=line(x1,y1,'LineStyle','none');
set(p1,'Marker','o','MarkerEdgeColor','b','MarkerFaceColor','b','MarkerSize',11)
p2=line;
hold on
drawnow axis([02*pi-1.51.5]) for k=[1:numel(x1)] set(p1,'XData',x1(k),'YData',y1(k));
drawnow;
set(p2,'XData',x1,'YData',y2);
drawnow;
end
Nun sieht das alles nicht so aus wie ich mir das vorgestellt habe , wäre nett von euch wenn ihr mir da weiter helfen könntet.
schon mal Danke im Voraus und Freundliche Grüße
Gast
Gast
Beiträge: ---
Anmeldedatum: ---
Wohnort: ---
Version: ---
Verfasst am: 10.01.2011, 11:35
Titel:
Hallo,
Du verschiebst ja den Kreismittelpunkt einfach in Y-Richtung nach oben,
klar sieht das seltsam aus.
Der Mittelpunkt des Kreises muss in Richtung des Normalenvektors um den Radius verschoben werden.
in Matlabcode sieht das dann so aus:
Code:
x=linspace(0,2*pi,1000);
y=sin(x);
a=[x;y]; %Punkte der Sinuskurve
b=[x+1;y+cos(x)];
d=b-a; %Tangentenvektoren
dn=[-d(2,:);d(1,:)] %Normalenvektoren zu jedem Punkt
for i=1:1000 %Normieren der Normalenvektoren
dn(:,i)=dn(:,i)/norm(dn(:,i),2);
end
m=a+0.2*dn; %Mittelpunkte des Kreises
f=figure;
p=line(a(1,:),a(2,:)); %Sinuskurve
p1=line;
axis equal;
%set(p1,'Marker','o','MarkerEdgeColor','b','MarkerFaceColor','b','MarkerSize',13) hold on
drawnow axis([02*pi-1.51.5]) for k=[1:1000] set(p1,'XData',0.2*sin(x1)+m(1,k),'YData',0.2*cos(x1)+m(2,k));
drawnow;
end
x=linspace(0,2*pi,1000);
x1=linspace(0,2*pi,100);
y=sin(x);
a=[x;y]; %Punkte der Sinuskurve
b=[x+1;y+cos(x)];
d=b-a; %Tangentenvektoren
dn=[-d(2,:);d(1,:)] %Normalenvektoren zu jedem Punkt
for i=1:1000 %Normieren der Normalenvektoren
dn(:,i)=dn(:,i)/norm(dn(:,i),2);
end
m=a+0.2*dn; %Mittelpunkte des Kreises
f=figure;
p=line(a(1,:),a(2,:)); %Sinuskurve
p1=line;
axis equal;
%set(p1,'Marker','o','MarkerEdgeColor','b','MarkerFaceColor','b','MarkerSize',13) hold on
drawnow axis([02*pi-1.51.5]) for k=[1:1000] set(p1,'XData',0.2*sin(x1)+m(1,k),'YData',0.2*cos(x1)+m(2,k));
drawnow;
end
Ein großes und üppiges Dankeschön... dass du dir die Zeit genommen hast ,das hat mir sehr Weiter geholfen!
Studityp
Gast
Beiträge: ---
Anmeldedatum: ---
Wohnort: ---
Version: ---
Verfasst am: 09.01.2013, 17:42
Titel:
Hallo ich hatte vor kurzem die selbe Aufgabenstellung bekommen, meine lösung ist etwas einfacher gehalten und auch für einsteiger wie mich verständlich
Die plots der Tangente und der Orthogonalen hab ich zu dämonstrationszwecken eingebaut weil ich noch einen Vortrag halten muss.
Einstellungen und Berechtigungen
Du kannst Beiträge in dieses Forum schreiben. Du kannst auf Beiträge in diesem Forum antworten. Du kannst deine Beiträge in diesem Forum nicht bearbeiten. Du kannst deine Beiträge in diesem Forum nicht löschen. Du kannst an Umfragen in diesem Forum nicht mitmachen. Du kannst Dateien in diesem Forum posten Du kannst Dateien in diesem Forum herunterladen
MATLAB, Simulink, Stateflow, Handle Graphics, Real-Time Workshop, SimBiology, SimHydraulics, SimEvents, and xPC TargetBox are registered trademarks and The MathWorks, the L-shaped membrane logo, and Embedded MATLAB are trademarks of The MathWorks, Inc.