No. 1
# Input Data
data_warung <- data.frame(
Permintaan = c(50, 60, 70, 80, 90),
Frekuensi = c(10, 20, 40, 20, 10)
)
# Total Hari Observasi
total_hari <- sum(data_warung$Frekuensi) # 100 hari
# Menghitung Probabilitas dan Probabilitas Kumulatif
data_warung$Probabilitas <- data_warung$Frekuensi / total_hari
data_warung$Prob_Kumulatif <- cumsum(data_warung$Probabilitas)
# Menampilkan tabel distribusi probabilitas untuk pengecekan
cat("--- Tabel Distribusi Probabilitas ---")## --- Tabel Distribusi Probabilitas ---print(data_warung)## Permintaan Frekuensi Probabilitas Prob_Kumulatif
## 1 50 10 0.1 0.1
## 2 60 20 0.2 0.3
## 3 70 40 0.4 0.7
## 4 80 20 0.2 0.9
## 5 90 10 0.1 1.0# Fungsi untuk mengonversi bilangan acak (0-1) menjadi nilai permintaan
peta_permintaan <- function(angka_acak) {
interval <- cut(angka_acak,
breaks = c(0, data_warung$Prob_Kumulatif),
labels = data_warung$Permintaan,
include.lowest = TRUE)
return(as.numeric(as.character(interval)))
}
set.seed(2026)# ==============================================================================
# PERTANYAAN 1a: Prediksi Permintaan 5 Hari ke Depan
# ==============================================================================
n_hari_a <- 5
acak_a <- runif(n_hari_a, min = 0, max = 1) # Membangkitkan bilangan acak antara 0 dan 1
prediksi_a <- peta_permintaan(acak_a)
hasil_a <- data.frame(
Hari = 1:n_hari_a,
Bilangan_Acak = round(acak_a, 4),
Prediksi_Permintaan = prediksi_a
)
cat("--- 1a. Prediksi Permintaan 5 Hari ke Depan ---\n")## --- 1a. Prediksi Permintaan 5 Hari ke Depan ---print(hasil_a)## Hari Bilangan_Acak Prediksi_Permintaan
## 1 1 0.6987 70
## 2 2 0.5565 70
## 3 3 0.1401 60
## 4 4 0.2857 60
## 5 5 0.5554 70cat("Total prediksi permintaan untuk 5 hari ke depan:", sum(prediksi_a), "gelas\n\n")## Total prediksi permintaan untuk 5 hari ke depan: 330 gelasDari hasil simulasi 5 hari, pemilik warung dapat menginterpretasikan bahwa total kebutuhan stok es teh untuk 5 hari ke depan adalah akumulasi dari prediksi harian tersebut, dengan fluktuasi yang wajar sesuai tren data masa lalu.
# ==============================================================================
# PERTANYAAN 1b: Prediksi Permintaan 20 Hari ke Depan
# ==============================================================================
n_hari_b <- 20
acak_b <- runif(n_hari_b, min = 0, max = 1)
prediksi_b <- peta_permintaan(acak_b)
hasil_b <- data.frame(
Hari = 1:n_hari_b,
Bilangan_Acak = round(acak_b, 4),
Prediksi_Permintaan = prediksi_b
)
cat("--- 1b. Prediksi Permintaan 20 Hari ke Depan ---\n")## --- 1b. Prediksi Permintaan 20 Hari ke Depan ---print(hasil_b)## Hari Bilangan_Acak Prediksi_Permintaan
## 1 1 0.0251 50
## 2 2 0.4662 70
## 3 3 0.8610 80
## 4 4 0.2525 60
## 5 5 0.5808 70
## 6 6 0.0059 50
## 7 7 0.6919 70
## 8 8 0.2311 60
## 9 9 0.8485 80
## 10 10 0.1538 60
## 11 11 0.3568 70
## 12 12 0.5452 70
## 13 13 0.0012 50
## 14 14 0.3178 70
## 15 15 0.0173 50
## 16 16 0.3416 70
## 17 17 0.3434 70
## 18 18 0.2326 60
## 19 19 0.0614 50
## 20 20 0.4124 70cat("Total prediksi permintaan untuk 20 hari ke depan:", sum(prediksi_b), "gelas\n")## Total prediksi permintaan untuk 20 hari ke depan: 1280 gelasTotal kumulatif prediksi selama 20 hari dapat dijadikan acuan bahan baku. Pemilik warung bisa memanfaatkannya untuk menyetok teh, gula, dan cup plastik dalam jumlah besar guna mengantisipasi permintaan 20 hari ke depan. No. 2
set.seed(42)
# MEMBANGKITKAN DATA AWAL
permintaan_eks <- rexp(10, rate = 1/70)
permintaan_eks <- round(permintaan_eks)
frekuensi_norm <- rnorm(10, mean = 20, sd = 5)
frekuensi_norm <- round(frekuensi_norm)
frekuensi_norm <- pmax(1, frekuensi_norm)
# Menggabungkan menjadi tabel data utama
data_latihan2 <- data.frame(
Permintaan = permintaan_eks,
Frekuensi = frekuensi_norm
)
# MENGHITUNG PROBABILITAS KUMULATIF
total_hari <- sum(data_latihan2$Frekuensi)
data_latihan2$Probabilitas <- data_latihan2$Frekuensi / total_hari
data_latihan2$Prob_Kumulatif <- cumsum(data_latihan2$Probabilitas)
cat("--- Data Hasil Pembangkitan Distribusi Eksponensial & Normal ---\n")## --- Data Hasil Pembangkitan Distribusi Eksponensial & Normal ---print(data_latihan2)## Permintaan Frekuensi Probabilitas Prob_Kumulatif
## 1 14 20 0.09049774 0.09049774
## 2 46 30 0.13574661 0.22624434
## 3 20 20 0.09049774 0.31674208
## 4 3 27 0.12217195 0.43891403
## 5 33 31 0.14027149 0.57918552
## 6 102 13 0.05882353 0.63800905
## 7 22 19 0.08597285 0.72398190
## 8 29 19 0.08597285 0.80995475
## 9 83 23 0.10407240 0.91402715
## 10 50 19 0.08597285 1.00000000cat("Total hari observasi hasil generasi data:", total_hari, "hari\n\n")## Total hari observasi hasil generasi data: 221 hari# Fungsi Monte Carlo
peta_permintaan <- function(angka_acak) {
interval <- cut(angka_acak,
breaks = c(0, data_latihan2$Prob_Kumulatif),
labels = data_latihan2$Permintaan,
include.lowest = TRUE)
return(as.numeric(as.character(interval)))
}
jalankan_simulasi <- function(n_hari, label) {
acak <- runif(n_hari, min = 0, max = 1)
prediksi <- peta_permintaan(acak)
total_prediksi <- sum(prediksi)
rata_rata <- mean(prediksi)
cat(paste0("--- Hasil Prediksi untuk ", label, " ---\n"))
cat("Total Prediksi Permintaan :", total_prediksi, "gelas\n")
cat("Rata-rata per hari :", round(rata_rata, 2), "gelas/hari\n\n")
return(data.frame(Hari = 1:n_hari, Angka_Acak = round(acak, 4), Prediksi = prediksi))
}# 2a.Prediksikan permintaan es teh selama 5 hari ke depan
hasil_a <- jalankan_simulasi(5, "2a.5 Hari ke Depan")## --- Hasil Prediksi untuk 2a.5 Hari ke Depan ---
## Total Prediksi Permintaan : 240 gelas
## Rata-rata per hari : 48 gelas/hariprint(hasil_a)## Hari Angka_Acak Prediksi
## 1 1 0.0039 14
## 2 2 0.8329 83
## 3 3 0.0073 14
## 4 4 0.2077 46
## 5 5 0.9066 83cat("\n")# 2b.Prediksikan permintaan es teh selama 20 hari ke depan
hasil_b <- jalankan_simulasi(20, "2b.20 Hari ke Depan")## --- Hasil Prediksi untuk 2b.20 Hari ke Depan ---
## Total Prediksi Permintaan : 651 gelas
## Rata-rata per hari : 32.55 gelas/hariprint(hasil_b)## Hari Angka_Acak Prediksi
## 1 1 0.6118 102
## 2 2 0.3796 3
## 3 3 0.4358 3
## 4 4 0.0374 14
## 5 5 0.9735 50
## 6 6 0.4318 3
## 7 7 0.9576 50
## 8 8 0.8878 83
## 9 9 0.6400 22
## 10 10 0.9710 50
## 11 11 0.6188 102
## 12 12 0.3334 3
## 13 13 0.3467 3
## 14 14 0.3985 3
## 15 15 0.7847 29
## 16 16 0.0389 14
## 17 17 0.7488 29
## 18 18 0.6773 22
## 19 19 0.1713 46
## 20 20 0.2611 20cat("\n")# 2c.Prediksikan permintaan es teh selama 100 hari ke depan
hasil_c <- jalankan_simulasi(100, "2c.100 Hari ke Depan")## --- Hasil Prediksi untuk 2c.100 Hari ke Depan ---
## Total Prediksi Permintaan : 4017 gelas
## Rata-rata per hari : 40.17 gelas/hariprint(hasil_c)## Hari Angka_Acak Prediksi
## 1 1 0.5144 33
## 2 2 0.6756 22
## 3 3 0.9828 50
## 4 4 0.7595 29
## 5 5 0.5665 33
## 6 6 0.8497 83
## 7 7 0.1895 46
## 8 8 0.2713 20
## 9 9 0.8282 83
## 10 10 0.6932 22
## 11 11 0.2405 20
## 12 12 0.0430 14
## 13 13 0.1405 46
## 14 14 0.2164 46
## 15 15 0.4794 33
## 16 16 0.1974 46
## 17 17 0.7194 22
## 18 18 0.0079 14
## 19 19 0.3755 3
## 20 20 0.5144 33
## 21 21 0.0016 14
## 22 22 0.5816 102
## 23 23 0.1579 46
## 24 24 0.3590 3
## 25 25 0.6456 22
## 26 26 0.7758 29
## 27 27 0.5636 33
## 28 28 0.2337 20
## 29 29 0.0900 14
## 30 30 0.0856 14
## 31 31 0.3052 20
## 32 32 0.6674 22
## 33 33 0.0002 14
## 34 34 0.2086 46
## 35 35 0.9330 50
## 36 36 0.9256 50
## 37 37 0.7341 29
## 38 38 0.3331 3
## 39 39 0.5151 33
## 40 40 0.7440 29
## 41 41 0.6192 102
## 42 42 0.6262 102
## 43 43 0.2172 46
## 44 44 0.2166 46
## 45 45 0.3889 3
## 46 46 0.9425 50
## 47 47 0.9626 50
## 48 48 0.7399 29
## 49 49 0.7332 29
## 50 50 0.5358 33
## 51 51 0.0023 14
## 52 52 0.6089 102
## 53 53 0.8368 83
## 54 54 0.7515 29
## 55 55 0.4527 33
## 56 56 0.5358 33
## 57 57 0.5374 33
## 58 58 0.0014 14
## 59 59 0.3557 3
## 60 60 0.6121 102
## 61 61 0.8289 83
## 62 62 0.3567 3
## 63 63 0.4106 3
## 64 64 0.5735 33
## 65 65 0.5897 102
## 66 66 0.7197 22
## 67 67 0.3950 3
## 68 68 0.9192 50
## 69 69 0.9626 50
## 70 70 0.2335 20
## 71 71 0.7245 29
## 72 72 0.9036 83
## 73 73 0.6035 102
## 74 74 0.6315 102
## 75 75 0.9374 50
## 76 76 0.8505 83
## 77 77 0.5798 102
## 78 78 0.8214 83
## 79 79 0.1137 46
## 80 80 0.7645 29
## 81 81 0.6236 102
## 82 82 0.1484 46
## 83 83 0.0803 14
## 84 84 0.4641 33
## 85 85 0.7794 29
## 86 86 0.7335 29
## 87 87 0.8172 83
## 88 88 0.1702 46
## 89 89 0.9447 50
## 90 90 0.2936 20
## 91 91 0.1491 46
## 92 92 0.7194 22
## 93 93 0.3241 3
## 94 94 0.7788 29
## 95 95 0.3944 3
## 96 96 0.6786 22
## 97 97 0.7758 29
## 98 98 0.1879 46
## 99 99 0.0291 14
## 100 100 0.1357 46cat("\n")# d.Prediksikan permintaan es teh selama 1000 hari ke depan
hasil_d <- jalankan_simulasi(1000, "2d.1000 Hari ke Depan")## --- Hasil Prediksi untuk 2d.1000 Hari ke Depan ---
## Total Prediksi Permintaan : 36171 gelas
## Rata-rata per hari : 36.17 gelas/hariprint(hasil_d)## Hari Angka_Acak Prediksi
## 1 1 0.6802 22
## 2 2 0.9348 50
## 3 3 0.5505 33
## 4 4 0.6018 102
## 5 5 0.1970 46
## 6 6 0.5352 33
## 7 7 0.1796 46
## 8 8 0.4519 33
## 9 9 0.3171 3
## 10 10 0.1162 46
## 11 11 0.1861 46
## 12 12 0.7297 29
## 13 13 0.4119 3
## 14 14 0.4140 3
## 15 15 0.4803 33
## 16 16 0.4275 3
## 17 17 0.1365 46
## 18 18 0.8247 83
## 19 19 0.5923 102
## 20 20 0.7944 29
## 21 21 0.7690 29
## 22 22 0.9181 50
## 23 23 0.8626 83
## 24 24 0.3170 3
## 25 25 0.2593 20
## 26 26 0.7423 29
## 27 27 0.7474 29
## 28 28 0.9179 50
## 29 29 0.7932 29
## 30 30 0.1333 46
## 31 31 0.2877 20
## 32 32 0.1947 46
## 33 33 0.7841 29
## 34 34 0.1289 46
## 35 35 0.1291 46
## 36 36 0.0723 14
## 37 37 0.0531 14
## 38 38 0.5319 33
## 39 39 0.1123 46
## 40 40 0.7432 29
## 41 41 0.7313 29
## 42 42 0.8851 83
## 43 43 0.5171 33
## 44 44 0.8519 83
## 45 45 0.4428 33
## 46 46 0.1579 46
## 47 47 0.4423 33
## 48 48 0.9677 50
## 49 49 0.4846 33
## 50 50 0.2525 20
## 51 51 0.2597 20
## 52 52 0.5420 33
## 53 53 0.6499 22
## 54 54 0.3364 3
## 55 55 0.0609 14
## 56 56 0.4513 33
## 57 57 0.8388 83
## 58 58 0.5746 33
## 59 59 0.3534 3
## 60 60 0.5474 33
## 61 61 0.8927 83
## 62 62 0.4900 33
## 63 63 0.1716 46
## 64 64 0.5430 33
## 65 65 0.9615 50
## 66 66 0.3137 20
## 67 67 0.8205 83
## 68 68 0.3071 20
## 69 69 0.1855 46
## 70 70 0.0483 14
## 71 71 0.2457 20
## 72 72 0.3511 3
## 73 73 0.1590 46
## 74 74 0.3041 20
## 75 75 0.0175 14
## 76 76 0.9966 50
## 77 77 0.8044 29
## 78 78 0.0866 14
## 79 79 0.8699 83
## 80 80 0.5546 33
## 81 81 0.4214 3
## 82 82 0.0676 14
## 83 83 0.5614 33
## 84 84 0.0707 14
## 85 85 0.2114 46
## 86 86 0.5496 33
## 87 87 0.4820 33
## 88 88 0.1595 46
## 89 89 0.1496 46
## 90 90 0.4993 33
## 91 91 0.9406 50
## 92 92 0.3342 3
## 93 93 0.1884 46
## 94 94 0.2697 20
## 95 95 0.5307 33
## 96 96 0.0215 14
## 97 97 0.7988 29
## 98 98 0.1103 46
## 99 99 0.5398 33
## 100 100 0.5712 33
## 101 101 0.6190 102
## 102 102 0.7149 22
## 103 103 0.1233 46
## 104 104 0.3110 20
## 105 105 0.9457 50
## 106 106 0.5000 33
## 107 107 0.1352 46
## 108 108 0.8693 83
## 109 109 0.2050 46
## 110 110 0.9250 50
## 111 111 0.8868 83
## 112 112 0.1363 46
## 113 113 0.7853 29
## 114 114 0.4533 33
## 115 115 0.1357 46
## 116 116 0.8852 83
## 117 117 0.3367 3
## 118 118 0.3193 3
## 119 119 0.4038 3
## 120 120 0.4791 33
## 121 121 0.3679 3
## 122 122 0.4657 33
## 123 123 0.0499 14
## 124 124 0.1874 46
## 125 125 0.9827 50
## 126 126 0.3283 3
## 127 127 0.1710 46
## 128 128 0.4883 33
## 129 129 0.0187 14
## 130 130 0.3395 3
## 131 131 0.0297 14
## 132 132 0.8672 83
## 133 133 0.7317 29
## 134 134 0.3153 20
## 135 135 0.3865 3
## 136 136 0.3324 3
## 137 137 0.0898 14
## 138 138 0.7571 29
## 139 139 0.6030 102
## 140 140 0.1454 46
## 141 141 0.0325 14
## 142 142 0.4838 33
## 143 143 0.4446 33
## 144 144 0.0604 14
## 145 145 0.3275 3
## 146 146 0.8784 83
## 147 147 0.9306 50
## 148 148 0.3922 3
## 149 149 0.1588 46
## 150 150 0.3199 3
## 151 151 0.3070 20
## 152 152 0.1078 46
## 153 153 0.9793 50
## 154 154 0.4969 33
## 155 155 0.0931 46
## 156 156 0.2118 46
## 157 157 0.9305 50
## 158 158 0.2968 20
## 159 159 0.6532 22
## 160 160 0.9011 83
## 161 161 0.9908 50
## 162 162 0.4303 3
## 163 163 0.3938 3
## 164 164 0.1419 46
## 165 165 0.2798 20
## 166 166 0.5648 33
## 167 167 0.9351 50
## 168 168 0.3584 3
## 169 169 0.8420 83
## 170 170 0.7224 22
## 171 171 0.7507 29
## 172 172 0.9240 50
## 173 173 0.0024 14
## 174 174 0.1604 46
## 175 175 0.3993 3
## 176 176 0.6753 22
## 177 177 0.4804 33
## 178 178 0.5338 33
## 179 179 0.3170 3
## 180 180 0.8148 83
## 181 181 0.2922 20
## 182 182 0.4091 3
## 183 183 0.0909 46
## 184 184 0.7986 29
## 185 185 0.3598 3
## 186 186 0.0405 14
## 187 187 0.0411 14
## 188 188 0.9544 50
## 189 189 0.3733 3
## 190 190 0.8064 29
## 191 191 0.9101 83
## 192 192 0.4401 33
## 193 193 0.5763 33
## 194 194 0.0737 14
## 195 195 0.1646 46
## 196 196 0.7399 29
## 197 197 0.4757 33
## 198 198 0.6855 22
## 199 199 0.9515 50
## 200 200 0.4975 33
## 201 201 0.4705 33
## 202 202 0.5602 33
## 203 203 0.6525 22
## 204 204 0.2796 20
## 205 205 0.9799 50
## 206 206 0.6439 22
## 207 207 0.5826 102
## 208 208 0.6159 102
## 209 209 0.9251 50
## 210 210 0.3900 3
## 211 211 0.2879 20
## 212 212 0.0907 46
## 213 213 0.3220 3
## 214 214 0.7583 29
## 215 215 0.1044 46
## 216 216 0.7103 22
## 217 217 0.9665 50
## 218 218 0.2015 46
## 219 219 0.1085 46
## 220 220 0.0554 14
## 221 221 0.8297 83
## 222 222 0.5812 102
## 223 223 0.4701 33
## 224 224 0.3650 3
## 225 225 0.2801 20
## 226 226 0.5997 102
## 227 227 0.8186 83
## 228 228 0.0978 46
## 229 229 0.9637 50
## 230 230 0.1687 46
## 231 231 0.0861 14
## 232 232 0.8612 83
## 233 233 0.5248 33
## 234 234 0.6568 22
## 235 235 0.2295 20
## 236 236 0.7212 22
## 237 237 0.4908 33
## 238 238 0.9653 50
## 239 239 0.9069 83
## 240 240 0.5513 33
## 241 241 0.0756 14
## 242 242 0.0227 14
## 243 243 0.5132 33
## 244 244 0.6307 102
## 245 245 0.4188 3
## 246 246 0.8793 83
## 247 247 0.1080 46
## 248 248 0.9803 50
## 249 249 0.2650 20
## 250 250 0.0843 14
## 251 251 0.3859 3
## 252 252 0.1249 46
## 253 253 0.5816 102
## 254 254 0.2401 20
## 255 255 0.7219 22
## 256 256 0.1459 46
## 257 257 0.1528 46
## 258 258 0.2592 20
## 259 259 0.7779 29
## 260 260 0.4265 3
## 261 261 0.0600 14
## 262 262 0.1148 46
## 263 263 0.4828 33
## 264 264 0.9792 50
## 265 265 0.8115 83
## 266 266 0.5429 33
## 267 267 0.0724 14
## 268 268 0.4665 33
## 269 269 0.3399 3
## 270 270 0.6899 22
## 271 271 0.5142 33
## 272 272 0.5149 33
## 273 273 0.5455 33
## 274 274 0.4475 33
## 275 275 0.0839 14
## 276 276 0.9301 50
## 277 277 0.0164 14
## 278 278 0.4141 3
## 279 279 0.2270 20
## 280 280 0.0996 46
## 281 281 0.4829 33
## 282 282 0.6501 22
## 283 283 0.9213 50
## 284 284 0.3626 3
## 285 285 0.8551 83
## 286 286 0.3009 20
## 287 287 0.4657 33
## 288 288 0.1427 46
## 289 289 0.8077 29
## 290 290 0.6658 22
## 291 291 0.0619 14
## 292 292 0.4309 3
## 293 293 0.3969 3
## 294 294 0.6970 22
## 295 295 0.6593 22
## 296 296 0.4074 3
## 297 297 0.3069 20
## 298 298 0.2551 20
## 299 299 0.6726 22
## 300 300 0.8944 83
## 301 301 0.8457 83
## 302 302 0.3929 3
## 303 303 0.0791 14
## 304 304 0.8284 83
## 305 305 0.0729 14
## 306 306 0.1148 46
## 307 307 0.6400 22
## 308 308 0.3206 3
## 309 309 0.1887 46
## 310 310 0.3938 3
## 311 311 0.8620 83
## 312 312 0.3479 3
## 313 313 0.0014 14
## 314 314 0.9113 83
## 315 315 0.9517 50
## 316 316 0.4909 33
## 317 317 0.4637 33
## 318 318 0.5965 102
## 319 319 0.9061 83
## 320 320 0.1730 46
## 321 321 0.7859 29
## 322 322 0.2329 20
## 323 323 0.5770 33
## 324 324 0.8409 83
## 325 325 0.1322 46
## 326 326 0.8959 83
## 327 327 0.4501 33
## 328 328 0.8941 83
## 329 329 0.2485 20
## 330 330 0.0837 14
## 331 331 0.0486 14
## 332 332 0.9798 50
## 333 333 0.4842 33
## 334 334 0.8454 83
## 335 335 0.4163 3
## 336 336 0.4893 33
## 337 337 0.1833 46
## 338 338 0.7592 29
## 339 339 0.3051 20
## 340 340 0.1657 46
## 341 341 0.0328 14
## 342 342 0.1365 46
## 343 343 0.1771 46
## 344 344 0.5196 33
## 345 345 0.8111 83
## 346 346 0.1154 46
## 347 347 0.8934 83
## 348 348 0.5754 33
## 349 349 0.1466 46
## 350 350 0.9028 83
## 351 351 0.2530 20
## 352 352 0.1506 46
## 353 353 0.7685 29
## 354 354 0.2301 20
## 355 355 0.3054 20
## 356 356 0.5186 33
## 357 357 0.3346 3
## 358 358 0.1544 46
## 359 359 0.2664 20
## 360 360 0.3508 3
## 361 361 0.5785 33
## 362 362 0.8086 29
## 363 363 0.9333 50
## 364 364 0.8339 83
## 365 365 0.1270 46
## 366 366 0.6495 22
## 367 367 0.6904 22
## 368 368 0.0320 14
## 369 369 0.9205 50
## 370 370 0.4785 33
## 371 371 0.2665 20
## 372 372 0.8565 83
## 373 373 0.2291 20
## 374 374 0.7919 29
## 375 375 0.6468 22
## 376 376 0.4243 3
## 377 377 0.0951 46
## 378 378 0.0035 14
## 379 379 0.5311 33
## 380 380 0.5243 33
## 381 381 0.2132 46
## 382 382 0.7169 22
## 383 383 0.9613 50
## 384 384 0.5183 33
## 385 385 0.1745 46
## 386 386 0.5625 33
## 387 387 0.7593 29
## 388 388 0.6670 22
## 389 389 0.2249 46
## 390 390 0.3458 3
## 391 391 0.3198 3
## 392 392 0.9049 83
## 393 393 0.1992 46
## 394 394 0.6810 22
## 395 395 0.1375 46
## 396 396 0.1070 46
## 397 397 0.0929 46
## 398 398 0.9164 50
## 399 399 0.2771 20
## 400 400 0.8858 83
## 401 401 0.7729 29
## 402 402 0.7951 29
## 403 403 0.2057 46
## 404 404 0.0482 14
## 405 405 0.0388 14
## 406 406 0.2846 20
## 407 407 0.3488 3
## 408 408 0.7375 29
## 409 409 0.2517 20
## 410 410 0.5174 33
## 411 411 0.7594 29
## 412 412 0.6361 102
## 413 413 0.2039 46
## 414 414 0.9930 50
## 415 415 0.0004 14
## 416 416 0.2066 46
## 417 417 0.6340 102
## 418 418 0.0173 14
## 419 419 0.0267 14
## 420 420 0.6078 102
## 421 421 0.5705 33
## 422 422 0.2459 20
## 423 423 0.9195 50
## 424 424 0.6722 22
## 425 425 0.6455 22
## 426 426 0.2083 46
## 427 427 0.4806 33
## 428 428 0.9865 50
## 429 429 0.9931 50
## 430 430 0.4508 33
## 431 431 0.7148 22
## 432 432 0.3166 20
## 433 433 0.8337 83
## 434 434 0.4340 3
## 435 435 0.9960 50
## 436 436 0.8058 29
## 437 437 0.4862 33
## 438 438 0.5388 33
## 439 439 0.3410 3
## 440 440 0.0520 14
## 441 441 0.4587 33
## 442 442 0.4982 33
## 443 443 0.2828 20
## 444 444 0.7764 29
## 445 445 0.3039 20
## 446 446 0.5156 33
## 447 447 0.4780 33
## 448 448 0.7689 29
## 449 449 0.1639 46
## 450 450 0.4418 33
## 451 451 0.5234 33
## 452 452 0.4769 33
## 453 453 0.5246 33
## 454 454 0.6852 22
## 455 455 0.3518 3
## 456 456 0.8396 83
## 457 457 0.9219 50
## 458 458 0.1063 46
## 459 459 0.2065 46
## 460 460 0.4866 33
## 461 461 0.3238 3
## 462 462 0.4717 33
## 463 463 0.5861 102
## 464 464 0.2240 46
## 465 465 0.7340 29
## 466 466 0.1505 46
## 467 467 0.6976 22
## 468 468 0.2641 20
## 469 469 0.4265 3
## 470 470 0.7213 22
## 471 471 0.4745 33
## 472 472 0.3386 3
## 473 473 0.2406 20
## 474 474 0.2163 46
## 475 475 0.2421 20
## 476 476 0.5649 33
## 477 477 0.7126 22
## 478 478 0.1081 46
## 479 479 0.5191 33
## 480 480 0.8522 83
## 481 481 0.7146 22
## 482 482 0.3140 20
## 483 483 0.1158 46
## 484 484 0.5750 33
## 485 485 0.8314 83
## 486 486 0.5203 33
## 487 487 0.6940 22
## 488 488 0.4999 33
## 489 489 0.3542 3
## 490 490 0.9648 50
## 491 491 0.9223 50
## 492 492 0.2046 46
## 493 493 0.9549 50
## 494 494 0.8740 83
## 495 495 0.6973 22
## 496 496 0.5126 33
## 497 497 0.4808 33
## 498 498 0.2018 46
## 499 499 0.1002 46
## 500 500 0.4726 33
## 501 501 0.3122 20
## 502 502 0.7724 29
## 503 503 0.9011 83
## 504 504 0.3352 3
## 505 505 0.8239 83
## 506 506 0.2200 46
## 507 507 0.7661 29
## 508 508 0.5607 33
## 509 509 0.4235 3
## 510 510 0.8386 83
## 511 511 0.2873 20
## 512 512 0.4707 33
## 513 513 0.7808 29
## 514 514 0.0827 14
## 515 515 0.3945 3
## 516 516 0.0957 46
## 517 517 0.1333 46
## 518 518 0.2211 46
## 519 519 0.2741 20
## 520 520 0.2991 20
## 521 521 0.3748 3
## 522 522 0.4915 33
## 523 523 0.8786 83
## 524 524 0.7487 29
## 525 525 0.9552 50
## 526 526 0.3319 3
## 527 527 0.8242 83
## 528 528 0.1327 46
## 529 529 0.1247 46
## 530 530 0.7281 29
## 531 531 0.5484 33
## 532 532 0.6085 102
## 533 533 0.1229 46
## 534 534 0.8764 83
## 535 535 0.8423 83
## 536 536 0.0462 14
## 537 537 0.7070 22
## 538 538 0.5348 33
## 539 539 0.9455 50
## 540 540 0.9120 83
## 541 541 0.4560 33
## 542 542 0.7655 29
## 543 543 0.5050 33
## 544 544 0.2025 46
## 545 545 0.7171 22
## 546 546 0.7681 29
## 547 547 0.7064 22
## 548 548 0.1916 46
## 549 549 0.2979 20
## 550 550 0.3251 3
## 551 551 0.5719 33
## 552 552 0.8825 83
## 553 553 0.8771 83
## 554 554 0.3859 3
## 555 555 0.7378 29
## 556 556 0.7963 29
## 557 557 0.7242 29
## 558 558 0.3854 3
## 559 559 0.2982 20
## 560 560 0.0575 14
## 561 561 0.6737 22
## 562 562 0.1980 46
## 563 563 0.6251 102
## 564 564 0.1382 46
## 565 565 0.3731 3
## 566 566 0.3141 20
## 567 567 0.8152 83
## 568 568 0.3683 3
## 569 569 0.4396 33
## 570 570 0.4391 33
## 571 571 0.6018 102
## 572 572 0.4039 3
## 573 573 0.9583 50
## 574 574 0.9708 50
## 575 575 0.9145 50
## 576 576 0.0829 14
## 577 577 0.4769 33
## 578 578 0.3391 3
## 579 579 0.6734 22
## 580 580 0.6365 102
## 581 581 0.8593 83
## 582 582 0.9483 50
## 583 583 0.5740 33
## 584 584 0.5353 33
## 585 585 0.9417 50
## 586 586 0.8924 83
## 587 587 0.4103 3
## 588 588 0.0500 14
## 589 589 0.7783 29
## 590 590 0.9260 50
## 591 591 0.3775 3
## 592 592 0.2449 20
## 593 593 0.0876 14
## 594 594 0.3911 3
## 595 595 0.1826 46
## 596 596 0.1336 46
## 597 597 0.2575 20
## 598 598 0.5532 33
## 599 599 0.1481 46
## 600 600 0.9629 50
## 601 601 0.9445 50
## 602 602 0.9923 50
## 603 603 0.7062 22
## 604 604 0.1408 46
## 605 605 0.0090 14
## 606 606 0.6865 22
## 607 607 0.6812 22
## 608 608 0.9175 50
## 609 609 0.4084 3
## 610 610 0.4224 3
## 611 611 0.5373 33
## 612 612 0.4136 3
## 613 613 0.0976 46
## 614 614 0.3803 3
## 615 615 0.1980 46
## 616 616 0.7250 29
## 617 617 0.0110 14
## 618 618 0.9189 50
## 619 619 0.9002 83
## 620 620 0.7542 29
## 621 621 0.9519 50
## 622 622 0.6256 102
## 623 623 0.6560 22
## 624 624 0.3814 3
## 625 625 0.0656 14
## 626 626 0.6909 22
## 627 627 0.1275 46
## 628 628 0.2913 20
## 629 629 0.6322 102
## 630 630 0.3900 3
## 631 631 0.0704 14
## 632 632 0.8636 83
## 633 633 0.3852 3
## 634 634 0.6708 22
## 635 635 0.0212 14
## 636 636 0.5952 102
## 637 637 0.2762 20
## 638 638 0.3991 3
## 639 639 0.1458 46
## 640 640 0.8241 83
## 641 641 0.1404 46
## 642 642 0.9090 83
## 643 643 0.8999 83
## 644 644 0.1923 46
## 645 645 0.5323 33
## 646 646 0.5221 33
## 647 647 0.1603 46
## 648 648 0.5196 33
## 649 649 0.2245 46
## 650 650 0.2815 20
## 651 651 0.5037 33
## 652 652 0.1590 46
## 653 653 0.9206 50
## 654 654 0.4990 33
## 655 655 0.6153 102
## 656 656 0.7439 29
## 657 657 0.6168 102
## 658 658 0.9301 50
## 659 659 0.0804 14
## 660 660 0.0281 14
## 661 661 0.5415 33
## 662 662 0.2412 20
## 663 663 0.6448 22
## 664 664 0.3777 3
## 665 665 0.0469 14
## 666 666 0.0481 14
## 667 667 0.9628 50
## 668 668 0.2265 20
## 669 669 0.0114 14
## 670 670 0.2185 46
## 671 671 0.0559 14
## 672 672 0.2350 20
## 673 673 0.4027 3
## 674 674 0.0143 14
## 675 675 0.3618 3
## 676 676 0.5845 102
## 677 677 0.6058 102
## 678 678 0.2637 20
## 679 679 0.6751 22
## 680 680 0.9358 50
## 681 681 0.0036 14
## 682 682 0.7870 29
## 683 683 0.8069 29
## 684 684 0.0730 14
## 685 685 0.5670 33
## 686 686 0.5392 33
## 687 687 0.1377 46
## 688 688 0.2763 20
## 689 689 0.3518 3
## 690 690 0.8128 83
## 691 691 0.1715 46
## 692 692 0.5212 33
## 693 693 0.7646 29
## 694 694 0.2888 20
## 695 695 0.4368 3
## 696 696 0.6695 22
## 697 697 0.0369 14
## 698 698 0.5606 33
## 699 699 0.9324 50
## 700 700 0.4346 3
## 701 701 0.9362 50
## 702 702 0.9783 50
## 703 703 0.6768 22
## 704 704 0.2983 20
## 705 705 0.2083 46
## 706 706 0.3189 3
## 707 707 0.8544 83
## 708 708 0.0611 14
## 709 709 0.1820 46
## 710 710 0.4838 33
## 711 711 0.3383 3
## 712 712 0.8134 83
## 713 713 0.8704 83
## 714 714 0.0192 14
## 715 715 0.8247 83
## 716 716 0.4013 3
## 717 717 0.6721 22
## 718 718 0.1187 46
## 719 719 0.4764 33
## 720 720 0.9253 50
## 721 721 0.5748 33
## 722 722 0.9128 83
## 723 723 0.7553 29
## 724 724 0.6310 102
## 725 725 0.7944 29
## 726 726 0.9235 50
## 727 727 0.1645 46
## 728 728 0.1929 46
## 729 729 0.0976 46
## 730 730 0.8291 83
## 731 731 0.8059 29
## 732 732 0.2793 20
## 733 733 0.4490 33
## 734 734 0.6259 102
## 735 735 0.3709 3
## 736 736 0.3823 3
## 737 737 0.9145 50
## 738 738 0.3903 3
## 739 739 0.0703 14
## 740 740 0.7075 22
## 741 741 0.6930 22
## 742 742 0.0961 46
## 743 743 0.0369 14
## 744 744 0.4009 3
## 745 745 0.0115 14
## 746 746 0.5679 33
## 747 747 0.9449 50
## 748 748 0.3433 3
## 749 749 0.2445 20
## 750 750 0.5417 33
## 751 751 0.1177 46
## 752 752 0.3749 3
## 753 753 0.3275 3
## 754 754 0.9472 50
## 755 755 0.9106 83
## 756 756 0.7624 29
## 757 757 0.7581 29
## 758 758 0.9985 50
## 759 759 0.5804 102
## 760 760 0.2133 46
## 761 761 0.1336 46
## 762 762 0.7923 29
## 763 763 0.9819 50
## 764 764 0.9820 50
## 765 765 0.1254 46
## 766 766 0.6183 102
## 767 767 0.8582 83
## 768 768 0.1394 46
## 769 769 0.3666 3
## 770 770 0.1571 46
## 771 771 0.4478 33
## 772 772 0.4859 33
## 773 773 0.9502 50
## 774 774 0.9048 83
## 775 775 0.9402 50
## 776 776 0.7735 29
## 777 777 0.0922 46
## 778 778 0.0162 14
## 779 779 0.3335 3
## 780 780 0.2419 20
## 781 781 0.7921 29
## 782 782 0.4964 33
## 783 783 0.5139 33
## 784 784 0.0724 14
## 785 785 0.3451 3
## 786 786 0.7563 29
## 787 787 0.3851 3
## 788 788 0.0069 14
## 789 789 0.7184 22
## 790 790 0.5570 33
## 791 791 0.0701 14
## 792 792 0.3478 3
## 793 793 0.4130 3
## 794 794 0.3117 20
## 795 795 0.7376 29
## 796 796 0.3883 3
## 797 797 0.6194 102
## 798 798 0.6235 102
## 799 799 0.8024 29
## 800 800 0.6541 22
## 801 801 0.6795 22
## 802 802 0.4108 3
## 803 803 0.6633 22
## 804 804 0.0271 14
## 805 805 0.8159 83
## 806 806 0.0750 14
## 807 807 0.9010 83
## 808 808 0.0708 14
## 809 809 0.1911 46
## 810 810 0.7769 29
## 811 811 0.2031 46
## 812 812 0.4038 3
## 813 813 0.4462 33
## 814 814 0.6063 102
## 815 815 0.5764 33
## 816 816 0.0595 14
## 817 817 0.1827 46
## 818 818 0.2961 20
## 819 819 0.3761 3
## 820 820 0.7131 22
## 821 821 0.1251 46
## 822 822 0.4292 3
## 823 823 0.0304 14
## 824 824 0.4542 33
## 825 825 0.7943 29
## 826 826 0.4713 33
## 827 827 0.2364 20
## 828 828 0.8870 83
## 829 829 0.1260 46
## 830 830 0.2693 20
## 831 831 0.8825 83
## 832 832 0.7505 29
## 833 833 0.0977 46
## 834 834 0.8156 83
## 835 835 0.8584 83
## 836 836 0.1172 46
## 837 837 0.1374 46
## 838 838 0.5483 33
## 839 839 0.0590 14
## 840 840 0.4955 33
## 841 841 0.0074 14
## 842 842 0.8483 83
## 843 843 0.0627 14
## 844 844 0.8198 83
## 845 845 0.5394 33
## 846 846 0.4990 33
## 847 847 0.0222 14
## 848 848 0.5541 33
## 849 849 0.7199 22
## 850 850 0.2357 20
## 851 851 0.8119 83
## 852 852 0.4215 3
## 853 853 0.5649 33
## 854 854 0.1517 46
## 855 855 0.1948 46
## 856 856 0.1668 46
## 857 857 0.8351 83
## 858 858 0.1111 46
## 859 859 0.2681 20
## 860 860 0.7985 29
## 861 861 0.2989 20
## 862 862 0.8676 83
## 863 863 0.0394 14
## 864 864 0.3398 3
## 865 865 0.3096 20
## 866 866 0.1295 46
## 867 867 0.3738 3
## 868 868 0.4650 33
## 869 869 0.0466 14
## 870 870 0.9875 50
## 871 871 0.9085 83
## 872 872 0.9794 50
## 873 873 0.1705 46
## 874 874 0.0427 14
## 875 875 0.1428 46
## 876 876 0.3606 3
## 877 877 0.5444 33
## 878 878 0.9374 50
## 879 879 0.6355 102
## 880 880 0.4847 33
## 881 881 0.0859 14
## 882 882 0.9449 50
## 883 883 0.3467 3
## 884 884 0.3693 3
## 885 885 0.6241 102
## 886 886 0.7274 29
## 887 887 0.1979 46
## 888 888 0.5887 102
## 889 889 0.8429 83
## 890 890 0.9994 50
## 891 891 0.0114 14
## 892 892 0.8213 83
## 893 893 0.2056 46
## 894 894 0.1138 46
## 895 895 0.6881 22
## 896 896 0.2730 20
## 897 897 0.8232 83
## 898 898 0.6444 22
## 899 899 0.5279 33
## 900 900 0.0287 14
## 901 901 0.2872 20
## 902 902 0.0356 14
## 903 903 0.8979 83
## 904 904 0.1310 46
## 905 905 0.0514 14
## 906 906 0.3639 3
## 907 907 0.6955 22
## 908 908 0.8923 83
## 909 909 0.2443 20
## 910 910 0.3920 3
## 911 911 0.6202 102
## 912 912 0.5645 33
## 913 913 0.0414 14
## 914 914 0.4742 33
## 915 915 0.9492 50
## 916 916 0.2403 20
## 917 917 0.6781 22
## 918 918 0.9134 83
## 919 919 0.0456 14
## 920 920 0.1364 46
## 921 921 0.1004 46
## 922 922 0.4097 3
## 923 923 0.9699 50
## 924 924 0.3640 3
## 925 925 0.7249 29
## 926 926 0.7027 22
## 927 927 0.0248 14
## 928 928 0.9460 50
## 929 929 0.5335 33
## 930 930 0.6963 22
## 931 931 0.0453 14
## 932 932 0.9166 50
## 933 933 0.0328 14
## 934 934 0.7773 29
## 935 935 0.5261 33
## 936 936 0.2661 20
## 937 937 0.5049 33
## 938 938 0.5325 33
## 939 939 0.0869 14
## 940 940 0.9156 50
## 941 941 0.5640 33
## 942 942 0.0592 14
## 943 943 0.6727 22
## 944 944 0.6273 102
## 945 945 0.0729 14
## 946 946 0.4377 3
## 947 947 0.6415 22
## 948 948 0.8100 83
## 949 949 0.3918 3
## 950 950 0.7734 29
## 951 951 0.8734 83
## 952 952 0.6183 102
## 953 953 0.3577 3
## 954 954 0.9323 50
## 955 955 0.7447 29
## 956 956 0.0636 14
## 957 957 0.1082 46
## 958 958 0.8188 83
## 959 959 0.7931 29
## 960 960 0.0571 14
## 961 961 0.9076 83
## 962 962 0.7216 22
## 963 963 0.9027 83
## 964 964 0.5357 33
## 965 965 0.3485 3
## 966 966 0.8333 83
## 967 967 0.7903 29
## 968 968 0.5314 33
## 969 969 0.7787 29
## 970 970 0.0584 14
## 971 971 0.4581 33
## 972 972 0.0223 14
## 973 973 0.7399 29
## 974 974 0.7057 22
## 975 975 0.0057 14
## 976 976 0.4708 33
## 977 977 0.5962 102
## 978 978 0.2840 20
## 979 979 0.0552 14
## 980 980 0.3779 3
## 981 981 0.5302 33
## 982 982 0.2510 20
## 983 983 0.9441 50
## 984 984 0.4375 3
## 985 985 0.7011 22
## 986 986 0.1758 46
## 987 987 0.2420 20
## 988 988 0.0237 14
## 989 989 0.3288 3
## 990 990 0.4131 3
## 991 991 0.1088 46
## 992 992 0.8521 83
## 993 993 0.0091 14
## 994 994 0.9698 50
## 995 995 0.8046 29
## 996 996 0.5010 33
## 997 997 0.9342 50
## 998 998 0.4679 33
## 999 999 0.5110 33
## 1000 1000 0.8322 83cat("\n")