22 Nisan 2010 Perşembe

Draw a Circle with Matlab(Matlab ile Çember Çizme)

 
%www.ethemsulan.com
x=4:0.01:8;
y=6+sqrt(4-abs(x-6).^2);
plot(x,y)
hold on
y=6-sqrt(4-abs(x-6).^2);
plot(x,y)
axis([-10 10 -10 10]);
x=-10:0.1:10;
y=x;
plot(x,-y)
k=[6,-6];
plot(k(1),k(2),'*g')
a=[6 8];
b=[6 6];
plot(a,b,'r')
plot(6,6,'o');
%Simetri islemi
t1=[1 0 -k(1,1);0 1 -k(1,1);0 0 1];
beta=pi/4;
t2=[cos(beta) -sin(beta) 0;
    sin(beta) cos(beta) 0;
    0 0 1];
t3=[-1 0 0;0 1 0; 0 0 1];
t4=[cos(beta) sin(beta) 0;
    -sin(beta) cos(beta) 0;
    0 0 1];
t5=[1 0 k(1,1);
    0 1 k(1,1);
    0 0 1];
t=t1*t2*t3*t4*t5;
%Buraya kadar ki bolumu anlamadim.
hold on
ezplot('-(-6+sqrt(4-abs(x+6).^2))',[-8:0.01:-4])
axis([-10 10 -10 10]);
ezplot('-(-6-sqrt(4-abs(x+6).^2))',[-8:0.01:-4])
axis([-10 10 -10 10]);
ezplot('-(6-sqrt(4-abs(x-6).^2))',[4:0.01:8])
axis([-10 10 -10 10]);
ezplot('-(6+sqrt(4-abs(x-6).^2))',[4:0.01:8])
axis([-10 10 -10 10]);
a=-8:0.01:-4;
m=-6+sqrt(4-abs(a+6).^2);
plot(a,m)
axis([-10 10 -10 10]);
a=-8:0.01:-4;
m=-6-sqrt(4-abs(a+6).^2);
plot(a,m)
axis([-10 10 -10 10]);
m=[-4 -6]
n=[-6 -6]
plot(m,n,'r')
plot(-6,-6,'o')
plot(-6,6,'*g')

m11

Hiç yorum yok:

Yorum Gönder