Penyajian dan Ukuran Statistik Data

Penyajian Tabel Frekuensi

library(ggplot2)
library(readxl)
library(knitr)

Tabel frekuensi adalah daftar nilai-nilai yang mungkin terjadi pada suatu variabel, beserta jumlah berapa kali setiap nilai itu muncul

tingkat_pendidikan<-data.frame(read_xlsx("G:/PS Stat/PELATIHAN/2024_Pelatihan AA/Data Pendidikan.xlsx"))
# Menginisialisasikan tabel ke dalam variabel dt
dt <- tingkat_pendidikan
# Menambahkan kolom id pada tabel dt
dt$id <- c(1:nrow(dt))
kable(dt[,1:2], caption="Data Tingkat Pendidikan PNS")

Data Tingkat Pendidikan PNS

Tingkat.Pendidikan	Jumlah.PNS
Di bawah SMA	1.444
SMA	10.762
Diploma	14.766
Sarjana	37.020
Pascasarjana	5.045

Dari Tabel di atas, dapat dilihat bahwa PNS dengan tingkat pendidikan sarjana memiliki jumlah yang paling besar, sementara PNS dengan tingkat pendidikan di bawah SMA memiliki jumlah yang paling kecil. Keuntungan utama penggunaan tabel frekuensi ini adalah menyajikan data yang kompleks dengan jelas dan ringkas.

Diagram Lingkaran

Diagram lingkaran, atau pie chart, adalah penyajian data berupa lingkaran yang dibagi menjadi sejumlah bagian, yang mana masing-masing bagian mewakili suatu kategori.

navy <- "#082f57"
green <- "#01fa83"
blue <- "#126dc8"
# Fungsi untuk mengonversi angka menjadi persentase dengan format yang ditentukan
percent <- function(x, digits = 2, format = "f", ...) {
 paste0(formatC(x * 100, format = format, digits = digits, ...), "%")
}
# Palet warna yang akan digunakan dalam plot
colors <- c("#00d0ff", "#126DC8", "#082F57", "#01FA83", "#1C7F45")
# Warna teks untuk label dalam plot
text_colors <- c("#000000", "#ffffff", "#ffffff", "#000000", "#ffffff")
# Menghitung proporsi berdasarkan Jumlah PNS
dt$proportion <- dt$Jumlah.PNS / sum(dt$`Jumlah.PNS`)
# Membuat diagram lingkaran
ggplot(data = dt, aes(x = "", y = proportion, fill = reorder(`Tingkat.Pendidikan`, id))) +
 geom_bar(width = 1, stat = "identity", color = "black")+ coord_polar("y", start = 0) +geom_text(aes(x = 1.2, label = percent(proportion)), color = text_colors, position = position_stack(vjust = 0.5)) + xlab('Tingkat Pendidikan') + labs(title = "Jumlah Pegawai Negeri Sipil Menurut Tingkat Pendidikan") + scale_fill_manual(values = colors, name = "Tingkat Pendidikan") + theme_void() + theme(text = element_text(size = 10, family = "sans"))

Diagram lingkaran di atas, mengilustrasikan sebaran Jumlah Pegawai Negeri Sipil (PNS) di Provinsi Kalimantan Selatan berdasarkan tingkat pendidikan pada bulan Desember 2021. Sebagian besar PNS memiliki latar belakang pendidikan S-1 (53.62%), diikuti oleh Diploma (21.39%) dan SMA (15.59%). Tingkat pendidikan Pascasarjana menyumbang 7.31% sementara kategori Di bawah SMA berkontribusi paling kecil, yakni sekitar 2.09%.

Diagram lingkaran tersebut memberikan gambaran visual yang jelas dalam membandingkan proporsi relatif dari setiap tingkat pendidikan dalam jumlah total PNS. Hal ini berguna dalam mengidentifikasi perbandingan antar-kategori tingkat pendidikan dan membantu dalam pengambilan keputusan, seperti perencanaan sumber daya manusia dan pengembangan kebijakan pendidikan yang sesuai dengan kebutuhan wilayah tersebut.

Diagram Batang

Grafik batang, atau bar graph, adalah penyajian data yang menampilkan batang vertikal untuk setiap kategori

# Membuat plot menggunakan ggplot2
ggplot(data = dt, aes(x = reorder(`Tingkat.Pendidikan`, id), y = `Jumlah.PNS`)) +
 geom_bar(stat = "identity", fill = "blue") + # Membuat grafik batang dengan mengisi warna biru
 xlab('Tingkat Pendidikan') + # Label sumbu x
 theme_minimal() + # Mengatur tema minimal pada plot
 labs(title = "Jumlah Pegawai Negeri Sipil Menurut Tingkat Pendidikan") + # Menambahkan judul plot
 theme(text = element_text(size = 11, family = "sans")) # Mengatur tampilan plot

Grafik batang di atas memvisualisasikan jumlah Pegawai Negeri Sipil (PNS) di Provinsi Kalimantan Selatan pada bulan Desember 2021 berdasarkan tingkat pendidikan. Mayoritas PNS memiliki tingkat pendidikan sarjana (37.020 orang), diikuti oleh diploma (14.766 orang), SMA (10.762 orang), pascasarjana (5.045 orang), dan di bawah SMA (1.444 orang). Grafik batang tersebut memungkinkan pemahaman yang lebih cepat terhadap sebaran jumlah PNS menurut tingkat pendidikan di Provinsi Kalimantan Selatan pada bulan Desember 2021.