no 1.1

garis-garis interpretasi pada crossline seismik

Menjadi Pribadi muslim unggul Berpretasi

1. Selalu mengaitkan apapun yang terjadi dengan Allah SWT. Contohnya : Riset yang sedang kita lakukan             dibidang apapun. 

2. Orang bahagia adalah orang yang membahagiakan orang lain. 

3. Ikhlas adalah berbuat untuk Allah SWT. 

4. Pada dasarnya manusia itu pamrih. Sehingga kita harus ikhlas.

5. Kunci ketidaksuksesan itu adalah mengeluh. 

6. Yang kita harapkan tidak hanya gaji. Tetapi yang kita harapkan adalah barakah dari gaji yang kita dapat. 

7. Pilih ''kaya bersyukur apa miskin bersabar"??
    Yang banyak pahalanya adalah yang kaya Bersyukur. Karena Bersyukur lebih susah dari pada bersabar. 

8. Di dalam Islam tidak memperintahkan untuk jadi miskin. 

9. Barakah itu bermanfaat untuk diri sendiri dan orang lain. 

10. Orang yang professional adalah yang mengerjakan dengan kesungguhan dan ikhlas maka Allah akan memberikan kemudahan. 

11. Mahasiswa yang diharapkan profesor .Conference paper. 

12. Agar Paper kita bagus kita harus punya mimpi paper tersebut jadi buku. 

13. Punya paten dan project
14. Self  Motivation= ada g nya profesor tetap semangat riset. Karena kita punya Allah

15. Sabar terhadap riset. Dan jangan jadi mutungan. 

16. Kreatif . 

17. Hard worker.

18. Menulis itu bagus jangan asal selesai tapi yang terbaik.

19. Menjaga semangat itu penting. 

20. Menjaga semangat: a. ikut pengajian, b. ikut conferrence. c. ikut organisasi

21. Apapun Mulailah dari yang termudah.

22. Bekerjalah sungguh2 mesti g ada yg gaji, g ada yg lihat.dan g ada untung saat itu

23. Percayalah setiap kegitan kita memberikan manfaat.

24. Jurnal yang bagus yang memiliki novelty yakni kebaruan. 

25. Jangan ada salah dalam penulisan.

26. jurnal yang bagus yg banyak diikuti orang,

27. Berkualitas dalam segala hal

28. MORE : mimpi, endurance(ketahanan) karena "pain is temporary". Cooperation

29. Jangan menyampaikan 100% apa yang kita tahu.

courtsey :

http://www.youtube.com/watch?v=VhQnE-uDgX4

PRA KD 2

4. Buatlah matriks berukuran 4 x 3 yang berisi bilangan acak bernilai bulat dan terletak diantara 0 sampai 10

floor(11*rand(4,3))

ans =

     1     2     4
     2     2    10
     2     0     5
     6     8     4

 floor 11 menunjukan nilai dibawah 11
rand (4,3) matriks berbaris 4 dan berkolom 3

1. Apa maknanya?

   s=[1 2 -1; -5 7 2]

s =

     1     2    -1
    -5     7     2

>> s>1 % maknanya 0= bernilai kuarang dari 1

                                           1= bernilai lebih dari 1 

ans =

     0     1     0
     0     1     1

>> all(s) pada semua komponen baik dibaris maupun kolom tidak bernilai 0

ans =

     1     1     1

>> [baris,kolom]=find (s<0) "menemukan posisi elemen yang nilainya kurang dari 0"

baris =

     2                          "bertemu pada posisi baris ke 2 kolom ke 1 dan baris ke 1 kolom ke 3"
     1


kolom =

     1
     3

3. Selesaikan persamaan-persamaan linier bderikut

    3x -9y +8z = 2
    2x-3y + 7z = -1
    x-6y +z= 3
a= [ 3 -9 8; 2 -3 7; 1 -6 1]

a =

     3    -9     8
     2    -3     7
     1    -6     1

>> b=[2;-1; 3]

b =

     2
    -1
     3

>> c=a\b
Warning: Matrix is close to singular or badly scaled.
         Results may be inaccurate. RCOND = 7.680447e-018.

c =

   -1.2731
   -0.7273
   -0.0908

>> 1*-1.2731-(6*-0.7273)+0.0908

ans =

    3.1815

>> 1*c(3,1)-(-6 *c(2,1) )+1 *c(1,1)

ans =

   -5.7278

>> 1*c(3,1)+(-6 *c(2,1) )+1 *c(1,1)

ans =

    3.0000

Pemrograman matrik ke 2

matrik 3 x 4 yang isinya nol semua

 zeros(3,4)

ans =

     0     0     0     0
     0     0     0     0
     0     0     0     0

 % matriks pembuat nol ==> zeros(nb,bk)

>> % matriks identitas ?
>> eye(3)

ans =

     1     0     0
     0     1     0
     0     0     1

>> eye(5)

ans =

     1     0     0     0     0
     0     1     0     0     0
     0     0     1     0     0
     0     0     0     1     0
     0     0     0     0     1

menentukan variabel dengan determinan 

>> % x+3y+z=4

>> %2x-6y-z=12

>> %4y+3z=-6

>> A= [1 3 1 ; 2 -6 -1; 0 4 3]

A =

     1     3     1

     2    -6    -1

     0     4     3

>> B= [4 3 1 ; 12 -6 -1; -6 4 3]

B =

     4     3     1

    12    -6    -1

    -6     4     3

>> C= [1 4 1 ; 2 12 -1; 0 -6 3]

C =

     1     4     1

     2    12    -1

     0    -6     3

>> D= [1 3 4 ; 2 -6 12; 0 4 -6]

D =

     1     3     4

     2    -6    12

     0     4    -6

>> x= det(B)/det(A)

x =

    5.5833

>> y= det(C)/det(A)

y =

    0.2500

>> z= det(D)/det(A)

z =

   -2.3333

>> 4*y+3*z

ans =

    -6

> % cara 2 ==> Q*(x,y,z)=R

>> %matriks Q

>> %matriks R

>> %c=R/Q

>> %c=Q\R

>> Q=A

Q =

     1     3     1

     2    -6    -1

     0     4     3

>> R=[4;12;-6]

R =

     4

    12

    -6 c=Q\R

c =

    5.5833

    0.2500

   -2.3333

>> %c=R/Q g mau lhoooo

>> %matriks inversi

>> Q

Q =

     1     3     1

     2    -6    -1

     0     4     3

>> J=inv(Q)

J =

    0.5833    0.2083   -0.1250

    0.2500   -0.1250   -0.1250

   -0.3333    0.1667    0.5000

>> J*Q

ans =

    1.0000    0.0000    0.0000

         0    1.0000         0

         0    0.0000    1.0000

>> %magic untuk memunculkan bariss dan kolom yang sama yang nilainya sesuai dengan yang diinginkan

>> magic(2)

ans =

     1     3

     4     2

>> magic(3)

ans =

     8     1     6

     3     5     7

     4     9     2

 h= [ 2 3 4 5]

h =

     2     3     4     5

>> diag(h)

ans =

     2     0     0     0

     0     3     0     0

     0     0     4     0

     0     0     0     5

>> diag(h,-2)

ans =

     0     0     0     0     0     0

     0     0     0     0     0     0

     2     0     0     0     0     0

     0     3     0     0     0     0

     0     0     4     0     0     0

     0     0     0     5     0     0

>> diag(h,1)

ans =

     0     2     0     0     0

     0     0     3     0     0

     0     0     0     4     0

     0     0     0     0     5

     0     0     0     0     0

>> %diag([isi matrik],posisi)

>> J=[1 2 3; 4 5 6; 7 8 9]

J =

     1     2     3

     4     5     6

     7     8     9

 rot90(J)

ans =

     3     6     9

     2     5     8

     1     4     7

rot90(J,-2)

ans =

     9     8     7

     6     5     4

     3     2     1

>> % manipulasi matrik

>> %pencerminan secara vertikal ==>fliplr

% flipud===> secara horisontal

>> J

J =

     1     2     3

     4     5     6

     7     8     9

>> fliplr(J)

ans =

     3     2     1

     6     5     4

     9     8     7

>> R=[3 4 5 2; 3 8 6 5 ; 3 5 2 4]

R =

     3     4     5     2

     3     8     6     5

     3     5     2     4

>> %reshape(nama matriks,nb,nk)

>> reshape(R,2,6)

ans =

     3     3     8     5     2     5

     3     4     5     6     2     4

repmat=replikasi matrik

repmat(R,2,1)

pemrograman lanjut ke 7

MACAM-MACAM GRAFIK

%grafik 2d anak tangga = stairs

x=(-4:0.2:4)

y = exp(-x.*x)

stairs(x,y)

set(1,'name','stairs','numbertitle','on')

akan muncul grafik ..

T=rand(1,10)%memunculkan angka acak

stem(T)

%pie = lingkaran

x= [ 50 10 35 27]

pie (x,{'A','B','C','D'})

pie (x,[0 0 0 0])% untuk memisahkan 

pie3(x)%bentuk sel

[x,y] =meshgrid (-8:0.5:8) %memperoleh pasangan x dan y dengan nilai yang sama

R=sqrt(x.^2+y.^2)

z= sin (R)./R

mesh (x,y,z)

[x,y] =meshgrid (-2:1:2); %memperoleh pasangan x dan y dengan nilai yang sama

z=(x.^2-y.^2)

mesh (x,y,z)%kaitan tiap titik

%grafik z=y^2-x^2 pada domain [-1,1]x[1,1]

[x,y] =meshgrid (-2:1:2); %memperoleh pasangan x dan y dengan nilai yang sama

z=(x.^2-y.^2)

surf(x,y,z)%mengisi warna

%faceted

%shading flat

%lines dibuang tapi tiap bagian mempunyai warna yang sama

shading interp % dibuang dan warna tiap bagian di interpolasi

colormap(cool)

[x,y] =meshgrid (-8:0.5:8) %memperoleh pasangan x dan y dengan nilai yang sama

R=sqrt(x.^2+y.^2)

z= sin (R)./R

contourf(z)

colorbar %menunjukkan nilai

title('level kurva dari z= y^2 -x^2')

[x,y] =meshgrid (-8:0.5:8) %memperoleh pasangan x dan y dengan nilai yang sama

R=sqrt(x.^2+y.^2)

z= sin (R)./R

meshc(x,y,z)

colorbar %menunjukkan nilai

title('level kurva dari z= y^2 -x^2')

[theta,z]=meshgrid((0:0.1:2)*pi, (-1:0.1:1))

x=sqrt(1-z.^2).*cos(theta)

y=sqrt(1-z.^2).*sin (theta)

mesh (x,y,z)

axis square %agar bola tak lonjong

%3D

%kurva r(t)=(t*cos(t),t*sin(t),t)

t=-10*pi:pi/100:10*pi;

x= t.*cos(t);

y=t.*sin(t);

h= plot3(x,y,t)

title('kurva r(t)=(t*cos(t),t*sin(t),t)')

xlabel('x')

ylabel('y')

zlabel('y')

grid on

BALADA monev PKM

Sebenarnya tahun lalu sudah ikut monev PKM tapi dulu status masih anggota, jadi ya merasa biasa aja. Tapi kali ini rasanya bedaa banget deg-degan terus dari senin,selasa,rabu, yang berakhir di kamis siang. Pengalaman dulu ada satu pemonev yang (BACA) kata kakak tingkat super duper kritis apalagi kalau PKMP , kebetulan dosen dijurusan saya. Karena saya dapat jadwal shift hari kedua maka saya cari-cari info katanya dosen tersebut tidak jadi pemonev. "yaaaaaaaaaaaaaaa
oye..oye..." . Bahagia sesaat merasa nyantai dan pingin terbanggg .........Konsultasi dosen beres dan keceplosan "Bu, saya takut kalau pemonevnya beliau''.

jam 09.00 mampir dulu ke mamah cantik | dosen pembimbing tercinta |. dan terdengar " sokor takkandakne nek wedi". Alamakkk.. bener-bener berdoa semoga tidak dapat pemonev itu. Sudah antri berjam2 hingga giliran tiba, pemonevnya isi semua, saat ada yang kosong pemonevnya keluar sebentar. Dan menengok keruang samping . AAAAAAAAAAAAA ada bapaknya. Waaa saat itu bapaknya kosong aduuhh bener2 g berani masuk deh. Tiba-tiba ada petugas ayo mba silahkan masuk.. AAA kenapa oh kenapa...

Bismillah ..
awali dengan senyuman ...
dan mendadak Pemonev " Jare koe wedi karo aku''
aaaaaa..bener-bener mati kutu..
"Presentasi berantakan, deg-degan".
Selesai Presentasi . Komentar dan masukan Pemonev sungguhhhh menajubkan. Diluardugaan dan sangat membantu. Walhasil prasyarat berupa :
Laporan Kemajuan
Log book
" Oke, cukup baguss". Waaa bahagiaaaaa luar biasaaaa


YANG PERLU DIPERHATIKAN
JANGAN PERCAYA DENGAN KATANYA OH KATANYA
BISMILLAH DO MAX AND ALL IS WELL

rumus SD dengan matlab

syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('MENU YANG BISA ANDA PILIH')
disp('===================================================================================')
disp('1. volume silinder || 6. luas permukaan kubus     ||    11. luas trapesium       ||')
disp('2. volume kubus    || 7. luas permukaan kerucut   ||    12. luas lingkaran       ||')
disp('3. volume kerucut  || 8. luas permukaan bola      ||    13. luas persegi panjang ||')
disp('4. volume bola     || 9. luas segitiga            ||    14. luas permukaan balok ||')
disp('5. volume balok    || 10. luas jajar genjang      ||    15. Mencari FPB          ||')
disp('                                                  ||    16. mencari faktorial    ||')
disp('===================================================================================')
q=input('pilih diantara n0 1-16 = ')
switch q
    case 1
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('volume silinder')
            disp('========================================')
            t=input('masukkan tinggi tabung=');
            r=input('masukkan jari-jari tabung=');
            if t>0 r>0;
            vols=pi*r^2*t;
            fprintf('hasil= %f',vols)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 2
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('volume kubus')
            disp('========================================')
            s=input('masukkan sisi kubus=');
            if s>0
            volk=s^3;
            fprintf('hasil= %f',volk)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 3
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('volume kerucut')
            disp('========================================')
            t=input('masukkan tinggi kerucut=');
            r=input('masukkan jari-jari alas=');
            if t>0 r>0;
            volkr=(pi*r^2*t)/3;
            fprintf('hasil= %2f',volkr)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
    case 4
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('volume bola')
            disp('========================================')
            r=input('masukkan jari-jari bola=');
            if r>0;
            volb=4/3*(pi*r^3);
            fprintf('hasil= %d',volb)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 5
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('volume balok')
            disp('========================================')
            t=input('masukkan tinggi =');
            p=input('masukkan panjang=');
            l=input('masukkan lebar= ')
            if t>0, p>0, l>0;
            volpp=p*l*t;
            fprintf('hasil= %d',volpp);
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 6
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas permukaan kubus')
            disp('========================================')
            s=input('masukkan sisi kubus=');
            if s>0
            luaspk=6*s*s;
            fprintf('hasil= %f',luaspk)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 7
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas permukaan kerucut')
            disp('========================================')
            t=input('masukkan tinggi kerucut=');
            r=input('masukkan jari-jari kerucut=');
            if t>0 r>0;
            vols=pi*r*(r+t);
            fprintf('hasil= %d',vols)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 8
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas permukaan bola')
            disp('========================================')
            r=input('masukkan jari-jari =');
            if  r>0;
            vols=4*pi*r^2;
            fprintf('hasil= %d',vols)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 9
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas segitiga')
            disp('========================================')
            t=input('masukkan tinggi =');
            r=input('masukkan alas=');
            if t>0 r>0;
            luas=(t*r)/2;
            fprintf('hasil= %d',luas)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 10
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas jajar genjang')
            disp('========================================')
            t=input('masukkan tinggi=');
            r=input('masukkan alas=');
            if t>0 r>0;
            luas=r*t;
            fprintf('hasil= %d',luas)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 11
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas trapesium')
            disp('========================================')
            t=input('masukkan tinggi = ');
            r=input('masukkan sisi bawah=');
            s=input('masukkan sisi atas= ')
            if t>0,s>0, r>0;
            luas=(r+s)/2*t;
            fprintf('hasil= %d',luas)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 12
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas lingkaran')
            disp('========================================')
            r=input('masukkan jari-jari =');
            if  r>0;
            luas=pi*r^2;
            fprintf('hasil= %d',luas)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 13
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas persegi panjang')
            disp('========================================')
            t=input('masukkan panjang=');
            r=input('masukkan lebar=');
            if t>0 r>0;
            vols=t*r;
            fprintf('hasil= %d',vols)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 14
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('luas permukaan balok')
            disp('========================================')
            p=input('panjang=');
            l=input('lebar= ');
            t=input('tinggi= ');
            if t>0, p>0, l>0;
            vols=2*(p*l+l*t+p*t);
            fprintf('hasil= %d',vols)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
         case 15
        syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('fpb')
            disp('========================================')
            m=input('m= ');
            n= input ('n= ');
            if m>0 n>0
                r=rem(m,n);
            while r~0;
                m=n;
                n=r;
                r=rem(m,n);
            end
            fprintf('hasil= %d',n)
            fprintf('\n')
            else disp('angka tidak bolh negatif')
            end
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
    case 16
       syms y t;
        jawab= 'y'
        while jawab==y
            clc
            disp('========================================')
            disp('faktorial')
            disp('========================================')
            a=input('angka= ');
            if a>0
                c=1;
            for i=1:a ;
                c=c*i;
            end
                fprintf('faktorial %d',c)
           
                else
                    disp('angka tidak bolh negatif')
            end
            fprintf('\n')
            jawab=input('tekan y jika akan menghitung lagi tekan t jika tidak')
        end
    otherwise
        disp('masukkan sesuai no pilihan')
end
jawab=input ('kembali kemenu awal (y/t)?')
end