Fathih Fitrah Ramadhan (3337250024), Ahyan Sabiq Ghaisan (3337250068), Alvin Yafiq Firas (3337250072), Faiz Azmi Nurdin Soleh (3337250150), Raditya Ridwan (3337250065)
Perkembangan teknologi digital, khususnya kecerdasan buatan atau Artificial Intelligence (AI), semakin pesat dalam beberapa tahun terakhir. Teknologi ini tidak hanya digunakan di bidang industri dan bisnis, tetapi juga mulai dimanfaatkan secara luas oleh masyarakat, terutama generasi muda. Di Indonesia, penggunaan AI meningkat secara signifikan seiring dengan semakin mudahnya akses terhadap berbagai platform berbasis AI seperti chatbot, asisten virtual, dan aplikasi pembelajaran.
Berdasarkan berbagai survei terbaru, generasi muda khususnya Generasi Z (Gen Z) menjadi kelompok yang paling aktif menggunakan teknologi AI. Mereka memanfaatkan AI untuk berbagai aktivitas, mulai dari belajar, membuat konten digital, hingga meningkatkan produktivitas. Fenomena ini menunjukkan bahwa AI telah menjadi bagian penting dari kehidupan digital generasi muda di Indonesia.
# Load library yang dibutuhkan
library(ggplot2)
library(dplyr)
library(scales)
library(knitr)
library(kableExtra)# ============================================================
# DATASET BERDASARKAN DATA NYATA
# Sumber : Survei APJII "Profil Internet Indonesia 2025"
# Tanggal : 14 Agustus 2025
# Responden: 8.700 WNI usia >= 13 tahun, 38 provinsi
# Metode : Wawancara tatap muka, multistage random sampling
# Ref : Kompas.id - "Pengguna AI di Indonesia Meningkat,
# Gen Z Gunakan untuk Belajar" (14/8/2025)
# ============================================================
# Dataset 1: Distribusi Pengguna AI Berdasarkan Generasi (APJII 2025)
df_generasi <- data.frame(
Generasi = c("Gen Z", "Milenial", "Gen X", "Baby Boomer", "Lainnya"),
Persentase = c(43.7, 22.3, 12.8, 8.9, 12.3)
)
# Dataset 2: Tujuan Penggunaan AI oleh Gen Z (APJII 2025)
df_tujuan <- data.frame(
Tujuan = c(
"Belajar & Pendidikan",
"Hiburan (Video/Gambar AI)",
"Produktivitas (Penulisan & Analisis Data)",
"Asisten Virtual"
),
Persentase = c(49.89, 25.89, 12.21, 11.58)
)
# Dataset 3: Tren Pengguna AI Nasional (APJII 2024-2025)
df_tren <- data.frame(
Tahun = c(2024, 2025),
Persen_Pengguna = c(24.73, 27.34)
)
# Dataset 4: Platform Chatbot AI yang Digunakan (Indonesia AI Report 2025)
df_platform <- data.frame(
Platform = c("ChatGPT", "Meta AI", "Google Gemini",
"Microsoft Copilot", "DeepSeek", "Perplexity AI"),
Persentase = c(85, 72, 65, 26, 25, 22)
)
# Dataset 5: Frekuensi Penggunaan Chatbot AI per Minggu (Indonesia AI Report 2025)
df_frekuensi <- data.frame(
Frekuensi = c("1-2x/minggu", "3-5x/minggu", "6-10x/minggu", ">10x/minggu"),
Gen_Z = c(20, 35, 33, 12),
Milenial = c(18, 36, 28, 18)
)
# Tampilkan dataset
kable(df_generasi,
caption = "Dataset 1: Distribusi Pengguna AI Berdasarkan Generasi (%)",
col.names = c("Generasi", "Persentase (%)")) %>%
kable_styling(bootstrap_options = c("striped", "hover"), full_width = FALSE) %>%
row_spec(0, bold = TRUE, background = "#2c3e50", color = "white")| Generasi | Persentase (%) |
|---|---|
| Gen Z | 43.7 |
| Milenial | 22.3 |
| Gen X | 12.8 |
| Baby Boomer | 8.9 |
| Lainnya | 12.3 |
kable(df_tujuan,
caption = "Dataset 2: Tujuan Penggunaan AI oleh Gen Z (%)",
col.names = c("Tujuan", "Persentase (%)")) %>%
kable_styling(bootstrap_options = c("striped", "hover"), full_width = FALSE) %>%
row_spec(0, bold = TRUE, background = "#2c3e50", color = "white")| Tujuan | Persentase (%) |
|---|---|
| Belajar & Pendidikan | 49.89 |
| Hiburan (Video/Gambar AI) | 25.89 |
| Produktivitas (Penulisan & Analisis Data) | 12.21 |
| Asisten Virtual | 11.58 |
kable(df_tren,
caption = "Dataset 3: Tren Persentase Pengguna AI di Indonesia",
col.names = c("Tahun", "% Pengguna AI")) %>%
kable_styling(bootstrap_options = c("striped", "hover"), full_width = FALSE) %>%
row_spec(0, bold = TRUE, background = "#2c3e50", color = "white")| Tahun | % Pengguna AI |
|---|---|
| 2024 | 24.73 |
| 2025 | 27.34 |
kable(df_platform,
caption = "Dataset 4: Adopsi Platform Chatbot AI (%)",
col.names = c("Platform", "Persentase (%)")) %>%
kable_styling(bootstrap_options = c("striped", "hover"), full_width = FALSE) %>%
row_spec(0, bold = TRUE, background = "#2c3e50", color = "white")| Platform | Persentase (%) |
|---|---|
| ChatGPT | 85 |
| Meta AI | 72 |
| Google Gemini | 65 |
| Microsoft Copilot | 26 |
| DeepSeek | 25 |
| Perplexity AI | 22 |
kable(df_frekuensi,
caption = "Dataset 5: Frekuensi Penggunaan Chatbot AI per Minggu (%)",
col.names = c("Frekuensi", "Gen Z (%)", "Milenial (%)")) %>%
kable_styling(bootstrap_options = c("striped", "hover"), full_width = FALSE) %>%
row_spec(0, bold = TRUE, background = "#2c3e50", color = "white")| Frekuensi | Gen Z (%) | Milenial (%) |
|---|---|---|
| 1-2x/minggu | 20 | 18 |
| 3-5x/minggu | 35 | 36 |
| 6-10x/minggu | 33 | 28 |
| >10x/minggu | 12 | 18 |
Hasil survei APJII 2025 menunjukkan bahwa penggunaan AI di Indonesia terus meningkat. Dari 8.700 responden, sebanyak 27,34% menyatakan telah menggunakan AI, naik dari 24,73% pada tahun sebelumnya. Generasi Z menjadi kelompok pengguna terbesar dengan 43,7%, disusul Milenial (22,3%), Gen X (12,8%), dan Baby Boomer (8,9%).
Mayoritas Gen Z atau 49,89% menggunakan AI untuk belajar dan pendidikan, diikuti hiburan/pembuatan konten (25,89%), produktivitas seperti penulisan otomatis dan analisis data (12,21%), serta asisten virtual (11,58%).
Meski adopsi meningkat, indeks literasi AI nasional baru mencapai skor 49,96 — masuk kategori kurang baik — menandakan bahwa masyarakat belum cukup siap menghadapi perkembangan AI secara optimal. Oleh karena itu, edukasi mengenai pemanfaatan AI secara bijak menjadi sangat penting.
# Fungsi modus
modus_fn <- function(v) {
tbl <- table(v)
as.numeric(names(tbl)[which.max(tbl)])
}
# Fungsi hitung semua statistik sekaligus
hitung_statistik <- function(x, caption_text) {
stats <- data.frame(
Statistik = c("Mean", "Median", "Modus",
"Q1 (Kuartil 1)", "Q3 (Kuartil 3)",
"Range", "Varians", "Standar Deviasi"),
Nilai = round(c(
mean(x), median(x), modus_fn(x),
quantile(x, 0.25), quantile(x, 0.75),
max(x) - min(x), var(x), sd(x)
), 4)
)
kable(stats, caption = caption_text,
col.names = c("Statistik", "Nilai")) %>%
kable_styling(bootstrap_options = c("striped", "hover"), full_width = FALSE) %>%
row_spec(0, bold = TRUE, background = "#2c3e50", color = "white")
}hitung_statistik(
df_generasi$Persentase,
"Statistik Deskriptif — Distribusi Pengguna AI per Generasi (%)"
)| Statistik | Nilai |
|---|---|
| Mean | 20.0000 |
| Median | 12.8000 |
| Modus | 8.9000 |
| Q1 (Kuartil 1) | 12.3000 |
| Q3 (Kuartil 3) | 22.3000 |
| Range | 34.8000 |
| Varians | 200.3300 |
| Standar Deviasi | 14.1538 |
hitung_statistik(
df_tujuan$Persentase,
"Statistik Deskriptif — Tujuan Penggunaan AI oleh Gen Z (%)"
)| Statistik | Nilai |
|---|---|
| Mean | 24.8925 |
| Median | 19.0500 |
| Modus | 11.5800 |
| Q1 (Kuartil 1) | 12.0525 |
| Q3 (Kuartil 3) | 31.8900 |
| Range | 38.3100 |
| Varians | 321.3128 |
| Standar Deviasi | 17.9252 |
| Statistik | Nilai |
|---|---|
| Mean | 49.1667 |
| Median | 45.5000 |
| Modus | 22.0000 |
| Q1 (Kuartil 1) | 25.2500 |
| Q3 (Kuartil 3) | 70.2500 |
| Range | 63.0000 |
| Varians | 782.9667 |
| Standar Deviasi | 27.9815 |
| Statistik | Nilai |
|---|---|
| Mean | 25.0000 |
| Median | 26.5000 |
| Modus | 12.0000 |
| Q1 (Kuartil 1) | 18.0000 |
| Q3 (Kuartil 3) | 33.5000 |
| Range | 23.0000 |
| Varians | 119.3333 |
| Standar Deviasi | 10.9240 |
df_generasi <- df_generasi %>%
mutate(label = paste0(Generasi, "\n", Persentase, "%"))
ggplot(df_generasi, aes(x = "", y = Persentase, fill = Generasi)) +
geom_col(width = 1, color = "white", linewidth = 0.8) +
coord_polar(theta = "y") +
geom_text(aes(label = label),
position = position_stack(vjust = 0.5),
size = 3.8, fontface = "bold", color = "white") +
scale_fill_manual(values = c(
"Gen Z" = "#2ecc71",
"Milenial" = "#3498db",
"Gen X" = "#e74c3c",
"Baby Boomer" = "#f39c12",
"Lainnya" = "#95a5a6"
)) +
labs(title = "Distribusi Generasi Pengguna AI di Indonesia",
subtitle = "Sumber: Survei APJII 2025 (n = 8.700 responden)",
fill = "Generasi") +
theme_void() +
theme(plot.title = element_text(hjust = 0.5, face = "bold", size = 14),
plot.subtitle = element_text(hjust = 0.5, size = 9, color = "gray40"))ggplot(df_tujuan, aes(x = "", y = Persentase, fill = Tujuan)) +
geom_col(width = 1, color = "white", linewidth = 0.8) +
coord_polar(theta = "y") +
geom_text(aes(label = paste0(Persentase, "%")),
position = position_stack(vjust = 0.5),
size = 4.2, fontface = "bold", color = "white") +
scale_fill_manual(values = c(
"Belajar & Pendidikan" = "#2ecc71",
"Hiburan (Video/Gambar AI)" = "#3498db",
"Produktivitas (Penulisan & Analisis Data)" = "#9b59b6",
"Asisten Virtual" = "#e67e22"
)) +
labs(title = "Tujuan Penggunaan AI oleh Generasi Z",
subtitle = "Sumber: Survei APJII 2025",
fill = "Tujuan") +
theme_void() +
theme(plot.title = element_text(hjust = 0.5, face = "bold", size = 14),
plot.subtitle = element_text(hjust = 0.5, size = 9, color = "gray40"),
legend.position = "bottom",
legend.text = element_text(size = 8))ggplot(df_generasi,
aes(x = reorder(Generasi, Persentase), y = Persentase, fill = Generasi)) +
geom_col(show.legend = FALSE, width = 0.65) +
geom_text(aes(label = paste0(Persentase, "%")),
hjust = -0.15, fontface = "bold", size = 4) +
coord_flip() +
scale_fill_manual(values = c(
"Gen Z" = "#2ecc71",
"Milenial" = "#3498db",
"Gen X" = "#e74c3c",
"Baby Boomer" = "#f39c12",
"Lainnya" = "#95a5a6"
)) +
scale_y_continuous(expand = expansion(mult = c(0, 0.2))) +
labs(title = "Persentase Pengguna AI per Generasi di Indonesia",
subtitle = "Sumber: Survei APJII 2025 (n = 8.700 responden)",
x = "Generasi", y = "Persentase (%)") +
theme_minimal(base_size = 12) +
theme(plot.title = element_text(face = "bold", size = 14),
plot.subtitle = element_text(color = "gray40", size = 9),
axis.title = element_text(face = "bold"),
panel.grid.major.y = element_blank())ggplot(df_tujuan,
aes(x = reorder(Tujuan, Persentase), y = Persentase, fill = Tujuan)) +
geom_col(show.legend = FALSE, width = 0.65) +
geom_text(aes(label = paste0(Persentase, "%")),
hjust = -0.15, fontface = "bold", size = 4) +
coord_flip() +
scale_fill_manual(values = c(
"Belajar & Pendidikan" = "#2ecc71",
"Hiburan (Video/Gambar AI)" = "#3498db",
"Produktivitas (Penulisan & Analisis Data)" = "#9b59b6",
"Asisten Virtual" = "#e67e22"
)) +
scale_y_continuous(expand = expansion(mult = c(0, 0.2))) +
labs(title = "Tujuan Penggunaan AI oleh Generasi Z",
subtitle = "Sumber: Survei APJII 2025",
x = "Tujuan Penggunaan", y = "Persentase (%)") +
theme_minimal(base_size = 12) +
theme(plot.title = element_text(face = "bold", size = 14),
plot.subtitle = element_text(color = "gray40", size = 9),
axis.title = element_text(face = "bold"),
panel.grid.major.y = element_blank())ggplot(df_platform,
aes(x = reorder(Platform, Persentase), y = Persentase, fill = Platform)) +
geom_col(show.legend = FALSE, width = 0.65) +
geom_text(aes(label = paste0(Persentase, "%")),
hjust = -0.15, fontface = "bold", size = 4) +
coord_flip() +
scale_fill_brewer(palette = "Set2") +
scale_y_continuous(expand = expansion(mult = c(0, 0.2))) +
labs(title = "Adopsi Platform Chatbot AI di Indonesia",
subtitle = "Sumber: Indonesia AI Report 2025",
x = "Platform", y = "Persentase Pengguna (%)") +
theme_minimal(base_size = 12) +
theme(plot.title = element_text(face = "bold", size = 14),
plot.subtitle = element_text(color = "gray40", size = 9),
axis.title = element_text(face = "bold"),
panel.grid.major.y = element_blank())ggplot(df_tujuan, aes(x = Persentase, fill = Tujuan)) +
geom_histogram(bins = 5, color = "white", alpha = 0.85) +
geom_vline(aes(xintercept = mean(Persentase), color = "Mean"),
linewidth = 1.2, linetype = "dashed") +
geom_vline(aes(xintercept = median(Persentase), color = "Median"),
linewidth = 1.2, linetype = "solid") +
scale_color_manual(name = "Statistik",
values = c("Mean" = "#e74c3c", "Median" = "#2c3e50")) +
scale_fill_manual(values = c(
"Belajar & Pendidikan" = "#2ecc71",
"Hiburan (Video/Gambar AI)" = "#3498db",
"Produktivitas (Penulisan & Analisis Data)" = "#9b59b6",
"Asisten Virtual" = "#e67e22"
)) +
labs(title = "Histogram Distribusi Persentase Tujuan Penggunaan AI",
subtitle = paste0("Mean = ", round(mean(df_tujuan$Persentase), 2),
"% | Median = ", round(median(df_tujuan$Persentase), 2),
"% | SD = ", round(sd(df_tujuan$Persentase), 2), "%"),
x = "Persentase (%)", y = "Frekuensi", fill = "Tujuan") +
theme_minimal(base_size = 12) +
theme(plot.title = element_text(face = "bold", size = 14),
plot.subtitle = element_text(color = "gray40", size = 9),
axis.title = element_text(face = "bold"),
legend.position = "bottom",
legend.text = element_text(size = 8))ggplot(df_platform, aes(x = Persentase)) +
geom_histogram(bins = 6, fill = "#3498db", color = "white", alpha = 0.85) +
geom_vline(aes(xintercept = mean(Persentase), color = "Mean"),
linewidth = 1.2, linetype = "dashed") +
geom_vline(aes(xintercept = median(Persentase), color = "Median"),
linewidth = 1.2, linetype = "solid") +
scale_color_manual(name = "Statistik",
values = c("Mean" = "#e74c3c", "Median" = "#2c3e50")) +
labs(title = "Histogram Distribusi Adopsi Platform Chatbot AI",
subtitle = paste0("Mean = ", round(mean(df_platform$Persentase), 2),
"% | Median = ", round(median(df_platform$Persentase), 2),
"% | SD = ", round(sd(df_platform$Persentase), 2), "%"),
x = "Persentase Pengguna (%)", y = "Frekuensi") +
theme_minimal(base_size = 12) +
theme(plot.title = element_text(face = "bold", size = 14),
plot.subtitle = element_text(color = "gray40", size = 9),
axis.title = element_text(face = "bold"),
legend.position = "top")ggplot(df_generasi, aes(x = "", y = Persentase)) +
geom_boxplot(fill = "#3498db", alpha = 0.7,
outlier.shape = 21, outlier.fill = "#e74c3c",
outlier.size = 3, linewidth = 0.8) +
stat_summary(fun = mean, geom = "point",
shape = 23, size = 4, fill = "white", color = "#2c3e50") +
geom_jitter(aes(color = Generasi), width = 0.15, size = 3.5, alpha = 0.9) +
scale_color_manual(values = c(
"Gen Z" = "#2ecc71",
"Milenial" = "#1abc9c",
"Gen X" = "#e74c3c",
"Baby Boomer" = "#f39c12",
"Lainnya" = "#95a5a6"
)) +
labs(title = "Boxplot Sebaran Persentase Pengguna AI per Generasi",
subtitle = "Titik berlian (◇) = Mean | Titik berwarna = nilai tiap generasi",
x = "", y = "Persentase (%)", color = "Generasi") +
theme_minimal(base_size = 12) +
theme(plot.title = element_text(face = "bold", size = 14),
plot.subtitle = element_text(color = "gray40", size = 9),
axis.title = element_text(face = "bold"),
legend.position = "right")ggplot(df_platform, aes(x = "", y = Persentase)) +
geom_boxplot(fill = "#9b59b6", alpha = 0.7,
outlier.shape = 21, outlier.fill = "#e74c3c",
outlier.size = 3, linewidth = 0.8) +
stat_summary(fun = mean, geom = "point",
shape = 23, size = 4, fill = "white", color = "#2c3e50") +
geom_jitter(aes(color = Platform), width = 0.15, size = 3.5, alpha = 0.9) +
scale_color_brewer(palette = "Set1") +
labs(title = "Boxplot Sebaran Adopsi Platform Chatbot AI",
subtitle = "Titik berlian (◇) = Mean | ChatGPT & Meta AI sebagai outlier atas",
x = "", y = "Persentase Pengguna (%)", color = "Platform") +
theme_minimal(base_size = 12) +
theme(plot.title = element_text(face = "bold", size = 14),
plot.subtitle = element_text(color = "gray40", size = 9),
axis.title = element_text(face = "bold"),
legend.position = "right")Penggunaan Artificial Intelligence di Indonesia mengalami peningkatan yang cukup signifikan, terutama di kalangan Generasi Z. Berdasarkan analisis statistik deskriptif dan visualisasi data nyata dari Survei APJII 2025, dapat disimpulkan:
Gen Z mendominasi penggunaan AI di Indonesia dengan proporsi 43,7% dari total pengguna, jauh melampaui Milenial (22,3%), Gen X (12,8%), dan Baby Boomer (8,9%).
Pendidikan menjadi tujuan utama penggunaan AI oleh Gen Z (49,89%), disusul hiburan/konten digital (25,89%), produktivitas (12,21%), dan asisten virtual (11,58%).
Penggunaan AI nasional meningkat dari 24,73% (2024) menjadi 27,34% (2025), mencerminkan tren adopsi yang terus tumbuh.
ChatGPT mendominasi pilihan platform chatbot AI (85%), diikuti Meta AI (72%) dan Google Gemini (65%).
Literasi AI masih rendah — indeks literasi AI nasional hanya 49,96 (kategori kurang baik), menegaskan pentingnya peningkatan literasi digital dan pemahaman etika penggunaan AI.
Dengan pemanfaatan yang tepat dan bijak, AI dapat menjadi alat yang sangat bermanfaat untuk mendukung proses belajar dan meningkatkan kemampuan generasi muda di era digital.
Referensi:
Laporan ini dibuat menggunakan R Markdown. Seluruh data bersumber dari survei APJII 2025 dan laporan referensi terkait.