Deskripsi Mata Kuliah Staterkom (Statistika Terapan dan Komputasi) UNNES
KOMPUTASI STATISTIKA
-
Upload
sella-aji-oktarin -
Category
Documents
-
view
214 -
download
0
Transcript of KOMPUTASI STATISTIKA
-
8/17/2019 KOMPUTASI STATISTIKA
1/8
TUGAS KOMPUTASI STATISTIKA
Nama : Sella Aji Oktarin
Nim : 111810101023
Soal A :
1. a. Tulislah ekspresi sederhana dengan menghasilkan vektor barisan sebagai
berikut:i) 50 bilangan pertama yang berpangkat 3, dimulai dengan 3
Skrip : 3^(1:50)
ii) 1, 22, 3, 2, 5, !2, ..., ", 1002
Skrip : (1:100)^(1:2)
iii) 1, #1, 2, #1, 3, #1, ..., 10, #1.
Skrip :
b. $ara yang digunakan pada subset %&i' tergantung pada vektor i yang
digunakan
i) i adalah logika
ketika i yang digunakan adalah logika , (ika %&i' terdapat pada vektor
maka akan didapatkan nilai T*+. Sebaliknya, (ika %&i' tidak terdapat
pada vektor makan akan didapatkan nilai alse
ii) i adalah numerik
ketika i yang dimasukkan lebih besar dari pan(ang vektor %, maka yang
dihasilkan adalah -, namun (ika i yang dimasukkan kurang dari atau
sama dengan pan(ang vektor %, maka hasil yang didapatkan adalah
elemen ke#i pada sebuah vektor.
iii) i adalah karakter ketika i adalah karakter, maka elemen di % akan men(adi karakter.
/. ndaikan baha % adalah vektor numerik. elaskan hasil dari setiap ekspresi
berikut ini:
i) sum(!is.na(x))
aab: sum) digunakan untuk men(umlahkan nilai dari argumen ).
is.na) digunakan untuk mengu(i kebenaran setiap elemen yang bernilai
- atau --. Sehingga skrip diatas digunakan untuk men(umlahkan
nilai pada ungsi is.na) yang berbentuk 0 dan 1. Seperti dibaah ini> !is.na(x)
-
8/17/2019 KOMPUTASI STATISTIKA
2/8
[1] TRUE TRUE TRUE TRUE TRUE TRUE> sum(!is.na(x))
[1] 6
ii) c(x, x[-(1:ln"#(x))])iii) x[ln"#(x) $ 1] % ln"#(x)
(aab> x[ln"#(x) $ 1] % ln"#(x)[1] &'
hasil dari x[ln"#(x) $ 1] adalah - karena melebihi dari pan(ang
% itu sendiri. ika kemudia dibagi dengan ln"#(x) maka hasilnya
akan tetap men(adi -.i) sum(x > man(x))
(aab:> x > man(x)[1] '*+E> sum(x > man(x))[1] 0
> man (x) menghasilkan nilai 4S+, (ika kemudian di(umlahkan
menggunakan ungsi sum) maka akan menghasilkan 0 karena 4S+
bernilai 0.
2. ungsi pada
a. Tulis kode yang digunkan untuk menghitung (umlah dari ungsi
berikut:
i) +lemen maksimum di setiap baris %
Skrip : al(x, 1, max)
ii) ata rata dari bilangan positi pada baris %
Skrip : al(x, 1, /unc"in(x) man(x[x>0], na.mTRUE))
iii) +lemen pertama dari setiap baris yang lebih besar dari nilai sebelumnya
berturut#turut itu, atau - (ika elemen tidak ada
b. Tabel 6ari pada sebuah bulan :
an eb 7ar pr 7ay un ul ug Sep 8/t -ov 9e/
31 2 31 30 31 30 31 31 30 31 30 31
i) 9iasumsikan nilai tabel hari disimpan dalam vektor month.days.
Skript pada yang dapat menampilkan bulan dan hari yaitu :
;ita gunakan ungsi rep) untuk mengulang 12 bulan sebanyak
month.days. Sehingga didapatkan banyaknya bulan :> ulan (1:12, mn"#.4as)
Selan(utnya untuk menampilkan hari, dengan menggunakan ungsi
sapply) yang digunakan untuk menerapkan suatu ungsi untuk elemen
-
8/17/2019 KOMPUTASI STATISTIKA
3/8
yang ada dalam datar dan mengembalikan hasilnya dalam suatu
vektor atau datar. Sehingga didapatkan banyaknya bulan :> #ai sal(mn"#.4as, s)
ii) 6ari pertama pada tahun 2011 adalah hari Sabtu. Skrip yang
menghasilkan sebuah variabel yang disebut yang berisi 7inggu#
Sabtu) yang terdapat 3!5 hari pada tahun 2011.
> 4a (c(+a, 7i, +, +l, Ra, 8a,
9um),
ln"# 365)
iii) 7enulis ungsi pada 3. 2, ungsi chi-square density memiliki nilai maksimum tunggal.
S/ript yang mengoptimalkan ungsi se/ara akurat untuk mendapatkan
nilai kepadatan maksimum untuk n > 2 yaitu :
5. 9ata disimpan pada ile =/ountdata.t%t>
a) S/ript untuk memba/a ile datarame yang disebut /ountdata.t%t, yang
mengandung 3 variabel, 4a", cun", ;a"#. ?ariabel tersebut
masing masing bertipe karakter, numerik dan aktor yaitu :cun"4a"a a4."al(cun"4a"a."x",
cl&ams c(4a", cun", ;a"#),
-
8/17/2019 KOMPUTASI STATISTIKA
4/8
cl?lasss c(c#aac", numic, /ac"))
b) S/ript untuk mengatur datarame, sehingga variabel /ount brada dalam
urutan as/ending.cun"4a"a[;i"#(cun"4a"a, 4(cun"))]
/) S/ript untuk menghitung (umlah ;" dan 4 dalam data.
;i"#(cun"4a"a, c(;" sum(;a"# ;"),
4 sum(;a"# 4)))
d) S/ript untuk menghitung median untuk ;" dan 4 dalam data.;i"#(cun"4a"a, "al(cun", ;a"#, m4ian))
e) S/ript untuk menambahkan variabel mn"# dan 4a pada datarame.
Soal B :
1. elaskan se/ara detail tu(uan dari blok kode yang ditun(ukan oleh gambar 1
dibaah ini:
aab:
# mn"# @- 1:12
menampilkan bulan yang terdiri dari 12 bulan. *ntuk itu mengunakan 1:12
yaitu membuat vektor yang berisi bilangan dari 1 sampai 12. Seperti di baah
ini:> mn"# @- 1:12> mn"# [1] 1 2 3 = 5 6 A B 10 11 12
# mn"#+"in @- sin"/(C024, mn"#)
mendeinisikan mn"#+"in dengan men/etak hasil keluaran berupa
tampilan karakter mn"#. ;arena ungsi dari sin"/ adalah
memormat per/etakan pada ob(ek . 9engan ormat yang ditampilkan
adalah C024 yang berarti bahaa hasil keluaran akan berupa 2 karakter
dengan aalan 0, namun (ika tidak ingin menampilkan nya maka hilangkan
angka 0. 6asil kelurannya seperti dibaah ini
-
8/17/2019 KOMPUTASI STATISTIKA
5/8
> mn"#+"in @- sin"/(C024, mn"#)> mn"#+"in [1] 01 02 03 0= 05 06 0A 0 0B 10
11 12
> mn"#+"in @- sin"/(C24, mn"#)> mn"#+"in [1] 1 2 3 = 5 6 A B 10
11 12
# a @- 2005:200B
membuat tahun yang terdiri dari tahun 2005 sampai dengan tahun 200" dan
diberi nama year.
# 4a"7a"ix @- u"(a, mn"#+"in, as", s-)membuat keluaran dengan meletakkan strings bersamaan yaitu year dan
monthString dengan ormat -. Seperti dibaah ini:> 4a"7a"ix [,1] [,2] [,3] [,=] [,5] [,6] [,A]
[,] [,B] [,10] [,11] [,12][1,] 2005D 1 2005D 2 2005D 3 2005D = 2005D 5 2005D 6
2005D A 2005D 2005D B 2005D10 2005D11 2005D12[2,] 2006D 1 2006D 2 2006D 3 2006D = 2006D 5 2006D 6
2006D A 2006D 2006D B 2006D10 2006D11 2006D12[3,] 200AD 1 200AD 2 200AD 3 200AD = 200AD 5 200AD 6
200AD A 200AD 200AD B 200AD10 200AD11 200AD12[=,] 200D 1 200D 2 200D 3 200D = 200D 5 200D 6
200D A 200D 200D B 200D10 200D11 200D12[5,] 200BD 1 200BD 2 200BD 3 200BD = 200BD 5 200BD 6
200BD A 200BD 200BD B 200BD10 200BD11 200BD12
# 4a"+"ins @- as.c#aac"("(4a"7a"ix))
mengubah 4a"7a"ix kebentuk vektor karakter dan mentranposekannya
seperti dibaah ini.
> 4a"+"in
[1] 2005D01 2005D02 2005D03 2005D0= 2005D05 2005D062005D0A 2005D0 2005D0B 2005D10 2005D11 2005D12 2006D01
2006D02 2006D03 2006D0=
[1A] 2006D05 2006D06 2006D0A 2006D0 2006D0B 2006D10
2006D11 2006D12 200AD01 200AD02 200AD03 200AD0= 200AD05
200AD06 200AD0A 200AD0
[33] 200AD0B 200AD10 200AD11 200AD12 200D01 200D02
200D03 200D0= 200D05 200D06 200D0A 200D0 200D0B
200D10 200D11 200D12
[=B] 200BD01 200BD02 200BD03 200BD0= 200BD05 200BD06
200BD0A 200BD0 200BD0B 200BD10 200BD11 200BD12
-
8/17/2019 KOMPUTASI STATISTIKA
6/8
# 4a"+"ins[1:5=]
membuat vektor numerik dateString dari 1 sampai 5. seperti dibaah ini:> 4a"+"in[1:5=] [1] 2005D01 2005D02 2005D03 2005D0= 2005D05 2005D06
2005D0A 2005D0 2005D0B 2005D10 2005D11 2005D12 2006D01
2006D02 2006D03 2006D0=[1A] 2006D05 2006D06 2006D0A 2006D0 2006D0B 2006D10
2006D11 2006D12 200AD01 200AD02 200AD03 200AD0= 200AD05
200AD06 200AD0A 200AD0[33] 200AD0B 200AD10 200AD11 200AD12 200D01 200D02
200D03 200D0= 200D05 200D06 200D0A 200D0 200D0B
200D10 200D11 200D12[=B] 200BD01 200BD02 200BD03 200BD0= 200BD05 200BD06
. a. 7embuat skrip ekspresi sederhana dari yang menghasilkan vektor sebagai
berikut:
i) #10, #", # , ..., #2, #1
Skrip : -(10:1)
ii) 1, 2, 2, 3, 3, 3, , 5, 5, !, !, !, ..., 1", 20, 20, 21, 21, 21
Skrip :
iii) 1, 2, , , 1!, 32, !, 12, 25!, 512, 102
Skrip : 2^(0:10)
iv) 1, 2, !, 2, 120, @20, 500, 0320
Skrip : /ac"ial(1:)
b. apakah hasil dari #1AA3 positi atau negati B (elaskan (aabanmu
aab: -1CC3
[1] 2
/. (elaskan mengapa hasil dari perhitungan seperti dibaah ini
> 0.1 $ 0.2 0.3[1] '*+E
d. Tulislah ungsi nth) dengan % sebuah vektor logika dan n bilangan bulat
positi. Cang akan menghasilkan indeks ke#n pada vektor %. Sehingga ungsi
akan ber(alan sebagai berikut :
> x c(1, 2, =, 2, 1, 3)
-
8/17/2019 KOMPUTASI STATISTIKA
7/8
> n"#(x > 2, 2)[1] 6
> n"#(x > =, 2)[1] &'
Skrip yang digunakan untuk membuat ungsi nth) adalah sebagai berikut:
n"# /unc"in(x, n) ;#ic#(is.na(x))[n]
5. a. Dagaimana mengambil subset berikut dari vektor % yang mungkin berisi
nilai -)
i) -ilai x[1]ii) Cang kedua sampai nilai kelima
Skrip : x[2:5]
iii) Semua nilai ke/uali 2 nilai terakhir
Skrip: x[-ln"#(x) - 0:1]
iv) -ilai ke 2, , ! dll.
v) Semua nilai positi dalam %
Skrip: x[!is.na(x) x > 0]
b. elaskan aturan untuk mengubah ekspresi pada
/. pakah nilai yang dihailkan dari ekspresi:
1:6 F 1:2
aab : nilai yangdihasilkan sebagai berikut ini> 1:6 F 1:2[1] 1 = 3 5 12
9engan mengalikan vektor 1:! dengan vektor 1:2. ?ektor pengali akan di
ubah sama pan(ang dengan vektor yang akan dikalikan maka men(adi /1, 2,
3, , 5, !) dikalikan dengan /1, 2, 1, 2, 1, 2) dan menghasilkan keluaran
seperti diatas.
d. ungsi :> / /unc"in(x, ) i/ ( > 0) F sin(x) ls x F sin()
Tidak mematuhi aturan daur ulang. *ntuk membetulkannya kita gunakan
ungsi ielse) seperti berikut ini :/ /unc"in(x, ) i/ls( > 0, F sin(x), x F sin())
-
8/17/2019 KOMPUTASI STATISTIKA
8/8