Tugas Markdown_5006221059
Abiyyu
2025-05-26
library(ggplot2)
library(dplyr)
library(ggpmisc)
library(rlang)
library(yfR)
library(knitr)Final Project SIMAK
Bangkitan data dari Yahoo Finance
Data bangkitan berasal dari komoditas yang dihasilkan di Indonesia dengan nilai yang stabil dan menjanjikan, yakni emas, tembaga, dan kopi. Data yang diambil dari tahun 2023 hingga saat ini.
data <- yf_get(
tickers = c("GC=F", "HG=F", "KC=F"),
first_date = "2023-01-01",
last_date = Sys.Date(),
freq_data = "daily",
type_return = "arit"
)Memisahkan nilai Close
close <- yf_convert_to_wide(data)$price_close
close## # A tibble: 602 × 4
## ref_date `GC=F` `HG=F` `KC=F`
## <date> <dbl> <dbl> <dbl>
## 1 2023-01-03 1840. 3.77 166.
## 2 2023-01-04 1853. 3.74 161.
## 3 2023-01-05 1835. 3.82 161.
## 4 2023-01-06 1864. 3.91 158.
## 5 2023-01-09 1873. 4.02 158.
## 6 2023-01-10 1872. 4.07 151.
## 7 2023-01-11 1875. 4.15 144.
## 8 2023-01-12 1896. 4.19 149.
## 9 2023-01-13 1918. 4.21 152.
## 10 2023-01-17 1907. 4.22 151.
## # ℹ 592 more rowsMemisahkan nilai Return
return <- yf_convert_to_wide(data)$ret_closing_prices
return## # A tibble: 602 × 4
## ref_date `GC=F` `HG=F` `KC=F`
## <date> <dbl> <dbl> <dbl>
## 1 2023-01-03 NA NA NA
## 2 2023-01-04 0.00712 -0.00704 -0.0301
## 3 2023-01-05 -0.00972 0.0210 -0.00465
## 4 2023-01-06 0.0160 0.0237 -0.0140
## 5 2023-01-09 0.00456 0.0281 -0.00158
## 6 2023-01-10 -0.000587 0.0121 -0.0452
## 7 2023-01-11 0.00160 0.0215 -0.0464
## 8 2023-01-12 0.0111 0.00758 0.0382
## 9 2023-01-13 0.0121 0.00514 0.0154
## 10 2023-01-17 -0.00584 0.00178 -0.00396
## # ℹ 592 more rowsMemisahkan masing-masing komponen investasi
GOLD <- close$`GC=F`
COPP <- close$`HG=F`
COFE <- close$`KC=F`Menggabungkan kolom investasi menjadi portofolio
portofolio <- data.frame(cbind(GOLD, COPP, COFE))
portofolio## GOLD COPP COFE
## 1 1839.7 3.7660 166.30
## 2 1852.8 3.7395 161.30
## 3 1834.8 3.8180 160.55
## 4 1864.2 3.9085 158.30
## 5 1872.7 4.0185 158.05
## 6 1871.6 4.0670 150.90
## 7 1874.6 4.1545 143.90
## 8 1895.5 4.1860 149.40
## 9 1918.4 4.2075 151.70
## 10 1907.2 4.2150 151.10
## 11 1904.4 4.2285 155.00
## 12 1922.1 4.2265 154.60
## 13 1926.4 4.2485 154.80
## 14 1927.1 4.2540 158.55
## 15 1933.9 4.2455 159.85
## 16 1941.2 4.2400 162.45
## 17 1929.1 4.2670 167.15
## 18 1928.6 4.2240 169.90
## 19 1922.9 4.2035 170.40
## 20 1929.5 4.2285 181.75
## 21 1927.8 4.1110 175.90
## 22 1916.3 4.0940 177.90
## 23 1862.9 4.0630 172.80
## 24 1866.2 4.0435 175.70
## 25 1871.7 4.0885 177.05
## 26 1877.4 4.0435 175.60
## 27 1866.2 4.1055 173.65
## 28 1862.8 4.0275 174.75
## 29 1851.9 4.0870 177.05
## 30 1854.0 4.1100 183.55
## 31 1834.2 4.0520 176.85
## 32 1842.0 4.1655 180.70
## 33 1840.4 4.1140 188.70
## 34 1833.0 4.2345 194.45
## 35 1832.0 4.2025 199.50
## 36 1818.0 4.0730 193.65
## 37 1808.8 3.9550 191.20
## 38 1817.0 4.0090 190.70
## 39 1828.9 4.0975 190.40
## 40 1837.7 4.1680 185.30
## 41 1833.5 4.0840 183.95
## 42 1847.7 4.0780 180.80
## 43 1847.9 4.1005 182.45
## 44 1813.9 3.9865 184.55
## 45 1812.7 4.0415 179.55
## 46 1829.3 4.0545 178.00
## 47 1862.0 4.0455 182.25
## 48 1911.7 4.0695 183.20
## 49 1906.2 4.0105 180.90
## 50 1926.6 3.8565 178.05
## 51 1919.0 3.8855 185.50
## 52 1969.8 3.9135 183.00
## 53 1979.2 3.9755 184.90
## 54 1938.0 4.0185 186.70
## 55 1946.8 4.0685 178.00
## 56 1993.8 4.1460 174.30
## 57 1982.1 4.1015 179.25
## 58 1952.4 4.1045 176.90
## 59 1972.4 4.1120 173.75
## 60 1966.1 4.1150 169.70
## 61 1980.3 4.0905 169.80
## 62 1969.0 4.1045 170.50
## 63 1983.9 4.0595 176.25
## 64 2022.2 3.9835 174.85
## 65 2020.9 3.9980 180.15
## 66 2011.9 4.0260 183.60
## 67 1989.1 3.9865 182.60
## 68 2004.8 4.0245 190.50
## 69 2010.9 4.0845 190.25
## 70 2041.3 4.1240 196.10
## 71 2002.2 4.1075 193.40
## 72 1994.2 4.0660 201.00
## 73 2007.4 4.0895 205.25
## 74 1995.2 4.0720 202.55
## 75 2007.6 4.0220 195.90
## 76 1979.5 3.9800 194.20
## 77 1989.1 3.9530 196.75
## 78 1994.0 3.8460 192.45
## 79 1985.7 3.8500 195.85
## 80 1989.9 3.8645 192.10
## 81 1990.1 3.8700 189.85
## 82 1983.4 3.9170 189.25
## 83 2014.3 3.8480 190.65
## 84 2028.6 3.8315 189.20
## 85 2048.0 3.8500 186.40
## 86 2017.4 3.8715 191.00
## 87 2026.3 3.9180 186.90
## 88 2036.2 3.8890 188.00
## 89 2030.5 3.8280 187.45
## 90 2014.7 3.6975 185.80
## 91 2014.5 3.7165 186.00
## 92 2018.0 3.7375 193.05
## 93 1988.4 3.6545 190.35
## 94 1980.7 3.7430 189.85
## 95 1956.5 3.6815 190.45
## 96 1978.7 3.7225 192.00
## 97 1974.8 3.6740 189.20
## 98 1972.4 3.6415 187.45
## 99 1962.8 3.5535 188.00
## 100 1943.1 3.5805 182.70
## 101 1944.1 3.6735 181.60
## 102 1958.0 3.6580 177.10
## 103 1963.9 3.6310 178.65
## 104 1978.0 3.7065 183.05
## 105 1952.4 3.7225 180.30
## 106 1958.0 3.7625 183.10
## 107 1965.5 3.7670 182.60
## 108 1942.7 3.7545 185.40
## 109 1963.6 3.7965 194.85
## 110 1962.2 3.7890 190.65
## 111 1955.3 3.7505 185.55
## 112 1944.6 3.8285 182.75
## 113 1955.3 3.8660 184.40
## 114 1957.8 3.8965 187.00
## 115 1958.4 3.8845 184.90
## 116 1935.5 3.8785 177.45
## 117 1933.3 3.9110 172.00
## 118 1912.7 3.8885 171.70
## 119 1919.1 3.8060 168.05
## 120 1923.7 3.7865 167.95
## 121 1914.0 3.7815 169.45
## 122 1912.3 3.7205 165.65
## 123 1909.2 3.6775 163.60
## 124 1921.1 3.7410 161.00
## 125 1921.7 3.7790 162.50
## 126 1919.6 3.7535 161.05
## 127 1908.7 3.7200 162.35
## 128 1926.2 3.7670 162.80
## 129 1925.0 3.7715 161.75
## 130 1931.3 3.7535 159.30
## 131 1956.2 3.8420 158.75
## 132 1959.2 3.9295 159.35
## 133 1960.1 3.9220 161.95
## 134 1952.4 3.8320 154.75
## 135 1977.2 3.8160 155.25
## 136 1977.5 3.7995 152.45
## 137 1968.3 3.8175 158.05
## 138 1964.3 3.8030 161.85
## 139 1960.3 3.8405 163.00
## 140 1962.1 3.9020 161.85
## 141 1968.9 3.8905 163.15
## 142 1945.4 3.8635 161.45
## 143 1960.4 3.9170 157.90
## 144 1970.5 3.9945 164.65
## 145 1940.7 3.8935 164.55
## 146 1937.4 3.8275 166.95
## 147 1932.0 3.8760 164.75
## 148 1939.6 3.8450 161.35
## 149 1933.5 3.8130 163.95
## 150 1924.1 3.7480 161.35
## 151 1915.4 3.7675 160.75
## 152 1914.4 3.7510 159.90
## 153 1912.9 3.7145 157.80
## 154 1910.6 3.7245 151.10
## 155 1902.5 3.6615 149.25
## 156 1896.1 3.6515 148.90
## 157 1884.1 3.6855 147.00
## 158 1886.1 3.6990 147.45
## 159 1893.3 3.7120 147.55
## 160 1896.4 3.7505 146.60
## 161 1918.5 3.8035 152.95
## 162 1918.2 3.7675 153.00
## 163 1911.1 3.7600 151.75
## 164 1917.9 3.7540 151.80
## 165 1936.5 3.7930 151.35
## 166 1944.3 3.7850 153.35
## 167 1938.2 3.7725 152.70
## 168 1939.8 3.8125 150.95
## 169 1926.2 3.8110 151.40
## 170 1918.1 3.7485 151.75
## 171 1917.5 3.7260 147.40
## 172 1918.4 3.6805 146.25
## 173 1923.3 3.7700 151.55
## 174 1911.3 3.7520 150.70
## 175 1909.1 3.7560 151.05
## 176 1910.0 3.7825 153.10
## 177 1923.7 3.7635 158.25
## 178 1931.5 3.7415 158.70
## 179 1932.0 3.7140 167.50
## 180 1945.6 3.7465 158.20
## 181 1919.2 3.6665 154.85
## 182 1925.4 3.6655 151.15
## 183 1916.6 3.6495 148.80
## 184 1900.4 3.6250 150.85
## 185 1871.6 3.6270 149.25
## 186 1860.4 3.6945 147.20
## 187 1848.1 3.7260 146.15
## 188 1830.0 3.6320 149.10
## 189 1824.6 3.6155 148.75
## 190 1818.5 3.5840 146.35
## 191 1816.6 3.5470 145.40
## 192 1830.2 3.6245 146.05
## 193 1849.5 3.6425 146.05
## 194 1861.0 3.6320 147.50
## 195 1872.8 3.6140 147.70
## 196 1869.3 3.5940 149.30
## 197 1927.4 3.5800 154.90
## 198 1921.1 3.5870 154.15
## 199 1922.7 3.5755 157.05
## 200 1955.3 3.5820 158.05
## 201 1968.4 3.5915 163.95
## 202 1982.5 3.5420 165.25
## 203 1976.3 3.5730 165.85
## 204 1975.0 3.6100 168.15
## 205 1984.1 3.5720 162.30
## 206 1987.2 3.5685 161.20
## 207 1988.6 3.6340 160.95
## 208 1996.2 3.6495 159.10
## 209 1985.2 3.6415 167.30
## 210 1978.8 3.6450 159.80
## 211 1985.6 3.6670 165.35
## 212 1991.5 3.6745 170.90
## 213 1981.6 3.7095 173.70
## 214 1966.8 3.6700 170.75
## 215 1951.5 3.6280 174.35
## 216 1964.2 3.6350 178.80
## 217 1932.6 3.5835 174.50
## 218 1945.5 3.6625 178.65
## 219 1961.8 3.6825 176.45
## 220 1960.1 3.7175 180.80
## 221 1983.9 3.7045 176.10
## 222 1981.6 3.7375 170.95
## 223 1977.7 3.8125 177.90
## 224 1999.3 3.8145 176.55
## 225 1991.4 3.7665 178.65
## 226 2002.2 3.7965 178.65
## 227 2011.8 3.7625 179.70
## 228 2039.7 3.8010 183.65
## 229 2047.1 3.7860 182.10
## 230 2038.1 3.8290 195.00
## 231 2071.0 3.9090 193.90
## 232 2024.1 3.8205 188.90
## 233 2018.5 3.7725 193.85
## 234 2030.5 3.7165 185.25
## 235 2029.9 3.7845 185.50
## 236 1998.3 3.8200 185.15
## 237 1978.0 3.7800 194.00
## 238 1977.8 3.7860 191.15
## 239 1982.3 3.7860 194.65
## 240 2030.2 3.8885 200.10
## 241 2021.1 3.8850 201.80
## 242 2026.3 3.8480 209.55
## 243 2038.4 3.8960 202.40
## 244 2034.5 3.9015 190.60
## 245 2039.1 3.9085 193.60
## 246 2057.1 3.8955 192.80
## 247 2058.2 3.8955 194.35
## 248 2081.9 3.9435 197.75
## 249 2073.9 3.9130 198.00
## 250 2062.4 3.8805 188.30
## 251 2064.4 3.8690 190.15
## 252 2034.2 3.8475 186.25
## 253 2042.3 3.8310 185.55
## 254 2042.4 3.7945 182.80
## 255 2026.6 3.7995 181.40
## 256 2026.4 3.7485 184.10
## 257 2021.7 3.7810 181.15
## 258 2014.3 3.7765 184.05
## 259 2046.7 3.7400 180.00
## 260 2026.0 3.7665 185.25
## 261 2002.6 3.7325 179.20
## 262 2018.6 3.7450 179.95
## 263 2026.5 3.7870 185.15
## 264 2019.8 3.7640 192.25
## 265 2023.7 3.7905 192.95
## 266 2013.9 3.8825 189.45
## 267 2016.9 3.8655 186.95
## 268 2016.8 3.8505 193.85
## 269 2025.2 3.8730 189.25
## 270 2031.5 3.9065 194.00
## 271 2048.4 3.9025 194.05
## 272 2053.0 3.8525 194.20
## 273 2036.1 3.8215 191.95
## 274 2025.7 3.7720 189.50
## 275 2034.5 3.7825 188.20
## 276 2035.2 3.7375 190.70
## 277 2032.2 3.7055 188.80
## 278 2023.3 3.6860 196.30
## 279 2018.2 3.7285 195.60
## 280 1992.9 3.7140 193.00
## 281 1990.3 3.7005 187.05
## 282 2002.1 3.7565 189.30
## 283 2011.5 3.8380 190.85
## 284 2027.5 3.8665 191.60
## 285 2022.3 3.8745 198.35
## 286 2019.7 3.8975 193.85
## 287 2038.6 3.8820 191.00
## 288 2028.5 3.8240 190.10
## 289 2034.0 3.8310 194.05
## 290 2033.0 3.8275 193.35
## 291 2045.7 3.8345 195.85
## 292 2086.9 3.8550 193.80
## 293 2117.7 3.8520 197.40
## 294 2133.5 3.8440 195.00
## 295 2150.3 3.8705 194.45
## 296 2158.0 3.9195 198.35
## 297 2178.6 3.8850 191.40
## 298 2182.5 3.9225 194.35
## 299 2160.4 3.9250 195.40
## 300 2175.4 4.0525 191.65
## 301 2163.0 4.0370 191.35
## 302 2157.3 4.1125 182.85
## 303 2160.7 4.1145 181.85
## 304 2156.3 4.0585 183.05
## 305 2157.9 4.0385 182.40
## 306 2182.4 4.0465 185.70
## 307 2158.1 3.9960 184.85
## 308 2174.8 4.0070 185.65
## 309 2175.6 3.9960 188.05
## 310 2190.6 3.9925 190.65
## 311 2217.4 4.0035 188.85
## 312 2236.5 4.0460 191.80
## 313 2261.0 4.0700 197.75
## 314 2294.4 4.1930 203.60
## 315 2288.8 4.2465 206.75
## 316 2325.7 4.2395 212.50
## 317 2331.7 4.2770 211.10
## 318 2343.5 4.2860 213.55
## 319 2329.6 4.2820 214.65
## 320 2354.8 4.2520 220.35
## 321 2356.2 4.2575 224.65
## 322 2365.8 4.3790 231.55
## 323 2390.8 4.3055 236.75
## 324 2371.7 4.3425 247.95
## 325 2382.3 4.4405 239.85
## 326 2398.4 4.5020 241.40
## 327 2332.2 4.5005 231.65
## 328 2327.7 4.4905 224.50
## 329 2324.5 4.4670 228.45
## 330 2329.8 4.5705 231.95
## 331 2334.8 4.5690 230.60
## 332 2345.4 4.6590 233.55
## 333 2291.4 4.5645 220.65
## 334 2299.9 4.5525 219.05
## 335 2299.2 4.4940 208.65
## 336 2299.0 4.5735 205.90
## 337 2321.6 4.6345 200.70
## 338 2315.2 4.6255 199.00
## 339 2313.6 4.5620 200.25
## 340 2332.1 4.6075 203.70
## 341 2367.3 4.6935 204.40
## 342 2336.1 4.8045 200.40
## 343 2353.4 4.9535 202.85
## 344 2388.7 4.9695 201.25
## 345 2380.0 4.8920 199.55
## 346 2412.2 5.0570 208.15
## 347 2433.9 5.0875 209.30
## 348 2421.7 5.1190 217.20
## 349 2389.2 4.8675 220.45
## 350 2335.0 4.8165 215.65
## 351 2332.5 4.7785 218.25
## 352 2355.2 4.8755 230.95
## 353 2340.3 4.8055 229.45
## 354 2342.9 4.6720 233.00
## 355 2322.9 4.6100 222.35
## 356 2346.6 4.6770 226.55
## 357 2325.5 4.5480 233.90
## 358 2354.1 4.6195 231.95
## 359 2370.3 4.6910 234.20
## 360 2305.2 4.4945 224.80
## 361 2307.7 4.5565 221.40
## 362 2307.5 4.5230 220.55
## 363 2336.0 4.5815 224.35
## 364 2300.2 4.5075 226.05
## 365 2331.4 4.5510 224.15
## 366 2312.4 4.5215 227.15
## 367 2330.4 4.5620 226.30
## 368 2353.8 4.6180 230.25
## 369 2316.4 4.4940 226.55
## 370 2330.0 4.5270 238.00
## 371 2316.6 4.3810 231.20
## 372 2299.2 4.3675 226.35
## 373 2324.5 4.3285 228.25
## 374 2327.7 4.3905 228.95
## 375 2327.6 4.4265 226.70
## 376 2323.0 4.4295 229.10
## 377 2359.8 4.5410 225.95
## 378 2388.5 4.6585 230.30
## 379 2355.2 4.6220 236.20
## 380 2360.1 4.5780 252.00
## 381 2372.2 4.6075 245.70
## 382 2415.0 4.5085 246.75
## 383 2414.0 4.5985 250.45
## 384 2422.9 4.5290 244.15
## 385 2462.4 4.4440 245.40
## 386 2454.8 4.3990 247.35
## 387 2451.8 4.2660 243.40
## 388 2395.5 4.2190 238.20
## 389 2392.0 4.1805 243.05
## 390 2404.6 4.1460 239.10
## 391 2413.3 4.0990 231.15
## 392 2351.9 4.1125 234.70
## 393 2380.0 4.1045 230.25
## 394 2377.3 4.0620 230.40
## 395 2405.0 4.0630 230.80
## 396 2426.5 4.1600 229.20
## 397 2435.0 4.0665 227.25
## 398 2425.7 4.0840 230.50
## 399 2401.7 3.9840 225.70
## 400 2389.1 4.0115 235.95
## 401 2390.5 3.9375 246.30
## 402 2422.2 3.9450 245.30
## 403 2432.1 3.9800 234.05
## 404 2462.4 4.0550 240.85
## 405 2466.7 4.0360 232.70
## 406 2439.4 4.0250 237.00
## 407 2453.1 4.1390 239.90
## 408 2498.6 4.1275 245.45
## 409 2501.8 4.1665 245.90
## 410 2511.3 4.1495 249.45
## 411 2508.4 4.1815 249.45
## 412 2478.9 4.1410 246.80
## 413 2508.4 4.1945 251.20
## 414 2517.7 4.2115 253.65
## 415 2516.0 4.2305 259.40
## 416 2501.0 4.1450 260.45
## 417 2525.7 4.1475 251.80
## 418 2493.8 4.1450 248.20
## 419 2489.9 4.0320 246.75
## 420 2493.4 4.0195 245.55
## 421 2511.4 4.0775 246.60
## 422 2493.5 4.0145 240.05
## 423 2501.8 4.0845 249.45
## 424 2512.3 4.0405 248.00
## 425 2512.1 4.0830 249.45
## 426 2551.2 4.1330 252.00
## 427 2581.3 4.1750 262.05
## 428 2580.4 4.2130 259.05
## 429 2564.3 4.2135 265.00
## 430 2570.7 4.2380 263.15
## 431 2588.0 4.2860 261.65
## 432 2619.9 4.2815 250.75
## 433 2626.5 4.2890 263.65
## 434 2651.2 4.4295 267.80
## 435 2659.2 4.4280 269.10
## 436 2669.9 4.5810 273.90
## 437 2644.3 4.5410 269.15
## 438 2636.1 4.4960 270.25
## 439 2667.3 4.5355 264.15
## 440 2647.1 4.5960 256.50
## 441 2657.1 4.5020 252.05
## 442 2645.8 4.5225 257.35
## 443 2644.8 4.5190 244.65
## 444 2615.0 4.4120 248.20
## 445 2606.0 4.3550 250.05
## 446 2620.6 4.3850 254.75
## 447 2657.6 4.4515 252.05
## 448 2647.8 4.3635 262.05
## 449 2661.4 4.3005 256.70
## 450 2674.0 4.3315 258.00
## 451 2691.0 4.2865 255.15
## 452 2713.7 4.3460 257.30
## 453 2723.1 4.3230 251.70
## 454 2744.2 4.3480 249.85
## 455 2714.4 4.3045 252.35
## 456 2734.9 4.3195 245.45
## 457 2740.9 4.3395 248.40
## 458 2742.9 4.3320 252.35
## 459 2768.4 4.3325 248.10
## 460 2788.5 4.3275 249.60
## 461 2738.3 4.3135 245.90
## 462 2738.6 4.3475 242.95
## 463 2736.1 4.4070 245.95
## 464 2740.3 4.4505 250.15
## 465 2667.6 4.2225 248.75
## 466 2698.4 4.4100 260.40
## 467 2687.5 4.2865 253.35
## 468 2611.2 4.2110 256.20
## 469 2600.0 4.1195 263.55
## 470 2580.8 4.0660 271.65
## 471 2568.2 4.0730 278.95
## 472 2565.7 4.0510 281.80
## 473 2610.6 4.1080 280.75
## 474 2627.1 4.1300 279.75
## 475 2648.2 4.1435 295.30
## 476 2672.1 4.1130 298.65
## 477 2709.9 4.0740 305.25
## 478 2616.8 4.0915 308.35
## 479 2620.3 4.0390 312.15
## 480 2639.9 4.0670 326.15
## 481 2657.0 4.0805 321.65
## 482 2634.9 4.0755 299.20
## 483 2644.7 4.1460 297.70
## 484 2653.8 4.1420 305.95
## 485 2626.6 4.1350 315.75
## 486 2638.6 4.1385 332.50
## 487 2664.9 4.2235 332.30
## 488 2697.6 4.2235 335.65
## 489 2733.8 4.2140 321.70
## 490 2687.5 4.1950 322.60
## 491 2656.0 4.1490 320.85
## 492 2651.4 4.1435 328.75
## 493 2644.4 4.0915 325.45
## 494 2636.5 4.1000 333.15
## 495 2592.2 4.0205 323.75
## 496 2628.7 4.0410 325.00
## 497 2612.3 4.0230 327.25
## 498 2620.0 4.0495 328.60
## 499 2638.8 4.0720 324.65
## 500 2617.2 4.0625 322.65
## 501 2606.1 4.0455 321.00
## 502 2629.2 3.9860 319.75
## 503 2658.9 3.9885 326.85
## 504 2645.0 4.0395 318.65
## 505 2638.4 4.1270 318.60
## 506 2656.7 4.1605 320.50
## 507 2664.5 4.2275 316.45
## 508 2683.8 4.2795 318.50
## 509 2708.5 4.2745 323.85
## 510 2673.5 4.2955 325.95
## 511 2677.5 4.3105 321.95
## 512 2712.5 4.3595 330.45
## 513 2746.4 4.4105 327.15
## 514 2744.3 4.3375 328.35
## 515 2755.0 4.3110 327.80
## 516 2767.6 4.2715 341.85
## 517 2763.1 4.2995 343.95
## 518 2777.3 4.2900 347.55
## 519 2737.5 4.2035 349.20
## 520 2766.8 4.2205 357.50
## 521 2769.1 4.2575 366.55
## 522 2823.0 4.2880 373.40
## 523 2812.5 4.2620 377.85
## 524 2833.9 4.2940 380.90
## 525 2853.3 4.3425 383.35
## 526 2871.6 4.4345 397.75
## 527 2856.0 4.4535 403.95
## 528 2867.3 4.5815 404.35
## 529 2914.3 4.7005 429.05
## 530 2912.5 4.5945 413.45
## 531 2909.0 4.6980 431.80
## 532 2925.9 4.7690 438.90
## 533 2883.6 4.6565 419.75
## 534 2931.6 4.5850 419.00
## 535 2919.4 4.5570 417.90
## 536 2940.0 4.6080 395.75
## 537 2937.6 4.5600 400.00
## 538 2947.9 4.5170 393.80
## 539 2904.5 4.4860 380.50
## 540 2916.8 4.5420 379.45
## 541 2883.2 4.5800 378.75
## 542 2836.8 4.5145 379.05
## 543 2890.2 4.5765 392.70
## 544 2909.6 4.5275 403.75
## 545 2915.3 4.7665 415.50
## 546 2916.6 4.7790 393.00
## 547 2904.7 4.6830 390.20
## 548 2891.0 4.6395 389.35
## 549 2912.9 4.7400 399.45
## 550 2939.1 4.8210 392.20
## 551 2984.3 4.8985 390.60
## 552 2994.5 4.8695 382.10
## 553 3000.0 4.9335 389.35
## 554 3035.1 4.9930 387.15
## 555 3035.9 5.0760 394.60
## 556 3040.0 5.0850 392.15
## 557 3018.2 5.0875 391.40
## 558 3013.1 5.0640 393.40
## 559 3023.7 5.1830 398.55
## 560 3020.9 5.2160 392.00
## 561 3060.2 5.0975 378.80
## 562 3086.5 5.1125 379.95
## 563 3122.8 5.0200 379.75
## 564 3118.9 5.0190 389.05
## 565 3139.9 5.0235 388.85
## 566 3097.0 4.8110 385.25
## 567 3012.0 4.3845 365.70
## 568 2951.3 4.1690 344.80
## 569 2968.4 4.1275 342.90
## 570 3056.5 4.1755 341.70
## 571 3155.2 4.3210 342.85
## 572 3222.2 4.5075 357.70
## 573 3204.8 4.6105 360.40
## 574 3218.7 4.6110 369.40
## 575 3326.6 4.6740 376.05
## 576 3308.7 4.7315 375.50
## 577 3406.2 4.7210 366.80
## 578 3400.8 4.8705 377.65
## 579 3276.3 4.8355 392.40
## 580 3332.0 4.8500 408.00
## 581 3282.4 4.8355 408.25
## 582 3332.5 4.8380 421.55
## 583 3318.8 4.8230 412.65
## 584 3305.0 4.5600 413.60
## 585 3210.0 4.5810 395.70
## 586 3231.9 4.6275 395.40
## 587 3311.3 4.6550 398.95
## 588 3411.4 4.7350 401.10
## 589 3381.4 4.6165 396.20
## 590 3296.6 4.5610 397.80
## 591 3335.4 4.6110 397.15
## 592 3220.0 4.5785 382.45
## 593 3240.3 4.6815 384.85
## 594 3181.4 4.6110 373.95
## 595 3220.7 4.6445 384.95
## 596 3182.0 4.5555 376.25
## 597 3228.9 4.6335 376.15
## 598 3280.3 4.6195 369.30
## 599 3309.3 4.6380 370.30
## 600 3292.3 4.6485 360.75
## 601 3363.6 4.8065 361.00
## 602 NA 3.7790 178.65Cek missing value dari Return dan Close
mis_return <- colSums(is.na(return))
mis_close <- colSums(is.na(close))
missing_counts <- rbind(mis_close, mis_return)
print(missing_counts)## ref_date GC=F HG=F KC=F
## mis_close 0 1 0 0
## mis_return 0 2 1 1Karena terdapat missing value pada data close dan return maka perlu inputasi nilai yang mewakili nilai yang hilang.
Input nilai missing value dengan Mean
close$`GC=F`[is.na(close$`GC=F`)] <- mean(close$`GC=F`, na.rm = TRUE)
return$`GC=F`[is.na(return$`GC=F`)] <- mean(return$`GC=F`, na.rm = TRUE)
return$`HG=F`[is.na(return$`HG=F`)] <- mean(return$`HG=F`, na.rm = TRUE)
return$`KC=F`[is.na(return$`KC=F`)] <- mean(return$`KC=F`, na.rm = TRUE)Cek missing value setelah inputasi
mis_return <- colSums(is.na(return))
mis_close <- colSums(is.na(close))
missing_counts <- rbind(mis_close, mis_return)
print(missing_counts)## ref_date GC=F HG=F KC=F
## mis_close 0 0 0 0
## mis_return 0 0 0 0Data sudah lengkap dan tidak terdapat missing value, sehingga dapat dilanjutkan untuk analisis selanjutnya.
Analisis plot komoditas Emas
ggplot(close, aes(y = GOLD, x = ref_date)) +
geom_line(color = "#FFD700") +
labs(title = "Gold (USD)", x = "Date", y = "Price") +
theme(
panel.background = element_rect(fill = "black", color = NA),
plot.background = element_rect(fill = "black", color = NA),
panel.grid.major = element_line(color = "gray30"),
panel.grid.minor = element_line(color = "gray20"),
axis.text = element_text(color = "white"),
axis.title = element_text(color = "white"),
plot.title = element_text(color = "white", face = "bold")
)
Analisis plot komoditas Tembaga
ggplot(close, aes(y = COPP, x = ref_date)) +
geom_line(color = "#CD5C5C") +
labs(title = "Copper (USD)", x = "Date", y = "Price") +
theme(
panel.background = element_rect(fill = "black", color = NA),
plot.background = element_rect(fill = "black", color = NA),
panel.grid.major = element_line(color = "gray30"),
panel.grid.minor = element_line(color = "gray20"),
axis.text = element_text(color = "white"),
axis.title = element_text(color = "white"),
plot.title = element_text(color = "white", face = "bold")
)
Analisis plot komoditas Kopi
ggplot(close, aes(y = COFE, x = ref_date)) +
geom_line(color = "#B87333") +
labs(title = "Coffee (USD)", x = "Date", y = "Price") +
theme(
panel.background = element_rect(fill = "black", color = NA),
plot.background = element_rect(fill = "black", color = NA),
panel.grid.major = element_line(color = "gray30"),
panel.grid.minor = element_line(color = "gray20"),
axis.text = element_text(color = "white"),
axis.title = element_text(color = "white"),
plot.title = element_text(color = "white", face = "bold")
)