Minggu, 16 Februari 2014

matlab dasar sem-2

-->
Materi Kuliah 05
1.      Penulisan Matriks
1.1.      Cara 1
A =[1 2 3; 4 5 6; 7 8 9]
1.2.      Cara 2
A = [1 2 3
4 5 6
7 8 9];
1.3.      Cara3
A1 = [1 2 3]
A2 = [4 5 6]
A3 = [6 7 8]
A = [A1; A2; A3]
%Menyusun Matriks
clc
clear
%Cara Pertama
A = [0 1 2 3; 4 5 6 7; 8 9 0 1];
%Cara Kedua
B = [0 1 2 3
    4 5 6 7
    8 9 0 1];
%Cara ketiga
A1 = [0 1 2 3];
A2 = [4 5 6 7];
A3 = [8 9 0 1];
C = [A1; A2; A3];
disp('Cara pertama A = [0 1 2 3; 4 5 6 7; 8 9 0 1];');disp(A)
disp ('Cara kedua ');
disp('B = [0 1 2 3');
disp('    4 5 6 7');
disp('    8 9 0 1];');disp(B)
disp('Cara ketiga 1 =[0 1 2 3]; A2 = [4 5 6 7]; A3 = [8 9 0 1]');
disp('C = [A1; A2; A3];');disp(C)


Cara pertama A = [0 1 2 3; 4 5 6 7; 8 9 0 1];
     0     1     2     3
     4     5     6     7
     8     9     0     1
Cara kedua
B = [0 1 2 3
    4 5 6 7
    8 9 0 1];
     0     1     2     3
     4     5     6     7
     8     9     0     1


Cara ketiga 1 =[0 1 2 3]; A2 = [4 5 6 7]; A3 = [8 9 0 1]
C = [A1; A2; A3];
     0     1     2     3
     4     5     6     7
     8     9     0     1

2.      Transpose Matriks
B = A’
%Transpose Matriks
clc
clear
A = [0 1 2 3; 4 5 6 7; 8 9 0 1];
B = A';
disp('Matriks A');
disp(A)
disp ('Transpose Matriks B = A');
disp(B)
disp(' ')


Matriks A
     0     1     2     3
     4     5     6     7
     8     9     0     1
Transpose Matriks B = A’
     0     4     8
     1     5     9
     2     6     0
     3     7     1

3.      Inverse Matriks
C = inv(A)
%Inverse Matriks
clc
clear
A = [0 1 2 ; 4 5 6 ; 8 9 0 ];
B = inv(A);
disp('Matriks A'); disp(A)
disp ('Inverse Matriks B = inv(A)'); disp(B)
disp(' ')


Matriks A
     0     1     2
     4     5     6
     8     9     0
Inverse Matriks B = inv(A)
   -1.3500    0.4500   -0.1000
    1.2000   -0.4000    0.2000
   -0.1000    0.2000   -0.1000

4.      Matriks Identitas
%Identitas Matriks
clc
clear
A = [0 1 2 ; 4 5 6 ; 8 9 0 ];
B = inv(A);
C = A*inv(A);
format bank
disp('Matriks A');disp(A)
disp ('Inverse Matriks B = inv(A)');disp(B)
disp('Matriks Identitas I = A*inv(A)');disp(C)
disp(' ')




Matriks A
             0          1.00          2.00
          4.00          5.00          6.00
          8.00          9.00             0

Inverse Matrisk B = inv(A)
         -1.35          0.45         -0.10
          1.20         -0.40          0.20
         -0.10          0.20         -0.10

Matriks Identitas I = A*inv(A)
          1.00             0             0
         -0.00          1.00         -0.00
         -0.00             0          1.00


5. Determinan Matriks
Matriks bujur sangkar m x m mempunyai determinan
B = det(A)
%Determinan Matriks
clc
clear
A = [ 1 2 ; 4 5 ];
disp('Matriks A = ');disp(A)
B= det(A);
disp('Determinan Matriks A');disp(B)


Matriks A =
          1.00          2.00
          4.00          5.00

Determinan Matriks A
         -3.00

Penyelesaian pers linear
x + 2 y = 3
4x + 5y = 2
Untuk memperoleh harga x dan y yang memenuhi persamaan tersebut maka
Tentukan matriks A, yaitu
A=
Tentukan matriks b, yaitu
b=
Gunakan operasi bagi kiri atau perkalian inv(A)* b untuk memperoleh harga x dan y

%Persamaan linear
% x + 2y = 3
%4x + 5y = 2
clc
clear
A =[1 2; 4 5];
b = [3;2];
C = A\b;
disp('Matriks A'); disp(A);
disp('Matriks b'); disp(b);
disp('Nilai x dan y'); disp(C')


Matriks A
     1     2
     4     5
Matriks b
     3
     2
Nilai x dan y
   -3.6667    3.3333










12 Ω

I3

I2

I1
Hitunglah arus mata jala pada rangkaian disamping menggunakan operasi matriks

Persamaan arus mata jala
9I1 – 3I2 – 6I3 = 30
-3I1 + 21I2 – 12I3 = 0
-6I1 – 12I2 + 22I3 = 0

% 9I(1) -3I(2)-6I(3) = 30
%-3I(1) +21I(2) - 12I(3) =0
%-6I(1) - 12I(2) + 22I(3) =0
clc
clear
A = [9 -3 -6; -3 21 -12; -6 -12 22];
b =[30;0;0];
C = inv(A);
D = C*b;
E = A\b;
disp('Matriks A');disp(A);
disp('Matriks b');disp(b);
disp('Besar I(1), I(2) dan I(3) dengan inv(A)*b'); disp(D);
disp('Besar I(1), I(2) dan I(3) dengan A\b');disp(E)
Matriks A
     9    -3    -6
    -3    21   -12
    -6   -12    22
Matriks b
    30
     0
     0
Besar I(1), I(2) dan I(3) dengan inv(A)*b
    6.4634
    2.8049
    3.2927

Besar I(1), I(2) dan I(3) dengan A\b
    6.4634
    2.8049
    3.2927

LATIHAN
a.      Tentukan arus pada setiap hambatan pada rangkaian berikut menggunakan persamaan arus mata jala.
b.    Tentukan besar kuat arus I pada rangkaian berikut
c.    Selesaikan persamaan linear berikut
1).       3x1  + 2x2 + 3x3 =36
4x1 + 5x2 + 7x3 = 40
-2x1 + 8x2 = 70
2).   10x1 – 3x2 + 6x3 = 24,5
x1 + 8x2 – 2x3 = -9
-->
KULIAH 06
A.      Menggambar Grafik
1.      Syntax menggambar grafik
·      plot (Y)      : menggambar grafik Y terhadap indeksnya
·      plot (X,Y)   : menggambar grafik Y terhadap X, panjanng X dan Y harus sama
·      plot (X,Y,S) : menggambar grafik Y terhadap X, dengan atribut S yang merupakan string karakter yang menunjukkan warna, tipe titik, dan tipe garis
Warna
Tipe Titik
Tipe Titik
r
red
.
point
Ù
triangle up
b
blue
x
cross
< 
triangle left
y
yelow
o
circle
> 
triangle right
g
green
+
plus
p
pentagon
m
magenta
s
square
h
heksagram
w
white
*
star
-
garis
k
black
d
diamon
:
titik-titik
c
cyan
v
triangle low
--
garis putus

Contoh 1
%Program Grafik
%dengan perintah plot(Y)
clc
clear
Y = [0 2 1 4 2 6 3 10 3 6 2 4 1 2 0]
plot(Y,’b’)
Ubahlah warna grafik tersebut menjadi: merah, ungu, atau hitam dengan titiknya berupa: lingkaran, diamond, atau pentagon
Contoh 2
%Program Grafik
%dengan perintah plot(X,Y)
clc
clear
t=0:pi/100:2*pi;
y1=sin(t);
plot(t,y1,'b')

Ubahlah program tersebut agar tampilan hailnya sebagai berikut



2.   Memberi Judul Grafik
Syntax
·      title (‘teks’)
·      title (‘teks’,’property1’,property_value1,’property2’,property_value2)

Contoh 3
%Program Grafik
%dengan perintah plot(X,Y)
clc
clear
t=0:pi/100:2*pi;
y1=sin(t);
plot(t,y1,'b'),grid
title(‘Grafik Fungsi Sinus’,’fontsize’,16,’fontname’,’arial’);


3.   Memberi Label pada Setiap Sumbu
Syntax
Memberi label pada sumbu x
·      xlabel (‘teks’)
·      xlabel(‘teks’,’property1’,property_value1,’property2’,property_value2)
Memberi label pada sumbu y
·      ylabel (‘teks’)
·      ylabel(‘teks’,’property1’,property_value1,’property2’,property_value2)
Memberi label pada sumbu z
·      zlabel (‘teks’)
·      zlabel(‘teks’,’property1’,property_value1,’property2’,property_value2)
Contoh
%Program Grafik
%dengan perintah plot(X,Y)
clc
clear
t=0:pi/100:2*pi;
y1=sin(t);
plot(t,y1,'rd'),grid
title('Grafik Fungsi Sinus','fontsize',14,'fontname','arial')
xlabel('Data Sudut');
ylabel('Nilai Sinus Sudut')

4.      Memberi Legend
Syntax
·      Legend(string1, string2, …) member legend pada grafik yang telah ada
·      Legend(…,pos) memberi legend pada posisi tertentu
1: kanan atas
2: kiri atas
3: kiri bawah
4: kanan bawah
5.      Menggambar Grafik 3D
Syntax
·      plot(x,y,z)    : menggambar grafik dengan data yang ada pada vector x, y, z
·      plot(X,Y,Z)   : menggambar grafik sekaligus dengan data yang ada pada kolom
matriks  X, Y, Z
Contoh

%Program Grafik
%dengan perintah plot(x,y,z)
clc
clear
t=0:pi/100:10*pi;
x=sin(t);
y=cos(t)
plot3(x,y,t),grid;
title('Grafik Helix','fontsize',14,'fontname','arial')
xlabel('Sinus');
ylabel('Cosinus')
zlabel('Waktu')
6.      Membentuk Subplot
Untuk menampilkan beberapa plot bersama dalam satu figure digunakan perintah sebagai berikut
Syntax
·         subplot(m,n,p)
·         subplot(mnp)
dari syntax tersebut artinya membagi Figure Window menjadi matriks berukuran mxn dan mengampil posisi p untuk membentuk plot
CONTOH
clear
x=0:0.01:10;
y1=x+10*ones(1,length(x));
y2=x.^2+x+10*ones(1,length(x));
y3=x.^3+x.^2+x+10*ones(1,length(x));
y4=x.^4+x.^3+x.^2+x+10*ones(1,length(x));
subplot(221);
plot(x,y1);grid;
title('Grafik Fungsi Linear'); xlabel('x'); ylabel('x+10');
subplot(222);
plot(x,y2);grid;
title('Grafik Fungsi Kudrat'); xlabel('x'); ylabel('x^2+x+10');
subplot(223);
plot(x,y3);grid;
title('Grafik Fungsi Pangkat 3'); xlabel('x'); ylabel('x^3+x^2+x+10');
subplot(224);
plot(x,y4);grid; title('Grafik Fungsi Pangkat 4'); xlabel('x');
ylabel('x^4+x^3+x^2+x+10');
7.      Grafik Jala dan Permukaan
Syntax
mesh(x,y,Z)
Larik data yang divisualkan adalah vector x berukuran n, vector y berukuran m, dan matriks Z ber ukuran mxn.
Titik-titik yang tergambar  merupakan pasangan x(i), y(j), Z(i,j).
CONTOH
%Program grafik
%dengan perintah mesh(x,y,Z)
clc
clear
x=-1:0.1:2;
y=0:0.1:5;
for j=1:length(x)
    for i=1:length(y)
        Z(i,j)=sin(x(j)*y(i))+cos(-x(j)*y(i))+10;
    end
end
mesh(x,y,Z)
%surf(x,y,Z)
xlabel('x'); ylabel('y'); zlabel('z=sin(xy) + cos(-xy)+10');


mesh(x,y,Z)
 


surf(x,y,Z)
 

B.      Perintah Grafik 2D
1.      Perintah plot   membuat grafik data dengan skala linear pada kedua sumbu
%Program Grafik
%dengan perintah plot(x,y)
clc
clear
sudut=0:0.01:2*pi;
y=sin(sudut);
plot(sudut,y,'bo'),grid
title('Grafik Fungsi Sinus','fontsize',16,'color','r');
xlabel('Sudut','color','r'); ylabel('Nilai Sinus Sudut','color','r')


2.   Perintah polar                       membuat grafik data dalam koordinat polar


%Perintah grafik polar
clc
clear
sudut=0:pi/100:2*pi;
r=sin(2*sudut);
polar(sudut,r,'bo');
title('Grafik Polar','fontsize',16,'color','r');

3.      Perintah plotyy            membuat grafik data dengan dua sumbu y kiri-kanan


%Perintah grafik polar
clc
clear
x=0:0.1:6;
y1=x./(1+x.^2);
y2=exp(0.1*x).*cos(x)
plotyy(x,y1,x,y2),grid
title('Grafik Plotyy','fontsize',16,'color','r');
xlabel('Sumbu x','color','r');ylabel('Sumbu y','color','r');

4.   Perintah semilogx       membuat grafik dats dengan skala logaritmik pada sumbu x
Perintah semilogy       membuat grafik dats dengan skala logaritmik pada sumbu y
%Perintah grafik semilogx
clc
clear
x=0:0.1:10;
y=exp(-x);
semilogx(x,y,'b'),grid
title('Grafik Semilogx','fontsize',16,'color','r');
xlabel('Sumbu x','color','r');ylabel('Sumbu y','color','r');

5.   Perintah loglog           membuat grafik data dengan skala logaritmik pada kedua sumbu
%Perintah grafik loglog
clc
clear
x=0:0.1:10;
y=exp(-x);
loglog(x,y,'b'),grid
title('Grafik Loglog','fontsize',16,'color','r');
xlabel('Sumbu x','color','r');ylabel('Sumbu y','color','r');
6.   Perintah bar
%Perintah grafik bar
clc
clear
x=0:0.5:4;
y=exp(-x);
bar(x,y,'c'),grid
title('Grafik Bar','fontsize',16,'color','r');
xlabel('Sumbu x','color','r');ylabel('Sumbu y','color','r');

7.   Perintah area              membuat grafik data dengan arsir di bawah grafik


%Perintah grafik area
clc
clear
x=0:0.1:50;
y=exp(-0.1*x).*cos(x);
area(x,y),grid
title('Grafik Area','fontsize',16,'color','r');
xlabel('Sumbu x','color','r');ylabel('Sumbu y','color','r');

8.      Perintah pie                membuat grafik pie
%Perintah grafik pie
clc
clear
x=[20 10 30 50 20];
lps=max(x);
pie(x,x==lps),grid
title('Grafik Pie','fontsize',16,'color','r');

9.      Perintah stem             membuat grafik data diskrit dalam bentuk tangkai


%Perintah grafik stem
clc
clear
x=0:pi/10:5*pi;
y=sin(x).*exp(-0.1*x);
stem(x,y,'b.'),grid
title('Grafik Stem','fontsize',16,'color','r');
xlabel('Sumbu x','color','r'); ylabel('Sumbu y','color','r');

10.  Perintah stairs             membuat grafik data diskrit dalam bentuk undak/tangga
%Perintah grafik stairs
clc
clear
x=0:pi/10:5*pi;
y=sin(x).*exp(-0.1*x);
stairs(x,y,'b'),grid
title('Grafik Stem','fontsize',16,'color','r');
xlabel('Sumbu x','color','r'); ylabel('Sumbu y','color','r');




Diposting oleh di

Tidak ada komentar:

Posting Komentar

Langganan: Posting Komentar (Atom)