Pada analisis ini, data yang digunakan merupakan harga saham dari tiga perusahaan selama waktu tiga tahun. Visualisasi dibuat dengan ggplot2, baik secara terpisah untuk melihat pola masing-masing data atau secara gabungan untuk membandingkan pergerakan ketiganya dalam satu grafik. Dalam visualisasi grafik juga ditambahkan garis vertikal sebagai penanda pergantian tahun supaya perubahan pola setiap tahunnya lebih mudah diamati.
library(ggplot2)
## Warning: package 'ggplot2' was built under R version 4.5.3
library(dplyr)
## Warning: package 'dplyr' was built under R version 4.5.3
##
## Attaching package: 'dplyr'
## The following objects are masked from 'package:stats':
##
## filter, lag
## The following objects are masked from 'package:base':
##
## intersect, setdiff, setequal, union
library(lubridate)
## Warning: package 'lubridate' was built under R version 4.5.2
##
## Attaching package: 'lubridate'
## The following objects are masked from 'package:base':
##
## date, intersect, setdiff, union
library(readr)
Data yang digunakan merupakan data harga historis saham Bank Mandiri (BMRI),Bank Syariah Indonesia (BRIS), dan Bank Central Asia (BBCA).
BMRI = read_csv("C:/Users/ASUS/Downloads/Data Historis BMRI (1).csv")
## Rows: 729 Columns: 7
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (3): Tanggal, Vol., Perubahan%
## dbl (4): Terakhir, Pembukaan, Tertinggi, Terendah
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
BRIS = read_csv("C:/Users/ASUS/Downloads/Data Historis BRIS.csv")
## Rows: 729 Columns: 7
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (3): Tanggal, Vol., Perubahan%
## dbl (4): Terakhir, Pembukaan, Tertinggi, Terendah
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
BBCA = read_csv("C:/Users/ASUS/Downloads/Data Historis BBCA.csv")
## Rows: 729 Columns: 7
## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (3): Tanggal, Vol., Perubahan%
## dbl (4): Terakhir, Pembukaan, Tertinggi, Terendah
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.
##nMembuat Data Time Series
Pada tahap ini, kolom tanggal diubah menjadi format tanggal, dan kolom harga terakhir diubah menjadi format numerik agar dapat digunakan dalam visualisasi time series.
data_bmri = data.frame(Time = dmy(BMRI$Tanggal),Price = as.numeric(gsub("\\.", "", BMRI$Terakhir)))
data_bris = data.frame(Time = dmy(BRIS$Tanggal),Price = as.numeric(gsub("\\.", "", BRIS$Terakhir)))
data_bbca = data.frame(Time = dmy(BBCA$Tanggal),Price = as.numeric(gsub("\\.", "", BBCA$Terakhir)))
Plot ini menampilkan plot time series masing-masing data secara terpisah. Visualisasi ini digunakan untuk melihat pola pergerakan harga saham setiap perusahaan dari waktu ke waktu selama 3 tahun.
Plot_BMRI = ggplot(data_bmri, aes(x = Time, y = Price)) +
geom_line() + xlab("Date") + ylab("Price") + theme_classic()
Plot_BMRI
Pada tahun 2023 harga saham relatif stabil dan pada tahun 2024 menunjukkan harga saham yang meningkat sehingga mencapai titik paling tinggi dibandingkan periode sebelumnya, sementara pada periode 2025 hingga awal 2026 harga saham mencapai titik terendah.
Plot_BRIS = ggplot(data_bris, aes(x = Time, y = Price)) +
geom_line() + xlab("Date") + ylab("Price") + theme_classic()
Plot_BRIS
Grafik time series menunjukkan pergerakan harga saham BSI selama periode Februari 2023 sampai Maret 2026 secara umum berada pasda kisaran yang lebih rendah dari bank lainnya. Pada tahun 2024 hingga 2025 harga saham cenderung lebih stabil dengan perubahan yang tidak ekstrem.
Plot_BBCA = ggplot(data_bbca, aes(x = Time, y = Price)) +
geom_line() + xlab("Date") + ylab("Price") + theme_classic()
Plot_BBCA
Pada awal tahun 2023 menunjukkan pergerakan yang stabil dengan cenderung meningkat secara bertaha. Memasuki tahun 2025 hingga awal tahun 2026 saham BBCA menunjukkan adanya penurunan meskipun masih mengalami fluktuasi harian, maka secara keseluruhan saham BBCA dapat dikatakan relative stabil.
Plot menunjukkan pergerakan harga saham BMRI, BRIS, dan BBCA dalam satu grafik yang dapat digunakan untuk membanding harga saham diantara ketiganya. Garis vertikal pada grafik berguna sebagai pemisah antar tahunnya.
ggplot() +
geom_line(data = data_bmri, aes(x = Time, y = Price, color = "BMRI")) +
geom_line(data = data_bris, aes(x = Time, y = Price, color = "BRIS")) +
geom_line(data = data_bbca, aes(x = Time, y = Price, color = "BBCA")) +
geom_vline(xintercept = as.Date("2024-01-01"), linetype = "dashed") +
geom_vline(xintercept = as.Date("2025-01-01"), linetype = "dashed") +
labs(title = "Perbandingan Harga Saham Bank",
x = "Date",
y = "Price",
color = "Bank") +
scale_x_date(date_labels = "%b %Y", date_breaks = "2 months") +
theme_classic() +
theme(axis.text.x = element_text(angle = 50, hjust = 1))
Berdasarkan grafik di atas, saham BBCA memiliki nilai yang paling tinggi dibanding kedua saham lainnya dan menunjukkan tren yang stabil. Saham BMRI menunjukkan fluktasi yang cukup dinamis sepanjang periode tersebut, sementara saham BRIS memiliki harga yang jau lebih rendah diantara ketiganya.
Berdasarkan visualiasi time series yang telah dibuat, terlihat bahwa ketiga saham perbankan, yaitu BMRI, BRIS, dan BBCA memiliki pola pergerakan harga yang berbeda selama periode pengamatan. Saham BBCA berada pada kisaran harga paling tinggi diantara kedua saham lainnya, serta memiliki pergerakan yang stabil meskipun mengalami kenaikan dan penurunan harga. Saham BMRI menunjukkan pergerakan yang lebih dinamis, seperti kenaikan pada awal tahun 2024 dan penurunan pada periode 2025 hingga awal tahun 2026. Sementara saham BRIS berada pada kisaran harga yang lebih rendah dan cenderung tidak mengalami perubahan ekstrem.
Plot single series lebih membantu untuk melihat pola masing-masing saham dengan jelas, sedangkan plot multiple series memudahkan untuk melihat perbandingan dari ketiga saham karena berada dalam satu tampilan.