annoying

this is a story about a woman.
she's living next door.
first time I met her, she's fine. not bad but not good too.
she's a funny person that can makes me laugh. my mom told me to make her as my friend.

two years later..

I'm going to college and must stay in this boarder (again) and guess what? the woman is still here.
she's still fine. I can even say that she did not change.

actually, I enjoy being here until one day they taught me how to play a game.
nothing's wrong with that game, I like that game.
then, this thing happen. her office is moving, so there's internet connection there.
she's asked me to use my notebook then I said "yes".
first time, it's okay. but after that I think she's bothering me. I can't play, I can't sleep and I can't even use my notebook.

slowly but sure, I began to stay away from her. I give her many reasons to make her stop bother me.

saturday night..

we're online together. I feel bad feelings about this because before that, my mom getting angry with me.
so when she open her notebook, I said "yeah, the connection is getting slowly now".
suddenly, she turn her notebook off, takes her glass and plate, takes her phones, and get out of my room. first, I think she's just sleepy.

three days later..

I'm log in to my facebook and I idly open her profile. and you know what? I accidentally read her status that said: "it's enough. I know who she is". I read the comment underneath and found that she's talk about me.

ENOUGH!

she's annoying now. who she think she is? it's okay if she wants to talk about me. but say it in front of me! she's a looser. I know it now. she's looking for me if she needs me and talk about everything bad about me behind.

I hate her. I swear she would never be happy all her life!

H-1

pasti banyak yang bingung sama judul postingan kali ini. hihi. yang ngerti yah berarti dia anak Gunadarma University.
yap!

apalagi kalo bukan UTS. :)
hari-hari yang menegangkan akan segera dimulai.

sebenarnya, ga begitu menegangkan juga. cuma yah. gitu deh.
buat yang pinter mah ayo, yang agak pinter mah pasrah. hihi.

kayak gue ini. first day is akuntansi. pelajaran paling susah dimengerti (menurut gue). apa yang di debet apa yang di kredit terserah deh. yang penting hidup menyilang! oya, dosen gue kali ini agak bawel lho. katanya ga boleh dilingkar, dikasih setrip, dan lain-lain kecuali disilang atau bahasa kerennya diberi tanda 'X'. hihi.

sumpah ribet deh.

tapi, menurut gue lagi, dosen gue ini udah amat sangat pengertian dengan memberikan soal multiple choice buat para mahasiswanya khususnya kaoz team. hihi.

haaaaaaa...
last but not least, buat semua yang mau UTS tanggal 25/11/2009, keep fighting aja deh. perjuangan kita baru akan dimulai.
gue doain temen sebelah tempat duduk lo ga garing, ga pelit, ga bego, dan sebagainya, dan sebagainya.

so, see you another time!
fissheal loves you

to ka 02 team.

maaf ya semuanya. LA terakhir yang di bawah, belum sempet gu rapihin. gambarny juga udh g bs di upload. ga ngerti deh kenapa. kalo di upload, tar mozillanya not responding. jadi, gu kasih codingnya aja ya.. tar kalo sempet, gambarnya gu upload juga. :) makasih. :))

Laporan Akhir (17/11/09)

Ini dia coding laporan akhir beserta gambar-gambarnya. haha. maaf ya, agak berantakan. gue ga bakal sempet ngerapihin soalnya. good luck ya buat ujian besok. :)

> data = c(41, 45, 49, 51, 52, 53, 55, 56, 63, 57, 57, 58, 59, 60, 61, 67, 62, 59, 63, 35, 65, 65, 65, 67, 67, 73, 61, 69, 69, 96, 69, 70, 71, 71, 77, 79, 73, 93, 73, 81, 75, 75, 77, 77, 89, 67, 79, 79, 79, 81, 59, 83, 83, 87, 89, 71, 92, 81, 65, 64)
> length(data)
[1] 60
> sort(data)
[1] 35 41 45 49 51 52 53 55 56 57 57 58 59 59 59 60 61 61 62 63 63 64 65 65 65 65 67 67 67 67 69 69 69 70 71 71 71 73 73 73 75 75 77 77 77 79 79 79 79 81
[51] 81 81 83 83 87 89 89 92 93 96
> max(data)
[1] 96
> min(data)
[1] 35
> jlhkls=1+(3.322*log10(length(data)))
> jlhkls
[1] 6.907018
> round (jlhkls)
[1] 7
> jangk=(max(data)-min(data))
> jangk
[1] 61
> int=(jangk/jlhkls)
> int
[1] 8.831596
> round (int)
[1] 9
> frek=function(x,y,z)
+ {
+ a=0
+ for (i in 1:length(x))
+ {
+ if(x[i]>=y&&x[i]<=z) + { + a=a+1 + print(a) + } + } + } > frek
function(x,y,z)
{
a=0
for (i in 1:length(x))
{
if(x[i]>=y&&x[i]<=z) { a=a+1 print(a) } } } > frek
function(x,y,z)
{
a=0
for (i in 1:length(x))
{
if(x[i]>=y&&x[i]<=z) { a=a+1 print(a) } } } > tabel=edit(data.frame())
> tabel
kelas
1 35-43
2 44-52
3 53-61
4 62-70
5 71-79
6 80-88
7 89-97
> frek(data,35,43)
[1] 1
[1] 2
> frek(data,44,52)
[1] 1
[1] 2
[1] 3
[1] 4
> frek(data,53,61)
[1] 1
[1] 2
[1] 3
[1] 4
[1] 5
[1] 6
[1] 7
[1] 8
[1] 9
[1] 10
[1] 11
[1] 12
> frek(data,62,70)
[1] 1
[1] 2
[1] 3
[1] 4
[1] 5
[1] 6
[1] 7
[1] 8
[1] 9
[1] 10
[1] 11
[1] 12
[1] 13
[1] 14
[1] 15
[1] 16
> frek(data,71,79)
[1] 1
[1] 2
[1] 3
[1] 4
[1] 5
[1] 6
[1] 7
[1] 8
[1] 9
[1] 10
[1] 11
[1] 12
[1] 13
[1] 14
[1] 15
> frek(data,80,88)
[1] 1
[1] 2
[1] 3
[1] 4
[1] 5
[1] 6
> frek(data,89,97)
[1] 1
[1] 2
[1] 3
[1] 4
[1] 5
> tabel=edit(data.frame())
> 4
[1] 4
> tabel
kelas frek
1 35-43 2
2 44-52 4
3 53-61 12
4 62-70 16
5 71-79 15
6 80-88 6
7 89-97 5
> tabel
kelas frek
1 35-43 2
2 44-52 4
3 53-61 12
4 62-70 16
5 71-79 15
6 80-88 6
7 89-97 5
> tabel
kelas frek
1 35-43 2
2 44-52 4
3 53-61 12
4 62-70 16
5 71-79 15
6 80-88 6
7 89-97 5
> mean (35:43)
[1] 39
> mean (44:52)
[1] 48
> mean (53:61)
[1] 57
> mean (62:70)\
Error: syntax error
> mean (62:70)
[1] 66
> mean (71:79)
[1] 75
> mean (80:88)
[1] 84
> mean (89:97)
[1] 93
> fi=(2,4,12,16,15,6,5)
Error: syntax error
> fi=c(2,4,12,16,15,6,5)
> fi
[1] 2 4 12 16 15 6 5
> ttktengah=c(39,48,57,66,75,84,93)
> ttktengah
[1] 39 48 57 66 75 84 93
> mean=(sum(fr*ttktengah))/60
Error in sum(fr * ttktengah) : Object "fr" not found
> mean=(sum(fi*ttktengah))/60
> mean
[1] 68.4
> round (mean
+ )
[1] 68
> median=(sum(sort(data)))
> median
[1] 4109
> median=(sum(sort(data)))/60
> median
[1] 68.48333
> round (median)
[1] 68
> median=61,5+int*((30-18)/15)
Error: syntax error
> median=61,5(+int*((30-18)/15))
Error: syntax error
> int
[1] 8.831596
> round (int)
[1] 9
> median=61,5(+int*((30-18)/15))
Error: syntax error
> median=61,5+(int*((30-18)/15))
Error: syntax error
> median=61,5+(9*((30-18)/15))
Error: syntax error
> tbm=62-0.5
> tbm
[1] 61.5
> fkm=18
> fkm
[1] 18
> fm=15
> fm
[1] 15
> km=60/2
> km
[1] 30
> i=9
> i
[1] 9
> median=tbm+i*((km-fkm)/fm)
> meadian
Error: Object "meadian" not found
> median
[1] 68.7
> d1=16-12
> d1
[1] 4
> d2=16-15
> d2
[1] 1
> modus=tbm+i*(d1/(d1+d2))
> modus
[1] 68.7
> bq1=52.5
> bq1
[1] 52.5
> fkq1=6
> fkq1
[1] 6
> km1=60/4
> km1
[1] 15
> fq1=12
> fq1
[1] 12
> q1=bq1+i*((km1-fkq1)/fq1)
> q1
[1] 59.25
> bq2=61,5
Error: syntax error
> bq2=61.5
> bq2
[1] 61.5
> fkq2=18
> fkq2
[1] 18
> km2=30
> km2
[1] 30
> fq2=16
> fq2
[1] 16
> q2=(bq2+i*((km2-fkq2)/fq2)
+ q2=bq2+i*((km2-fkq2)/fq2)
Error: syntax error
> q2=bq2+i*((km2-fkq2)/fq2)
> q2
[1] 68.25
> bq3=70.5
> bq3
[1] 70.5
> fkq3=34
> fkq3
[1] 34
> km3=45
> km3
[1] 45
> fq3=15
> fq3
[1] 15
> q2=bq3+i*((km3-fkq3)/fq3)
> q2
[1] 77.1
> q3=bq3+i*((km3-fkq3)/fq3)
> q3
[1] 77.1
>

Laporan Akhir (10/11/09)

fuhh, laporan akhir yang teramat sangat panjang, kawankawan.
gila. di gue jadinya 5 halaman printscreen. ckckck. belum sama logikanya ya.
huff. ini dia LA yang bisa gue kasih dalam bentuk langkah-langkah. :)

41, 45, 49, 51, 52, 53, 55, 56, 63, 57,
57, 58, 59, 60, 61, 67, 62, 59, 63, 35,
65, 65, 65, 67, 67, 73, 61, 69, 69, 96,
69, 70, 71, 71, 77, 79, 73, 93, 73, 81,
75, 75, 77, 77, 89, 67, 79, 79, 79, 81,
59, 83, 83, 87, 89, 71, 92, 81, 65, 64

1. copy paste data-data di atas ke dalam program R. kemudian, cari nilai max, min, length, jlhkls, interval, dan urutkan data.
2. kalo udah nyari nilai max, min, dan lainnya, sekarang ketik tabel=edit(data.frame()) trus pencet enter. nanti bakalan keluar tabel kayak gambar ini.
3. sekarang, ganti var1 dengan tulisan kelas. trus isi data sesuai dengan jumlah kelas (7) dan interval (9). kalo udah close tabelnya.

4. kalo udah kembali ke layar utama, ketikkan 'tabel' tepat di bawah coding untuk memunculkan tabel. maka akan muncul gambar seperti di bawah ini.


5. lanjut. sekarang, kita akan mencari rumus frekuensi. rumusnya ada pada gambar ini. kalo rumusnya udah diketik, ketikkan lagi 'frek', maka rumusnya akan muncul kembali. perhatikan jumlah kurung kurawal! jika sebelumnya ada 3, maka setelahnya juga harus ada 3.

6. it's time for counting! haha. sekarang, untuk menghitung frekuensi dari masing-masing kelas, ketikkan 'frek (data,35,43)' trus pencet enter. maka akan keluar dua baris angka. yang merupakan frekuensi dari data tersebut adalah angka yang paling bawah.

7. kalo sudah, munculkan kembali tabel yang tadi. caranya sama: ketik 'tabel=edit(data.frame())' dan tekan enter.

8. ganti var2 dengan frek, dan isi frekuensi data masing-masing sesuai dengan hasil yang sudah diperoleh tadi. kalo sudah, close tabel.

9. ketik kembali 'tabel' untuk memunculkan gambar seperti di bawah ini.

10. untuk menghitung mean, ketikkan 'mean (35:43)' dan seterusnya. :)

11. histogram dapat kita tampilkan dengan mengetikkan 'hist (data,main="histogram kelas")' kemudian pencet enter. maka akan keluar gambar sebagai berikut.

12. kemudian, ketikkan 'titiktengah = c (semua mean)' lalu pencet enter. dan ketikkan kembali titiktengah untuk melakukan pemanggilan sehingga akan muncul semua titik tengah dari masing-masing data.

13. kemudian ketikkan 'fi = c (semua frekuensi)' dan pencet enter. lalu lakukan pemanggilan seperti langkah 12.

14. selanjutnya, kita akan memunculkan plot (titik). caranya, ketik 'plot(titiktengah,fi,main="plot kelas")'. plot kelas bisa diganti sesuka kita.

15. polygon akan kita munculkan dengan menggunakan polygon(titiktengah,fi,col="red",border="black").

16. jika tidak muncul, maka ketikkan satu per satu seperti gambar di bawah ini.

Laporan Pendahuluan (10/11/09)

1. Jelaskan apa yang kalian ketahui tentang ukuran statistik pada R programming!
2. Jelaskan apa yang dimaksud dengan:
COWOK : desil dan persentil
CEWEK : modus dan kuartil
3. Jelaskan cara mencarinya!
COWOK : desil dan persentil
CEWEK : modus dan kuartil

Jawaban
1. Ukuran statistik merupakan ukuran yang menunjukkan bagaimana suatu gugus data memusat dan menyebar. Dalam ukuran statistik, ada tiga bentuk ukuran deskripsi data, yaitu: ukuran pusat data, ukuran variabilitas, dan ukuran bentuk distribusi data. Ukuran pusat data yang banyak digunakan untuk mendeskripsikan data adalah mean, median, dan modus.

2. desil adalah bilangan yang membagi gugus data menjadi sepuluh bagian yang sama.
persentil adalah bilangan yang membagi data menjadi 100 bagian yang sama.
modus adalah nilai yang memiliki frekuensi paling tinggi.
kuartil adalah nilai yang membagi gugus data yang telah tersortir menjadi empat bagian yang sama besar.

3. Desil: Di = ((data ke-i)/10)*(n+1) dengan i=1,2,3,..,9

Persentil: Pi=Tb+(p*(((i/100)*n)-F)/fPi)
dengan i = 1,2,3,..,99
Tb = Tepi bawah kelas yang mengandung Pi
p = panjang kelas
n = jumlah data
F = frek kumulatif sebelum kelas yang mengandung Pi
fpi = frekuensi kelas yang mengandung Pi

Modus: Mo = Tb +(p*(d1/(d1+d2)))

kuartil : Q1 = Tb + (p*(((n/4)-F)/fQ1))

Tugas Statistika

astaga. mau pecah kepala gue pas ngeliat soal-soal ini.
ditambah lagi, semuanya harus dicari dari awal.
akhirnya setelah berkutat 2 jam, dapet juga gue jawabannya.

>>data ada di buku statistika deskriptif halaman 25. data terurutnya di halaman 26.

**yang harus dicari ada banyak banget. jadi tolong ngerti kalo gue ngetikinnya dari awal.

-range = data terbesar - data terkecil = 96-41 = 55.
-jumlah kelas = 1+3.322logn = 1+3.322log60 = 6,9 = 6.
-interval = range/jmlahkelas = 55/6 = 9,1 = 10.

TABEL DISTRIBUSI FREKUENSINYA JADI
Bts Kls Frek Ttk Tngh Tpi Bts Kls Frek Kumulatif
===========================================
40-49 3 44,5 40,5-49,5 3
50-59 11 54,5 49,5-59,5 14
60-69 17 64,5 59,5-69,5 31
70-79 16 74,5 69,5-79,5 47
80-89 8 84,5 79,5-89,5 55
90-99 5 94,5 89,5-99,5 60

-kuartil
Q1 = Bq +(i*(((n/4) -fkq)/fq))
Q3 = Bq +(i*(((3n/4)-fkq)/fq))

ket:
Bq = batas bawah kelas letak kuartil
i = interval
Q1 = kuartil pertama
n = jumlah data
fkq= frekuensi kumulatif sebelum kelas kuartil
fq = frekuensi kelas letak kuartil

jadi,
Q1 = 60+(10*(((60/4)-14)/17))
Q1 = 60+(10*((15-14)/17))
Q1 = 60+(10/17)
Q1 = 60,59.

Q3 = 70+(10*(((180/4)-31)/16))
Q3 = 70+(10*((45-31)/16))
Q3 = 70+(140/16)
Q3 = 78,75.

-inter kuartil = Q3-Q1 = 78,75-60,59 = 18,16.
-deviasi kuartil = (Q3-Q1)/2 = 18,16/2 = 9,08.
-deviasi rata-rata

xi(ttk tengah) fi (frek) Xi*fi
=======================================
44,5 3 133,5
54,5 11 599,5
64,5 17 1096,5
74,5 16 1192
84,5 8 676
94,5 5 472,5
=======================================
JUMLAH 60 4170

Rata-rata(X)= 4170/60 = 69,5

**itu baru rata-ratanya. deviasinya:

X xi fi |x-xi|*fi
======================================
69,5 44,5 3 75
69,5 54,5 11 165
69,5 64,5 17 85
69,5 74,5 16 80
69,5 84,5 8 120
69,5 94,5 5 125
======================================
JUMLAH 60 650

deviasi rata-rata = 650/60 = 10,83.

|xi-x|^2*fi
===========
1875
2475
425
420
1800
3125
========
10100

-variasi kuadrat (s^2) = 10100/(n-1) = 10100/59 = 171,19.
-simpangan baku = akar dari variasi kuadrat = 13,08.
-koefisien = (simpanganbaku/ratarata)*100% = 18.82%

ini tugas statistikanya.
maklum ya.
gue ngerjainnya buru-buru.
jadi kalo misalnya salah, gue minta maaf banget.
oia, itung-itungannya jangan bingung ya.
love you all guys.

PS: kerjain di folio bergaris! besok bawa kalkulator!

fie love tuesday!

haahh. ngantuk gila deh pagi-pagi begini. gue baru tidur jam 3 dan udah bangun jam 8.
pas ngecek hp: 5 New Message yang isinya dari mantan gue, 0816122, fawaz, adit, dan arif. hoho.
semuanya pada nanyain praktikum!!

hari ini gue males. jujur aja, meskipun sumber segala jawaban LA dan LP dari gue, gue belom ngerjain. paling printscreennya doang buat LA di bawah.
sisanya: nothing.
jadilah gue pagi ini mesti ngerjain 2 LA dan 2 LP.
kenapa 2? karena banyak yang nitip. ga deng. cuma 2 orang doang yang nitip.
hoho.

tar gue mau daftar seminar musik dong. emang rada-rada ga da hubungannya sama jurusan. tapi gimana dong?
MUSIC IS MY LIFE. haha.
ga da musik kayak mau mati gue.

apalagi ya?

oia, pagi ini karena bangun telat. gue lupa ngomong sama mbak kecil kalo gue mau ngambil nuget yg ada di kulkasnya dia. alhasil, gue bakal kelaperan nih sampe tar malem. +.+

huff. semangat buat ngejalanin hari ini. I love tuesday!