Text Mining and Wordcloud Using R
Raden Muhammad Hadi
January 28, 2019
Catatan
- Beberapa hasil yang diperoleh dibawah ini menggunakan R versi 3.5.2 dengan OS Linux LXLE 16.04 dan Windows 7. Jika terjadi perubahan hasil ketika melakukan eksekusi kemungkinan besar diakibatkan karena sistem atau perbedaan versi R
Instalasi Library
Install beberapa library berikut jika belum ada:
install.packages("rvest")
install.packages("tidytext")
install.packages("corpus")
install.packages("devtools")
devtools::install_github("lchiffon/wordcloud2")
install.packages("dplyr")Jangan lupa untuk merubah opsi stringAsFactors dengan nilai FALSE agar setiap string tidak diubah menjadi tipe faktor.
options(stringsAsFactors = F)Let’s Mining!
Untuk proses mining berikut kita akan menggunakan link "https://beritagar.id/artikel/berita/debat-capres-kedua-tanpa-durasi-dan-moderator-diganti". Contoh berikut tidak menggunakan pipe opeator %>%. Pertama kita akan memperoleh judul dari artikel tersebut.
Workflow tanpa menggunakan magrittr
# Memanggil library rvest
library(rvest)## Loading required package: xml2library(dplyr)##
## 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# Mengambil link lalu simpan kedalam variabel alamat_link
alamat_link <- "https://beritagar.id/artikel/berita/debat-capres-kedua-tanpa-durasi-dan-moderator-diganti"
# Lalu baca halaman web
halaman <- read_html(x = alamat_link)
# Lalu membaca node h1 dalam halaman tersebut
htmlNode <- html_node(halaman, "h1")
# Lalu membaca teks setelah teks tersebut dibersihkan dengan parameter trim = T
judul <- html_text(htmlNode, trim = T)
# Baca teks yang diperoleh dari halaman tersebut
judul## [1] "Debat capres kedua tanpa durasi dan moderator diganti"Workflow dengan menggunakan magrittr
alamat_link %>% # Dari alamat link yang diberikan
read_html() %>% # Baca html nya
html_node("h1") %>% # lalu ambil node "h1"
html_text(trim = T) # lalu baca teks nya## [1] "Debat capres kedua tanpa durasi dan moderator diganti"Dapat dilihat bahwa dengan menggunakan magrittr kita tidak perlu membuat banyak variabel sehingga lebih menghemat memori dan kode lebih mudah dibaca.
Catatan:
- Operator
%>%dari packagemagrittrotomatis akan dipanggil jika memanggil librarydplyr html_node()digunakan untuk membaca 1 node pertama dari sekian banyak node, sedangkanhtml_nodes()digunakan untuk membaca semua node.html_nodeatauhtml_nodesbisa menggunakan CSS Selector, bisa juga menggunakan XPATH. Penjelasan mengenai keduanya dapat dilihat di file presentasihtml_text()dengan parametertrim = Takan membersihkan teks yang diterima seperti menghilangkan newlines\nyang berlebih serta spasi kanan dan kiri dari teks.
Selanjutnya kita akan mencoba mengambil paragraph dari teks tersebut.
Mengambil isi berita
Dapat dilihat dari gambar diatas bahwa terdapat lebih dari 1 node paragraph <p>, maka dari itu kita akan menggunakan html_nodes() untuk mengambil teks berita.
alamat_link %>% # Dari alamat link yang diberikan
read_html() %>% # Baca html-nya
html_nodes("p") %>% # Baca semua nodes "p"
html_text(trim = T) # ambil dan bersihkan teks yang diambil## [1] "Komisi Pemilihan Umum (KPU) mengumumkan usulan pembaruan yang mungkin berlaku dalam debat kedua calon presiden dan wakil presiden, pertengahan Februari mendatang."
## [2] "Pertama, KPU akan merancang satu segmen khusus dalam debat yang bisa digunakan bagi para calon presiden untuk menjawab pertanyaan dan menanggapi argumen lawan tanpa terpotong durasi."
## [3] "Panjangnya durasi bakal bergantung dari masing-masing argumen calon presiden, namun tetap berada di bawah komando moderator debat. Moderator juga memiliki keleluasaan untuk menambahkan pertanyaan kepada masing-masing capres."
## [4] "“Durasi total 10 menit misalkan, kami berikan untuk kepada moderator, mereka (calon presiden) bisa saling menjawab dan menanggapi. Sepenuhnya kami tidak atur,” sebut Ketua KPU Arief Budiman, dalam Katadata, Jumat (25/1/2019)."
## [5] "Arief beralasan, keleluasaan ini dibuat agar suasana debat capres semakin kental dengan pemaparan argumen yang lebih komprehensif."
## [6] "Rencananya, durasi khusus ini akan dipasang antara segmen dua hingga lima. Sebab, pada segmen tersebut para pasangan calon dirasa sudah cukup beradaptasi dengan suasana debat sehingga dapat mengatur jawaban dan tanggapan lebih baik."
## [7] "“Supaya lebih greget. Kemarin sudah kita bikin, debat mulai segmen 2 sampai 5 itu saling bertanya saling menanggapi. Sekarang kita bikin yang lebih greget lagi,” sambung Arief."
## [8] "Terkait usulan ini, Arief masih menunggu kajian lebih lanjut dari stasiun televisi penyelenggara yang bertugas mengatur susunan acaranya."
## [9] "Kedua, terkait dengan penggantian moderator. KPU bersama masing-masing tim kampanye dua pasangan calon disebut telah menyepakati dua moderator baru untuk debat kedua, mereka adalah Tommy Tjokro dan Anisha Dasuki."
## [10] "Keduanya adalah bekas reporter MetroTV, kini Tommy berprofesi sebagai presenter berita untuk RCTI sementara Anisha adalah presenter berita iNews TV."
## [11] "“Moderator debat sudah dapat persetujuan masing-masing pasangan calon,” tegas Arief."
## [12] "Penunjukkan keduanya mengacu pada Undang-Undang Nomor 7 Tahun 2017 tentang Pemilu yang mengharuskan pemilihan moderator debat disepakati oleh masing-masing tim pasangan calon."
## [13] "KPU tengah menghubungi kedua nama tersebut untuk konfirmasi. Jika keduanya ternyata tidak bersedia, maka tidak menutup kemungkinan KPU akan mencari dua nama baru."
## [14] "Pemilihan moderator untuk debat kedua sempat menjadi polemik. Sebelumnya nama Tommy muncul bersama Najwa Shihab dalam bursa moderator debat kedua. Nama Najwa itu yang kemudian diprotes kubu pasangan calon nomor dua karena dianggap tidak independen."
## [15] "Arief membantah pencoretan nama Najwa dilakukan menyusul kontroversi terkait netralitas presenter berita itu."
## [16] "Selain Najwa, beberapa nama lain yang juga masuk dalam bursa moderator debat kedua adalah Rosiana Sialalahi (Kompas TV), Alfito Deannova (CNN Indonesia TV), dan Karni Ilyas (TV One)."
## [17] "Ketiga, KPU menyiapkan delapan panelis untuk menyusun daftar pertanyaan dalam debat putaran dua. Mereka terdiri dari pakar yang memiliki latar akademisi dan aktivis."
## [18] "Arief tidak memerinci nama-nama panelis tersebut. Namun, di antaranya disebut sebagai akademisi dari Universitas Indonesia, Institut Pertanian Bogor, Institut Teknologi Bandung, Universitas Diponegoro, Universitas Gajah Mada, dan Universitas Airlangga."
## [19] "Para akademisi ini diklaim memiliki keahlian dalam bidang energi, pangan, sumber daya alam (SDA), lingkungan hidup, serta infrastruktur. Sementara, untuk panelis yang berlatar belakang aktivis berasal dari Wahana Lingkungan Hidup (Walhi)."
## [20] "KPU meyakinkan pihaknya telah melakukan pengecekan latar belakang kedelapan panelis tersebut. Hal ini untuk menghindari adanya konflik kepentingan dari masing-masing pasangan calon."
## [21] "Terkait panelis ini, para tim kampanye dua kubu meminta agar mereka disumpah terlebih dahulu agar tidak membocorkan pertanyaan debat."
## [22] "Wakil Ketua Badan Pemenangan Nasional (BPN) Prabowo-Sandiaga, Prio Budi Santoso, menyebut ikrar sumpah ini untuk menghindari kebocoran pertanyaan yang dapat menimbulkan polemik di publik."
## [23] "Begitu juga dengan Wakil Direktur Saksi Tim Kampanye Nasional (TKN) Jokowi-Ma’ruf, Lukman Edy. Dirinya turut menyepakati wacana pengambilan sumpah ini meski juga meminta mekanisme lain untuk meyakinkan publik bahwa pertanyaan tidak akan bocor dan menimbulkan prasangka."
## [24] "Namun, Arief menilai untuk menguji profesionalisme panelis tidak harus melalui sumpah. Apalagi, pemilihan mereka tidak sembarangan, harus melalui beragam syarat seperti memiliki integritas, tidak berpihak, dan profesional."
## [25] "Debat kedua Pilpres 2019 rencananya akan diselenggarakan pada 17 Februari 2019, di Hotel Sultan, Jakarta. Tema yang akan diusung pada putaran kedua ini adalah tema energi dan pangan, SDA dan lingkungan hidup, serta infrastruktur."
## [26] "Debat akan ditayangkan oleh stasiun televisi yang berada di bawah naungan Grup MNC, yakni RCTI, GTV, MNC TV, dan iNews TV."
## [27] "Khusus pada putaran kedua ini, debat hanya akan diikuti oleh calon presiden. KPU tidak mewajibkan kehadiran calon wakil presiden, begitu pula jika mereka memutuskan untuk hadir di antara barisan penonton."
## [28] "\"Mau enggak datang boleh, mau datang boleh,\" ujar Komisioner KPU Ilham Sahputra, dinukil dari tempo.co, Rabu (23/1/2019)."
## [29] "Forum debat capres yang baik memungkinkan pemilih melihat pandangan, misi, visi dan strategi masing-masing kandidat secara lebih jernih. Itu jauh lebih penting ketimbang menjadikannya melulu sebagai ajang pertunjukan."
## [30] "Debat perdana capres dan cawapres akan membahas pokok pikiran soal isu hukum, HAM, korupsi, dan terorisme."
## [31] "Pencoretan mantan Wakil Ketua KPK, Bambang Widjojanto dan Koordinator Indonesia Corruption Watch (ICW) Adnan Topan Husodo dari daftar panelis debat capres-cawapres pertama Pilpres 2019 merupakan kesepakatan dua kubu."Jika diperhatikan, setiap paragraph diubah menjadi vektor. Hal ini akan menjadi sangat mengganggu jika kita ingin menyimpan teks tersebut kedalam file csv atau xls untuk dianalisa lebih lanjut, maka perlu menggabungkan keseluruhan vektor menjadi 1 vektor. Jika ingin menggabung berita tersebut menjadi 1 vektor tanpa harus menghilangkan paragraf dapat menggunakan fungsi paste0(collapse = "\n").
alamat_link %>% # dari alamat link yang diberikan
read_html() %>% # baca html-nya
html_nodes("p") %>% # lalu baca semua node "p"
html_text(trim = T) %>% # lalu ambil dan bersihkan teksnya
paste0(collapse = "\n") # Gabung semua vektor dengan menambah newlines ("\n")## [1] "Komisi Pemilihan Umum (KPU) mengumumkan usulan pembaruan yang mungkin berlaku dalam debat kedua calon presiden dan wakil presiden, pertengahan Februari mendatang.\nPertama, KPU akan merancang satu segmen khusus dalam debat yang bisa digunakan bagi para calon presiden untuk menjawab pertanyaan dan menanggapi argumen lawan tanpa terpotong durasi.\nPanjangnya durasi bakal bergantung dari masing-masing argumen calon presiden, namun tetap berada di bawah komando moderator debat. Moderator juga memiliki keleluasaan untuk menambahkan pertanyaan kepada masing-masing capres.\n“Durasi total 10 menit misalkan, kami berikan untuk kepada moderator, mereka (calon presiden) bisa saling menjawab dan menanggapi. Sepenuhnya kami tidak atur,” sebut Ketua KPU Arief Budiman, dalam Katadata, Jumat (25/1/2019).\nArief beralasan, keleluasaan ini dibuat agar suasana debat capres semakin kental dengan pemaparan argumen yang lebih komprehensif.\nRencananya, durasi khusus ini akan dipasang antara segmen dua hingga lima. Sebab, pada segmen tersebut para pasangan calon dirasa sudah cukup beradaptasi dengan suasana debat sehingga dapat mengatur jawaban dan tanggapan lebih baik.\n“Supaya lebih greget. Kemarin sudah kita bikin, debat mulai segmen 2 sampai 5 itu saling bertanya saling menanggapi. Sekarang kita bikin yang lebih greget lagi,” sambung Arief.\nTerkait usulan ini, Arief masih menunggu kajian lebih lanjut dari stasiun televisi penyelenggara yang bertugas mengatur susunan acaranya.\nKedua, terkait dengan penggantian moderator. KPU bersama masing-masing tim kampanye dua pasangan calon disebut telah menyepakati dua moderator baru untuk debat kedua, mereka adalah Tommy Tjokro dan Anisha Dasuki.\nKeduanya adalah bekas reporter MetroTV, kini Tommy berprofesi sebagai presenter berita untuk RCTI sementara Anisha adalah presenter berita iNews TV.\n“Moderator debat sudah dapat persetujuan masing-masing pasangan calon,” tegas Arief.\nPenunjukkan keduanya mengacu pada Undang-Undang Nomor 7 Tahun 2017 tentang Pemilu yang mengharuskan pemilihan moderator debat disepakati oleh masing-masing tim pasangan calon.\nKPU tengah menghubungi kedua nama tersebut untuk konfirmasi. Jika keduanya ternyata tidak bersedia, maka tidak menutup kemungkinan KPU akan mencari dua nama baru.\nPemilihan moderator untuk debat kedua sempat menjadi polemik. Sebelumnya nama Tommy muncul bersama Najwa Shihab dalam bursa moderator debat kedua. Nama Najwa itu yang kemudian diprotes kubu pasangan calon nomor dua karena dianggap tidak independen.\nArief membantah pencoretan nama Najwa dilakukan menyusul kontroversi terkait netralitas presenter berita itu.\nSelain Najwa, beberapa nama lain yang juga masuk dalam bursa moderator debat kedua adalah Rosiana Sialalahi (Kompas TV), Alfito Deannova (CNN Indonesia TV), dan Karni Ilyas (TV One).\nKetiga, KPU menyiapkan delapan panelis untuk menyusun daftar pertanyaan dalam debat putaran dua. Mereka terdiri dari pakar yang memiliki latar akademisi dan aktivis.\nArief tidak memerinci nama-nama panelis tersebut. Namun, di antaranya disebut sebagai akademisi dari Universitas Indonesia, Institut Pertanian Bogor, Institut Teknologi Bandung, Universitas Diponegoro, Universitas Gajah Mada, dan Universitas Airlangga.\nPara akademisi ini diklaim memiliki keahlian dalam bidang energi, pangan, sumber daya alam (SDA), lingkungan hidup, serta infrastruktur. Sementara, untuk panelis yang berlatar belakang aktivis berasal dari Wahana Lingkungan Hidup (Walhi).\nKPU meyakinkan pihaknya telah melakukan pengecekan latar belakang kedelapan panelis tersebut. Hal ini untuk menghindari adanya konflik kepentingan dari masing-masing pasangan calon.\nTerkait panelis ini, para tim kampanye dua kubu meminta agar mereka disumpah terlebih dahulu agar tidak membocorkan pertanyaan debat.\nWakil Ketua Badan Pemenangan Nasional (BPN) Prabowo-Sandiaga, Prio Budi Santoso, menyebut ikrar sumpah ini untuk menghindari kebocoran pertanyaan yang dapat menimbulkan polemik di publik.\nBegitu juga dengan Wakil Direktur Saksi Tim Kampanye Nasional (TKN) Jokowi-Ma’ruf, Lukman Edy. Dirinya turut menyepakati wacana pengambilan sumpah ini meski juga meminta mekanisme lain untuk meyakinkan publik bahwa pertanyaan tidak akan bocor dan menimbulkan prasangka.\nNamun, Arief menilai untuk menguji profesionalisme panelis tidak harus melalui sumpah. Apalagi, pemilihan mereka tidak sembarangan, harus melalui beragam syarat seperti memiliki integritas, tidak berpihak, dan profesional.\nDebat kedua Pilpres 2019 rencananya akan diselenggarakan pada 17 Februari 2019, di Hotel Sultan, Jakarta. Tema yang akan diusung pada putaran kedua ini adalah tema energi dan pangan, SDA dan lingkungan hidup, serta infrastruktur.\nDebat akan ditayangkan oleh stasiun televisi yang berada di bawah naungan Grup MNC, yakni RCTI, GTV, MNC TV, dan iNews TV.\nKhusus pada putaran kedua ini, debat hanya akan diikuti oleh calon presiden. KPU tidak mewajibkan kehadiran calon wakil presiden, begitu pula jika mereka memutuskan untuk hadir di antara barisan penonton.\n\"Mau enggak datang boleh, mau datang boleh,\" ujar Komisioner KPU Ilham Sahputra, dinukil dari tempo.co, Rabu (23/1/2019).\nForum debat capres yang baik memungkinkan pemilih melihat pandangan, misi, visi dan strategi masing-masing kandidat secara lebih jernih. Itu jauh lebih penting ketimbang menjadikannya melulu sebagai ajang pertunjukan.\nDebat perdana capres dan cawapres akan membahas pokok pikiran soal isu hukum, HAM, korupsi, dan terorisme.\nPencoretan mantan Wakil Ketua KPK, Bambang Widjojanto dan Koordinator Indonesia Corruption Watch (ICW) Adnan Topan Husodo dari daftar panelis debat capres-cawapres pertama Pilpres 2019 merupakan kesepakatan dua kubu."Catatan:
- Jika anda melihat tanda
\atau\npada teks diatas itu normal karena\merupakan escape character sedangkan\nmenandakan garis baru (newlines)
Bagaimana jika kita ingin mengambil sekaligus judul dan isi artikel? Kita bisa saja menyimpan judul dan isi artikel yang diperoleh kedalam variabel seperti berikut:
# Mengambil judul
judul_berita <- alamat_link %>% # Dari alamat link yang diberikan
read_html() %>% # Baca html nya
html_node("h1") %>% # lalu ambil node "h1"
html_text(trim = T) # lalu baca teks nya
# Mengambil isi artikel
isi_berita <- alamat_link %>% # dari alamat link yang diberikan
read_html() %>% # baca html-nya
html_nodes("p") %>% # lalu baca semua node "p"
html_text(trim = T) %>% # lalu ambil dan bersihkan teksnya
paste0(collapse = "\n") # Gabung semua vektor dengan menambah newlines ("\n")
# Buat dataframe untuk menyimpan berita
df <- data_frame(judul = judul_berita, isi = isi_berita)## Warning: `data_frame()` is deprecated, use `tibble()`.
## This warning is displayed once per session.# Melihat isi dari df
df## # A tibble: 1 x 2
## judul isi
## <chr> <chr>
## 1 Debat capres kedua tanpa duras~ "Komisi Pemilihan Umum (KPU) mengumumkan~Atau kita bisa membuat fungsi untuk memudahkan workflow, seperti berikut:
# Buat function bernama 'ambil_berita' dengan parameter alamat_link
ambil_berita <- function(alamat_link) {
# Mengambil judul
judul_berita <- alamat_link %>% # Dari alamat link yang diberikan
read_html() %>% # Baca html nya
html_node("h1") %>% # lalu ambil node "h1"
html_text(trim = T) # lalu baca teks nya
# Mengambil isi artikel
isi_berita <- alamat_link %>% # dari alamat link yang diberikan
read_html() %>% # baca html-nya
html_nodes("p") %>% # lalu baca semua node "p"
html_text(trim = T) %>% # lalu ambil dan bersihkan teksnya
paste0(collapse = "\n") # Gabung semua vektor dengan menambah newlines ("\n")
# Menyimpan berita kedalam dataframe df
df <- data_frame(judul = judul_berita, isi = isi_berita)
}Kita dapat menggunakan fungsi dengan cara memasukkan link kedalam parameter fungsi tersebut.
# Menggunakan fungsi ambil_berita lalu masukkan kedalam variabel df
df <- ambil_berita("https://beritagar.id/artikel/berita/debat-capres-kedua-tanpa-durasi-dan-moderator-diganti")
# Memanggil df
df## # A tibble: 1 x 2
## judul isi
## <chr> <chr>
## 1 Debat capres kedua tanpa duras~ "Komisi Pemilihan Umum (KPU) mengumumkan~Hasil yang diperoleh dapat disimpan kedalam format csv seperti berikut:
# Simpan df sebagai csv dengan nama "artikel-berita", tanpa nama row
write.csv(df, file = "artikel-berita.csv", row.names = FALSE)Jika file tersebut dibuka maka hasilnya dapat dilihat sebagai berikut:
Mengambil link berita
Sepertinya kurang menarik jika hanya mengambil 1 artikel saja sedangkan ada banyak artikel yang bisa di-scrape, namun kita butuh link dan rasanya sulit jika kita harus mengambil link tersebut satu persatu. Maka dari itu kita akan mencoba mengambil link berita, dalam hal ini kita akan menggunkan link https://beritagar.id/topik/pilpres-2019.
Dapat dilihat bahwa masing-masing header artikel memiliki link pada elemen a dengan atribut href. Kita bisa mengambil elemen href dengan fungsi html_attr() setelah html_nodes() seperti berikut:
alamat_link <- "https://beritagar.id/topik/pilpres-2019" # Masukkan link kedalam variabel
alamat_link %>% # Dari alamat link yang diberikan
read_html() %>% # Baca html-nya
html_nodes("a") %>% # Ambil semua node "a"
html_attr("href") # Lalu ambil atribut "href"## [1] "https://beritagar.id/"
## [2] "https://twitter.com/BeritagarID"
## [3] "https://www.facebook.com/BeritagarID"
## [4] "https://beritagar.id/kanal/arena"
## [5] "https://beritagar.id/kanal/berita"
## [6] "https://beritagar.id/kanal/bincang"
## [7] "https://beritagar.id/edisi-khusus"
## [8] "https://beritagar.id/kanal/editorial"
## [9] "https://beritagar.id/kanal/figur"
## [10] "https://beritagar.id/topik/film-bulan-ini"
## [11] "https://beritagar.id/kanal/gaya-hidup"
## [12] "https://beritagar.id/kanal/laporan-khas"
## [13] "https://beritagar.id/kanal/otogen"
## [14] "https://beritagar.id/kanal/piknik"
## [15] "https://beritagar.id/kanal/ramadan"
## [16] "https://beritagar.id/kanal/sains-tekno"
## [17] "https://beritagar.id/kanal/seni-hiburan"
## [18] "https://beritagar.id/kanal/tabik"
## [19] "https://beritagar.id/kanal/telatah"
## [20] "https://beritagar.id/kanal/ulasan"
## [21] "https://beritagar.id/kanal/waini"
## [22] "https://beritagar.id/spesial/video"
## [23] "https://beritagar.id/spesial/foto"
## [24] "https://beritagar.id/data/korupsi/"
## [25] "https://beritagar.id/data/slank/"
## [26] "https://beritagar.id/data/bulutangkis/"
## [27] "https://lokadata.beritagar.id/"
## [28] "https://pilkada-dki.beritagar.id/"
## [29] "https://beritagar.id/data/kota-pilihan-2018"
## [30] "https://widget.kaskus.co.id/kaskusnetworks/r/33/?target=www.kaskus.co.id&utm_source=beritagar.id&utm_campaign=kaskus-networks&utm_medium=header_widget"
## [31] "https://widget.kaskus.co.id/kaskusnetworks/r/45/?target=garasi.id&utm_source=beritagar.id&utm_campaign=kaskus-networks&utm_medium=header_widget"
## [32] "https://widget.kaskus.co.id/kaskusnetworks/r/9/?target=opini.id&utm_source=beritagar.id&utm_campaign=kaskus-networks&utm_medium=header_widget"
## [33] "https://widget.kaskus.co.id/kaskusnetworks/r/21/?target=bolalob.com&utm_source=beritagar.id&utm_campaign=kaskus-networks&utm_medium=header_widget"
## [34] "https://widget.kaskus.co.id/kaskusnetworks/r/36/?target=womantalk.com&utm_source=beritagar.id&utm_campaign=kaskus-networks&utm_medium=header_widget"
## [35] "https://widget.kaskus.co.id/kaskusnetworks/r/42/?target=www.kincir.com&utm_source=beritagar.id&utm_campaign=kaskus-networks&utm_medium=header_widget"
## [36] "https://widget.kaskus.co.id/kaskusnetworks/r/48/?target=app.adjust.com&utm_source=beritagar.id&utm_campaign=kaskus-networks&utm_medium=header_widget"
## [37] "https://widget.kaskus.co.id/kaskusnetworks/r/51/?target=historia.id&utm_source=beritagar.id&utm_campaign=kaskus-networks&utm_medium=header_widget"
## [38] "https://widget.kaskus.co.id/kaskusnetworks/r/54/?target=iespl.id&utm_source=beritagar.id&utm_campaign=kaskus-networks&utm_medium=header_widget"
## [39] "https://www.facebook.com/BeritagarID"
## [40] "https://twitter.com/BeritagarID"
## [41] "https://plus.google.com/+BeritagarID/about"
## [42] "/rss"
## [43] "http://line.me/ti/p/%40qrx4465m"
## [44] "https://api.whatsapp.com/send?phone=6281318884123"
## [45] "https://www.instagram.com/beritagarid/"
## [46] "https://www.youtube.com/channel/UCREzYnKXAMWBleai4_zdHvw"
## [47] "/tentang-kami"
## [48] "/iklan"
## [49] "https://obsat.beritagar.id/"
## [50] "https://blog.beritagar.id/"
## [51] "/kebijakan"
## [52] "https://beritagar.id/karier"
## [53] "/hubungi-kami"
## [54] "/panduan-media-siber"
## [55] "/"
## [56] NA
## [57] "https://www.facebook.com/BeritagarID"
## [58] "https://twitter.com/BeritagarID"
## [59] "https://beritagar.id/artikel/berita/gagal-di-jakarta-sandiaga-bawa-ok-oce-ke-nasional"
## [60] "/topik/pilpres-2019"
## [61] "https://beritagar.id/artikel/berita/gagal-di-jakarta-sandiaga-bawa-ok-oce-ke-nasional"
## [62] "https://beritagar.id/penulis/TasyaSimatupang"
## [63] "https://beritagar.id/artikel/berita/bpn-laporkan-indonesia-barokah-ke-polisi"
## [64] "/topik/pilpres-2019"
## [65] "https://beritagar.id/artikel/berita/bpn-laporkan-indonesia-barokah-ke-polisi"
## [66] "https://beritagar.id/penulis/Rohmen"
## [67] "https://beritagar.id/artikel/berita/debat-selesai-pemberitaan-soal-pilpres-susut"
## [68] "/topik/pilpres-2019"
## [69] "https://beritagar.id/artikel/berita/debat-selesai-pemberitaan-soal-pilpres-susut"
## [70] "https://beritagar.id/penulis/Rohmen"
## [71] "https://beritagar.id/artikel/berita/debat-capres-kedua-tanpa-durasi-dan-moderator-diganti"
## [72] "/topik/pilpres-2019"
## [73] "https://beritagar.id/artikel/berita/debat-capres-kedua-tanpa-durasi-dan-moderator-diganti"
## [74] "https://beritagar.id/penulis/nirmala"
## [75] "https://beritagar.id/artikel/berita/pidato-prabowo-dinilai-sebagai-kampanye"
## [76] "/topik/pilpres-2019"
## [77] "https://beritagar.id/artikel/berita/pidato-prabowo-dinilai-sebagai-kampanye"
## [78] "https://beritagar.id/penulis/Rohmen"
## [79] "https://beritagar.id/artikel/berita/indonesia-barokah-bikin-masalah"
## [80] "/topik/pilpres-2019"
## [81] "https://beritagar.id/artikel/berita/indonesia-barokah-bikin-masalah"
## [82] "https://beritagar.id/penulis/antyo"
## [83] "https://beritagar.id/artikel/berita/pilihan-terbatas-golput-diprediksi-meningkat"
## [84] "/topik/pilpres-2019"
## [85] "https://beritagar.id/artikel/berita/pilihan-terbatas-golput-diprediksi-meningkat"
## [86] "https://beritagar.id/penulis/Rohmen"
## [87] "https://beritagar.id/artikel/waini/lawan-dan-kawan-dalam-pilpres-itu-tak-permanen"
## [88] "/topik/pilpres-2019"
## [89] "https://beritagar.id/artikel/waini/lawan-dan-kawan-dalam-pilpres-itu-tak-permanen"
## [90] "https://beritagar.id/penulis/antyo"
## [91] "https://beritagar.id/artikel/laporan-khas/membekali-pak-kiai-dengan-kemampuan-debat"
## [92] "/topik/pilpres-2019"
## [93] "https://beritagar.id/artikel/laporan-khas/membekali-pak-kiai-dengan-kemampuan-debat"
## [94] "https://beritagar.id/penulis/nirmala"
## [95] "https://beritagar.id/artikel/berita/kpu-berlakukan-aturan-baru-untuk-debat-capres-mendatang"
## [96] "/topik/pilpres-2019"
## [97] "https://beritagar.id/artikel/berita/kpu-berlakukan-aturan-baru-untuk-debat-capres-mendatang"
## [98] "https://beritagar.id/penulis/nirmala"
## [99] "//ads.brta.in/www/delivery/ck.php?n=a5122457&cb=INSERT_RANDOM_NUMBER_HERE"
## [100] "https://beritagar.id/artikel/berita/peluru-peluru-baru-fahri-hamzah-serang-pks"
## [101] "https://beritagar.id/artikel/berita/peluru-peluru-baru-fahri-hamzah-serang-pks"
## [102] "https://beritagar.id/artikel/berita/bpn-laporkan-indonesia-barokah-ke-polisi"
## [103] "https://beritagar.id/artikel/berita/bpn-laporkan-indonesia-barokah-ke-polisi"
## [104] "https://beritagar.id/artikel/bincang/yasonna-laoly-kalau-tak-setia-tidak-akan-kita-bebaskan"
## [105] "https://beritagar.id/artikel/bincang/yasonna-laoly-kalau-tak-setia-tidak-akan-kita-bebaskan"
## [106] "https://beritagar.id/artikel/berita/divonis-15-tahun-ahmad-dhani-langsung-ditahan"
## [107] "https://beritagar.id/artikel/berita/divonis-15-tahun-ahmad-dhani-langsung-ditahan"
## [108] "https://beritagar.id/artikel/berita/alasan-erick-thohir-lepas-semua-saham-inter-milan"
## [109] "https://beritagar.id/artikel/berita/alasan-erick-thohir-lepas-semua-saham-inter-milan"
## [110] "https://beritagar.id/artikel/berita/debat-capres-kedua-tanpa-durasi-dan-moderator-diganti"
## [111] "https://beritagar.id/artikel/berita/debat-capres-kedua-tanpa-durasi-dan-moderator-diganti"
## [112] "https://beritagar.id/artikel/arena/solskjaer-catat-kemenangan-kedelapan-dalam-delapan-laga"
## [113] "https://beritagar.id/artikel/arena/solskjaer-catat-kemenangan-kedelapan-dalam-delapan-laga"
## [114] "https://beritagar.id/artikel/seni-hiburan/aquaman-jadi-film-dc-terlaris-sepanjang-masa"
## [115] "https://beritagar.id/artikel/seni-hiburan/aquaman-jadi-film-dc-terlaris-sepanjang-masa"
## [116] "https://beritagar.id/artikel/berita/serbuan-sampah-plastik-di-pantai-bali"
## [117] "https://beritagar.id/artikel/berita/serbuan-sampah-plastik-di-pantai-bali"
## [118] "https://beritagar.id/artikel/berita/pekalongan-dan-batang-banjir-jalur-pantura-terganggu"
## [119] "https://beritagar.id/artikel/berita/pekalongan-dan-batang-banjir-jalur-pantura-terganggu"
## [120] "/tentang-kami"
## [121] "/iklan"
## [122] "/kebijakan"
## [123] "https://beritagar.id/karier"
## [124] "/hubungi-kami"
## [125] "/panduan-media-siber"
## [126] ""Jika dilihat dari hasil diatas, sepertinya banyak sekali link yang tidak kita butuhkan. Hal ini terjadi karena kita mengambil link dari atribut href tanpa memandang struktur dokumen tersebut lebih lanjut. Jika diperhatikan lebih baik lagi, kita dapat melihat bahwa elemen a berada dibawah elemen h1, h1 dibawah elemen header dan elemen header berada dibawah elemen article. Maka dari itu kita harus mengambil atribut href dengan memperhatikan parent node, dalam hal ini article lalu header lalu h1.
alamat_link <- "https://beritagar.id/topik/pilpres-2019"
alamat_link %>% # Dari alamat link yang diberikan
read_html() %>% # Baca html-nya
html_nodes("header h1 a") %>% # Ambil semua node "a" dari parent "h1" lalu parent "header"
html_attr("href") # Lalu ambil atribut "href"## [1] "https://beritagar.id/artikel/berita/gagal-di-jakarta-sandiaga-bawa-ok-oce-ke-nasional"
## [2] "https://beritagar.id/artikel/berita/bpn-laporkan-indonesia-barokah-ke-polisi"
## [3] "https://beritagar.id/artikel/berita/debat-selesai-pemberitaan-soal-pilpres-susut"
## [4] "https://beritagar.id/artikel/berita/debat-capres-kedua-tanpa-durasi-dan-moderator-diganti"
## [5] "https://beritagar.id/artikel/berita/pidato-prabowo-dinilai-sebagai-kampanye"
## [6] "https://beritagar.id/artikel/berita/indonesia-barokah-bikin-masalah"
## [7] "https://beritagar.id/artikel/berita/pilihan-terbatas-golput-diprediksi-meningkat"
## [8] "https://beritagar.id/artikel/waini/lawan-dan-kawan-dalam-pilpres-itu-tak-permanen"
## [9] "https://beritagar.id/artikel/laporan-khas/membekali-pak-kiai-dengan-kemampuan-debat"
## [10] "https://beritagar.id/artikel/berita/kpu-berlakukan-aturan-baru-untuk-debat-capres-mendatang"Atau bisa saja menggunakan elemen h1 dengan memasukkan atribut class='stream-title' (lihat gambar).
alamat_link <- "https://beritagar.id/topik/pilpres-2019"
alamat_link %>% # Dari alamat link yang diberikan
read_html() %>% # Baca html-nya
html_nodes("h1[class='stream-title'] a") %>% # Ambil semua node "a" dari parent "h1" dengan atribut class='stream-title'
html_attr("href") # Lalu ambil atribut "href"## [1] "https://beritagar.id/artikel/berita/gagal-di-jakarta-sandiaga-bawa-ok-oce-ke-nasional"
## [2] "https://beritagar.id/artikel/berita/bpn-laporkan-indonesia-barokah-ke-polisi"
## [3] "https://beritagar.id/artikel/berita/debat-selesai-pemberitaan-soal-pilpres-susut"
## [4] "https://beritagar.id/artikel/berita/debat-capres-kedua-tanpa-durasi-dan-moderator-diganti"
## [5] "https://beritagar.id/artikel/berita/pidato-prabowo-dinilai-sebagai-kampanye"
## [6] "https://beritagar.id/artikel/berita/indonesia-barokah-bikin-masalah"
## [7] "https://beritagar.id/artikel/berita/pilihan-terbatas-golput-diprediksi-meningkat"
## [8] "https://beritagar.id/artikel/waini/lawan-dan-kawan-dalam-pilpres-itu-tak-permanen"
## [9] "https://beritagar.id/artikel/laporan-khas/membekali-pak-kiai-dengan-kemampuan-debat"
## [10] "https://beritagar.id/artikel/berita/kpu-berlakukan-aturan-baru-untuk-debat-capres-mendatang"Jika dilihat dari hasilnya, kita sudah mendapat link sesuai yang kita inginkan. Maka dari itu kita bisa menggunakan link diatas untuk mengambil berita yang lain.
Catatan:
- Mengapa tidak memulainya dari parent
article? Karena elemenheaderhanya ada di dalam elemenarticle, kecuali elemenheaderada di dalam elemen yang lain, misalnya di dalam elemenspanatau lainnya, baru penulisannya akan menjadihtml_nodes("article header h1 a"). - Mengapa tidak menggunakan XPATH? Ini masalah pilihan saja, kadang XPATH lebih mudah digunakan jika struktur HTML sangat kompleks dan perlu dibuat lebih detail dengan memasukkan unsur lain seperti
classatauid. Contohnya adalah sebagai berikut:
alamat_link %>% # Dari alamat link yang diberikan
read_html() %>% # Baca html-nya
html_nodes(xpath = "//h1[contains(@class,'stream-title')]//a") %>% # Ambil node "a"
html_attr("href") # Lalu ambil atribut "href"## [1] "https://beritagar.id/artikel/berita/gagal-di-jakarta-sandiaga-bawa-ok-oce-ke-nasional"
## [2] "https://beritagar.id/artikel/berita/bpn-laporkan-indonesia-barokah-ke-polisi"
## [3] "https://beritagar.id/artikel/berita/debat-selesai-pemberitaan-soal-pilpres-susut"
## [4] "https://beritagar.id/artikel/berita/debat-capres-kedua-tanpa-durasi-dan-moderator-diganti"
## [5] "https://beritagar.id/artikel/berita/pidato-prabowo-dinilai-sebagai-kampanye"
## [6] "https://beritagar.id/artikel/berita/indonesia-barokah-bikin-masalah"
## [7] "https://beritagar.id/artikel/berita/pilihan-terbatas-golput-diprediksi-meningkat"
## [8] "https://beritagar.id/artikel/waini/lawan-dan-kawan-dalam-pilpres-itu-tak-permanen"
## [9] "https://beritagar.id/artikel/laporan-khas/membekali-pak-kiai-dengan-kemampuan-debat"
## [10] "https://beritagar.id/artikel/berita/kpu-berlakukan-aturan-baru-untuk-debat-capres-mendatang"Namun jika menggunakan CSS Selector lebih mudah maka cukup gunakan CSS Selector saja.
Selanjutnya kita akan membuat fungsi untuk mengambil semua link dalam halaman tersebut dan membaca semua artikel lalu simpan hasilnya dalam format csv sebagai berikut:
ambil_link_pertopik <- function(alamat_link_topik) {
alamat_link <- alamat_link_topik # Simpan link dalam variabel alamat_link
alamat_link %>% # Dari alamat link yang diberikan
read_html() %>% # Baca html-nya
html_nodes("h1[class='stream-title'] a") %>% # Ambil semua node "a" dari parent "h1" dengan atribut class='stream-title'
html_attr("href") # Lalu ambil atribut "href"
}Fungsi diatas dapat digunakan seperti berikut:
# Gunakan fungsi ambil_link_pertopik lalu simpan hasilnya kedalam variabel alamat_link
alamat_link <- ambil_link_pertopik("https://beritagar.id/topik/pilpres-2019")
# Panggil variabel alamat_link
alamat_link## [1] "https://beritagar.id/artikel/berita/gagal-di-jakarta-sandiaga-bawa-ok-oce-ke-nasional"
## [2] "https://beritagar.id/artikel/berita/bpn-laporkan-indonesia-barokah-ke-polisi"
## [3] "https://beritagar.id/artikel/berita/debat-selesai-pemberitaan-soal-pilpres-susut"
## [4] "https://beritagar.id/artikel/berita/debat-capres-kedua-tanpa-durasi-dan-moderator-diganti"
## [5] "https://beritagar.id/artikel/berita/pidato-prabowo-dinilai-sebagai-kampanye"
## [6] "https://beritagar.id/artikel/berita/indonesia-barokah-bikin-masalah"
## [7] "https://beritagar.id/artikel/berita/pilihan-terbatas-golput-diprediksi-meningkat"
## [8] "https://beritagar.id/artikel/waini/lawan-dan-kawan-dalam-pilpres-itu-tak-permanen"
## [9] "https://beritagar.id/artikel/laporan-khas/membekali-pak-kiai-dengan-kemampuan-debat"
## [10] "https://beritagar.id/artikel/berita/kpu-berlakukan-aturan-baru-untuk-debat-capres-mendatang"Selanjutnya menggunakan perulangan for untuk mengambil setiap berita dalam link
# Buat dataframe kosong dengan kolom judul dan isi, masukkan ke dalam variabel berita
berita <- data.frame(judul = NULL, isi = NULL)
# Buat berulangan 'for'
iterasi <- 1
for (link in alamat_link) { # Untuk setiap link dalam alamat_link
print(paste0("Download berita ke-", iterasi, collapse = ""))
print(paste0("link berita ", link, collapse = " "))
df <- ambil_berita(link) # Ambil berita dalam link lalu masukkan dalam df
berita <- rbind(berita, df) # masukkan dalam dataframe berita
iterasi <- iterasi + 1
}## [1] "Download berita ke-1"
## [1] "link berita https://beritagar.id/artikel/berita/gagal-di-jakarta-sandiaga-bawa-ok-oce-ke-nasional"
## [1] "Download berita ke-2"
## [1] "link berita https://beritagar.id/artikel/berita/bpn-laporkan-indonesia-barokah-ke-polisi"
## [1] "Download berita ke-3"
## [1] "link berita https://beritagar.id/artikel/berita/debat-selesai-pemberitaan-soal-pilpres-susut"
## [1] "Download berita ke-4"
## [1] "link berita https://beritagar.id/artikel/berita/debat-capres-kedua-tanpa-durasi-dan-moderator-diganti"
## [1] "Download berita ke-5"
## [1] "link berita https://beritagar.id/artikel/berita/pidato-prabowo-dinilai-sebagai-kampanye"
## [1] "Download berita ke-6"
## [1] "link berita https://beritagar.id/artikel/berita/indonesia-barokah-bikin-masalah"
## [1] "Download berita ke-7"
## [1] "link berita https://beritagar.id/artikel/berita/pilihan-terbatas-golput-diprediksi-meningkat"
## [1] "Download berita ke-8"
## [1] "link berita https://beritagar.id/artikel/waini/lawan-dan-kawan-dalam-pilpres-itu-tak-permanen"
## [1] "Download berita ke-9"
## [1] "link berita https://beritagar.id/artikel/laporan-khas/membekali-pak-kiai-dengan-kemampuan-debat"
## [1] "Download berita ke-10"
## [1] "link berita https://beritagar.id/artikel/berita/kpu-berlakukan-aturan-baru-untuk-debat-capres-mendatang"Lalu simpan hasil yang diperoleh dari hasil iterasi tersebut kedalam file csv:
# Simpan berita kedalam file csv 'artikel-berita.csv'
write.csv(berita, file = "artikel-berita.csv", row.names = FALSE)Jika file tersebut dibuka maka hasilnya diperoleh sebagai berikut:
Preprocessing!
Untuk tahap ini kita akan menggunakan dataset debat-capres1.csv dalam folder data dengan menggunakan fungsi read.csv() sebagai berikut:
# Membaca file debat-capres1.csv lalu masukkan ke dalam variabel df
df <- read.csv(file = "./data/debat-capres1.csv", header = T)
# Melihat isi variabel df
df## SEGMEN AKTOR BAGAN
## 1 SEGMEN I Arief Budiman PEMBUKA
## 2 SEGMEN I Arief Budiman PEMBUKA
## 3 SEGMEN I Arief Budiman PEMBUKA
## 4 SEGMEN I Arief Budiman PEMBUKA
## 5 SEGMEN I Arief Budiman PEMBUKA
## 6 SEGMEN I Arief Budiman PEMBUKA
## 7 SEGMEN I Arief Budiman PEMBUKA
## 8 Visi Misi Jokowi-Ma'ruf Jokowi PEMBUKA
## 9 Visi Misi Jokowi-Ma'ruf Jokowi PEMBUKA
## 10 Visi Misi Jokowi-Ma'ruf Jokowi PEMBUKA
## 11 Visi Misi Jokowi-Ma'ruf Jokowi PEMBUKA
## 12 Visi Misi Jokowi-Ma'ruf Jokowi PEMBUKA
## 13 Visi Misi Jokowi-Ma'ruf Jokowi PEMBUKA
## 14 Visi Misi Jokowi-Ma'ruf Jokowi PEMBUKA
## 15 Visi Misi Jokowi-Ma'ruf Jokowi PEMBUKA
## 16 Visi Misi Jokowi-Ma'ruf Jokowi PEMBUKA
## 17 Visi Misi Prabowo-Sandi Prabowo PEMBUKA
## 18 Visi Misi Prabowo-Sandi Prabowo PEMBUKA
## 19 Visi Misi Prabowo-Sandi Prabowo PEMBUKA
## 20 Visi Misi Prabowo-Sandi Prabowo PEMBUKA
## 21 Visi Misi Prabowo-Sandi Prabowo PEMBUKA
## 22 Visi Misi Prabowo-Sandi Prabowo PEMBUKA
## 23 Visi Misi Prabowo-Sandi Prabowo PEMBUKA
## 24 Visi Misi Prabowo-Sandi Prabowo PEMBUKA
## 25 Visi Misi Prabowo-Sandi Prabowo PEMBUKA
## 26 SEGMEN II Panelis Menjawab Pertanyaan dari Panelis
## 27 SEGMEN II Prabowo Menjawab Pertanyaan dari Panelis
## 28 SEGMEN II Prabowo Menjawab Pertanyaan dari Panelis
## 29 SEGMEN II Sandi Menjawab Pertanyaan dari Panelis
## 30 SEGMEN II Sandi Menjawab Pertanyaan dari Panelis
## 31 SEGMEN II Sandi Menjawab Pertanyaan dari Panelis
## 32 SEGMEN II Sandi Menjawab Pertanyaan dari Panelis
## 33 SEGMEN II Sandi Menjawab Pertanyaan dari Panelis
## 34 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis
## 35 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis
## 36 SEGMEN II Prabowo Menjawab Pertanyaan dari Panelis
## 37 SEGMEN II Prabowo Menjawab Pertanyaan dari Panelis
## 38 SEGMEN II Prabowo Menjawab Pertanyaan dari Panelis
## 39 SEGMEN II Panelis Menjawab Pertanyaan dari Panelis
## 40 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis
## 41 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis
## 42 SEGMEN II Ma'ruf Menjawab Pertanyaan dari Panelis
## 43 SEGMEN II Prabowo Menjawab Pertanyaan dari Panelis
## 44 SEGMEN II Prabowo Menjawab Pertanyaan dari Panelis
## 45 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis
## 46 SEGMEN II Panelis Menjawab Pertanyaan dari Panelis
## 47 SEGMEN II Prabowo Menjawab Pertanyaan dari Panelis
## 48 SEGMEN II Prabowo Menjawab Pertanyaan dari Panelis
## 49 SEGMEN II Sandi Menjawab Pertanyaan dari Panelis
## 50 SEGMEN II Sandi Menjawab Pertanyaan dari Panelis
## 51 SEGMEN II Sandi Menjawab Pertanyaan dari Panelis
## 52 SEGMEN II Sandi Menjawab Pertanyaan dari Panelis
## 53 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis
## 54 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis
## 55 SEGMEN II Sandi Menjawab Pertanyaan dari Panelis
## 56 SEGMEN II Sandi Menjawab Pertanyaan dari Panelis
## 57 SEGMEN II Sandi Menjawab Pertanyaan dari Panelis
## 58 SEGMEN II Sandi Menjawab Pertanyaan dari Panelis
## 59 SEGMEN II Panelis Menjawab Pertanyaan dari Panelis
## 60 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis
## 61 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis
## 62 SEGMEN II Sandi Menjawab Pertanyaan dari Panelis
## 63 SEGMEN II Sandi Menjawab Pertanyaan dari Panelis
## 64 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis
## 65 SEGMEN II Ma'ruf Menjawab Pertanyaan dari Panelis
## 66 SEGMEN III Panelis Menjawab Pertanyaan dari Panelis
## 67 SEGMEN III Jokowi Menjawab Pertanyaan dari Panelis
## 68 SEGMEN III Jokowi Menjawab Pertanyaan dari Panelis
## 69 SEGMEN III Jokowi Menjawab Pertanyaan dari Panelis
## 70 SEGMEN III Prabowo Menjawab Pertanyaan dari Panelis
## 71 SEGMEN III Prabowo Menjawab Pertanyaan dari Panelis
## 72 SEGMEN III Jokowi Menjawab Pertanyaan dari Panelis
## 73 SEGMEN III Jokowi Menjawab Pertanyaan dari Panelis
## 74 SEGMEN III Panelis Menjawab Pertanyaan dari Panelis
## 75 SEGMEN III Prabowo Menjawab Pertanyaan dari Panelis
## 76 SEGMEN III Prabowo Menjawab Pertanyaan dari Panelis
## 77 SEGMEN III Prabowo Menjawab Pertanyaan dari Panelis
## 78 SEGMEN III Prabowo Menjawab Pertanyaan dari Panelis
## 79 SEGMEN III Sandi Menjawab Pertanyaan dari Panelis
## 80 SEGMEN III Jokowi Menjawab Pertanyaan dari Panelis
## 81 SEGMEN III Jokowi Menjawab Pertanyaan dari Panelis
## 82 SEGMEN III Jokowi Menjawab Pertanyaan dari Panelis
## 83 SEGMEN III Sandi Menjawab Pertanyaan dari Panelis
## 84 SEGMEN III Panelis Menjawab Pertanyaan dari Panelis
## 85 SEGMEN III Ma'ruf Menjawab Pertanyaan dari Panelis
## 86 SEGMEN III Ma'ruf Menjawab Pertanyaan dari Panelis
## 87 SEGMEN III Ma'ruf Menjawab Pertanyaan dari Panelis
## 88 SEGMEN III Jokowi Menjawab Pertanyaan dari Panelis
## 89 SEGMEN III Prabowo Menjawab Pertanyaan dari Panelis
## 90 SEGMEN III Prabowo Menjawab Pertanyaan dari Panelis
## 91 SEGMEN III Jokowi Menjawab Pertanyaan dari Panelis
## 92 SEGMEN III Jokowi Menjawab Pertanyaan dari Panelis
## 93 SEGMEN III Panelis Menjawab Pertanyaan dari Panelis
## 94 SEGMEN III Prabowo Menjawab Pertanyaan dari Panelis
## 95 SEGMEN III Prabowo Menjawab Pertanyaan dari Panelis
## 96 SEGMEN III Sandi Menjawab Pertanyaan dari Panelis
## 97 SEGMEN III Sandi Menjawab Pertanyaan dari Panelis
## 98 SEGMEN III Ma'ruf Menjawab Pertanyaan dari Panelis
## 99 SEGMEN III Ma'ruf Menjawab Pertanyaan dari Panelis
## 100 SEGMEN III Prabowo Menjawab Pertanyaan dari Panelis
## 101 SEGMEN III Prabowo Menjawab Pertanyaan dari Panelis
## 102 SEGMEN IV Jokowi Tanya Jawab Antarkandidat
## 103 SEGMEN IV Prabowo Tanya Jawab Antarkandidat
## 104 SEGMEN IV Prabowo Tanya Jawab Antarkandidat
## 105 SEGMEN IV Prabowo Tanya Jawab Antarkandidat
## 106 SEGMEN IV Sandi Tanya Jawab Antarkandidat
## 107 SEGMEN IV Prabowo Tanya Jawab Antarkandidat
## 108 SEGMEN IV Jokowi Tanya Jawab Antarkandidat
## 109 SEGMEN IV Jokowi Tanya Jawab Antarkandidat
## 110 SEGMEN IV Prabowo Tanya Jawab Antarkandidat
## 111 SEGMEN IV Prabowo Tanya Jawab Antarkandidat
## 112 SEGMEN IV Prabowo Tanya Jawab Antarkandidat
## 113 SEGMEN IV Sandi Tanya Jawab Antarkandidat
## 114 SEGMEN IV Sandi Tanya Jawab Antarkandidat
## 115 SEGMEN IV Jokowi Tanya Jawab Antarkandidat
## 116 SEGMEN IV Jokowi Tanya Jawab Antarkandidat
## 117 SEGMEN IV Ma'ruf Tanya Jawab Antarkandidat
## 118 SEGMEN IV Prabowo Tanya Jawab Antarkandidat
## 119 SEGMEN IV Prabowo Tanya Jawab Antarkandidat
## 120 SEGMEN IV Jokowi Tanya Jawab Antarkandidat
## 121 SEGMEN IV Jokowi Tanya Jawab Antarkandidat
## 122 SEGMEN IV Jokowi Tanya Jawab Antarkandidat
## 123 SEGMEN V Prabowo Saling Bertanya Antarkandidat
## 124 SEGMEN V Prabowo Saling Bertanya Antarkandidat
## 125 SEGMEN V Jokowi Saling Bertanya Antarkandidat
## 126 SEGMEN V Jokowi Saling Bertanya Antarkandidat
## 127 SEGMEN V Jokowi Saling Bertanya Antarkandidat
## 128 SEGMEN V Prabowo Saling Bertanya Antarkandidat
## 129 SEGMEN V Prabowo Saling Bertanya Antarkandidat
## 130 SEGMEN V Prabowo Saling Bertanya Antarkandidat
## 131 SEGMEN V Jokowi Saling Bertanya Antarkandidat
## 132 SEGMEN V Jokowi Saling Bertanya Antarkandidat
## 133 SEGMEN V Jokowi Saling Bertanya Antarkandidat
## 134 SEGMEN V Jokowi Saling Bertanya Antarkandidat
## 135 SEGMEN V Prabowo Saling Bertanya Antarkandidat
## 136 SEGMEN V Prabowo Saling Bertanya Antarkandidat
## 137 SEGMEN V Prabowo Saling Bertanya Antarkandidat
## 138 SEGMEN V Jokowi Saling Bertanya Antarkandidat
## 139 SEGMEN V Ira Koesno Saling Bertanya Antarkandidat
## 140 SEGMEN V Jokowi Saling Bertanya Antarkandidat
## 141 SEGMEN V Prabowo Saling Bertanya Antarkandidat
## 142 SEGMEN V Prabowo Saling Bertanya Antarkandidat
## 143 SEGMEN VI Jokowi PENUTUP
## 144 SEGMEN VI Jokowi PENUTUP
## 145 SEGMEN VI Jokowi PENUTUP
## 146 SEGMEN VI Prabowo PENUTUP
## 147 SEGMEN VI Prabowo PENUTUP
## 148 SEGMEN VI Prabowo PENUTUP
## 149 SEGMEN VI Prabowo PENUTUP
## TOPIK
## 1 NON-TOPIC
## 2 NON-TOPIC
## 3 NON-TOPIC
## 4 NON-TOPIC
## 5 NON-TOPIC
## 6 NON-TOPIC
## 7 NON-TOPIC
## 8 NON-TOPIC
## 9 NON-TOPIC
## 10 NON-TOPIC
## 11 NON-TOPIC
## 12 NON-TOPIC
## 13 NON-TOPIC
## 14 NON-TOPIC
## 15 NON-TOPIC
## 16 NON-TOPIC
## 17 NON-TOPIC
## 18 NON-TOPIC
## 19 NON-TOPIC
## 20 NON-TOPIC
## 21 NON-TOPIC
## 22 NON-TOPIC
## 23 NON-TOPIC
## 24 NON-TOPIC
## 25 NON-TOPIC
## 26 Hukum dan HAM
## 27 Hukum dan HAM
## 28 Hukum dan HAM
## 29 Hukum dan HAM
## 30 Hukum dan HAM
## 31 Hukum dan HAM
## 32 Hukum dan HAM
## 33 Hukum dan HAM
## 34 Hukum dan HAM
## 35 Hukum dan HAM
## 36 Hukum dan HAM
## 37 Hukum dan HAM
## 38 Hukum dan HAM
## 39 Hukum dan HAM
## 40 Hukum dan HAM
## 41 Hukum dan HAM
## 42 Hukum dan HAM
## 43 Hukum dan HAM
## 44 Hukum dan HAM
## 45 Hukum dan HAM
## 46 Hukum dan HAM
## 47 Hukum dan HAM
## 48 Hukum dan HAM
## 49 Hukum dan HAM
## 50 Hukum dan HAM
## 51 Hukum dan HAM
## 52 Hukum dan HAM
## 53 Hukum dan HAM
## 54 Hukum dan HAM
## 55 Hukum dan HAM
## 56 Hukum dan HAM
## 57 Hukum dan HAM
## 58 Hukum dan HAM
## 59 Hukum dan HAM
## 60 Hukum dan HAM
## 61 Hukum dan HAM
## 62 Hukum dan HAM
## 63 Hukum dan HAM
## 64 Hukum dan HAM
## 65 Hukum dan HAM
## 66 Korupsi dan Terorisme
## 67 Korupsi dan Terorisme
## 68 Korupsi dan Terorisme
## 69 Korupsi dan Terorisme
## 70 Korupsi dan Terorisme
## 71 Korupsi dan Terorisme
## 72 Korupsi dan Terorisme
## 73 Korupsi dan Terorisme
## 74 Korupsi dan Terorisme
## 75 Korupsi dan Terorisme
## 76 Korupsi dan Terorisme
## 77 Korupsi dan Terorisme
## 78 Korupsi dan Terorisme
## 79 Korupsi dan Terorisme
## 80 Korupsi dan Terorisme
## 81 Korupsi dan Terorisme
## 82 Korupsi dan Terorisme
## 83 Korupsi dan Terorisme
## 84 Korupsi dan Terorisme
## 85 Korupsi dan Terorisme
## 86 Korupsi dan Terorisme
## 87 Korupsi dan Terorisme
## 88 Korupsi dan Terorisme
## 89 Korupsi dan Terorisme
## 90 Korupsi dan Terorisme
## 91 Korupsi dan Terorisme
## 92 Korupsi dan Terorisme
## 93 Korupsi dan Terorisme
## 94 Korupsi dan Terorisme
## 95 Korupsi dan Terorisme
## 96 Korupsi dan Terorisme
## 97 Korupsi dan Terorisme
## 98 Korupsi dan Terorisme
## 99 Korupsi dan Terorisme
## 100 Korupsi dan Terorisme
## 101 Korupsi dan Terorisme
## 102 Tema Hukum dan HAM
## 103 Tema Hukum dan HAM
## 104 Tema Hukum dan HAM
## 105 Tema Hukum dan HAM
## 106 Tema Hukum dan HAM
## 107 Tema Hukum dan HAM
## 108 Tema Hukum dan HAM
## 109 Tema Hukum dan HAM
## 110 Tema Hukum dan HAM
## 111 Tema Hukum dan HAM
## 112 Tema Hukum dan HAM
## 113 Tema Hukum dan HAM
## 114 Tema Hukum dan HAM
## 115 Tema Hukum dan HAM
## 116 Tema Hukum dan HAM
## 117 Tema Hukum dan HAM
## 118 Tema Hukum dan HAM
## 119 Tema Hukum dan HAM
## 120 Tema Hukum dan HAM
## 121 Tema Hukum dan HAM
## 122 Tema Hukum dan HAM
## 123 Tema Korupsi Nepotisme
## 124 Tema Korupsi Nepotisme
## 125 Tema Korupsi Nepotisme
## 126 Tema Korupsi Nepotisme
## 127 Tema Korupsi Nepotisme
## 128 Tema Korupsi Nepotisme
## 129 Tema Korupsi Nepotisme
## 130 Tema Korupsi Nepotisme
## 131 Tema Korupsi Nepotisme
## 132 Tema Korupsi Nepotisme
## 133 Tema Korupsi Nepotisme
## 134 Tema Korupsi Nepotisme
## 135 Tema Korupsi Nepotisme
## 136 Tema Korupsi Nepotisme
## 137 Tema Korupsi Nepotisme
## 138 Tema Korupsi Nepotisme
## 139 Tema Korupsi Nepotisme
## 140 Tema Korupsi Nepotisme
## 141 Tema Korupsi Nepotisme
## 142 Tema Korupsi Nepotisme
## 143 NON-TOPIC
## 144 NON-TOPIC
## 145 NON-TOPIC
## 146 NON-TOPIC
## 147 NON-TOPIC
## 148 NON-TOPIC
## 149 NON-TOPIC
## TEKS
## 1 Selamat malam dan salam sejahtera untuk kita semua.
## 2 Yang kami hormati pasangan Calon Presiden dan Wakil Presiden nomor urut 01 bapak haji Joko Widodo dan bapak Kyai Haji Ma'ruf Amin. Yang kami hormati, Pasangan Calon Presiden dan Wakil Presiden nomor urut 02, bapak haji Prabowo Subianto dan bapak Haji Sandiaga Salahuddin Uno sekalian yang berbahagia.
## 3 Malam ini menjadi salah satu malam yang bersejarah bagi bangsa Indonesia. Untuk pertama kalinya kita menyelenggarakan kampanye debat Pasangan Calon Presiden dan Wakil Presiden bersamaan dengan gegap gempitanya jadwal kampanye Pemilu Legislatif.
## 4 Masing-masing Pasangan calon akan diberikan kesempatan yang sama untuk memaparkan visi misi dan program mereka secara mendalam tentang hukum, HAM, korupsi dan terorisme.
## 5 Tidak hanya penting dan strategis bagi Pasangan calon presiden dan wakil presiden, tetapi juga bagi pemilih yang berdaulat memilih akan memiliki kesempatan yang luas untuk memahami dan menjadikan pemaparan pasangan Calon Presiden dan Wakil Presiden malam ini sebagai salah satu referensi penting, saat menggunakan hak konstitusionalnya pada hari pemungutan suara tanggal 17 April 2019.
## 6 Debat yang dilaksanakan malam ini sangat strategis untuk mendukung cita-cita mewujudkan pemilu yang berintegritas dan berkualitas. Itu biasa, perbedaan pendapat adalah keniscayaan dalam demokrasi yang bermanfaat. Pemilih berdaulat, negara kuat, selamat menikmati debat.
## 7 Wassalamualaikum warahmatullahi wabarakatuh
## 8 Bismillahirohmannirohim, Assalamualaikum warahmatullahi wabarakatuh.
## 9 Selamat malam, salam sejahtera bagi kita semuanya. Om Swastiastu, namo buddhaya, salam kebajikan.
## 10 Bapak Ibu saudara-saudara sekalian, seluruh rakyat Indonesia yang saya cintai, pimpinan KPU dan Bawaslu. Yang saya hormati bapak Prabowo Subianto, dan bapak sandiaga Uno kawan baik saya. Yang saya hormati Bapak Kyai Haji Ma'ruf Amin.
## 11 Bapak ibu yang saya hormati, visi kami adalah hidup bisa maju. Kami menawarkan optimisme dan masa depan Indonesia yang berkeadilan.
## 12 Saya berkeyakinan, semakin maju, semakin demokratis dan modern sebuah negara, maka penegakan hukum dan HAM akan semakin baik. Bukan hanya hak sipil dan politik yang penting. Tetapi pemenuhan hak ekonomi, hak sosial dan budaya menjadi pilihan kami untuk memajukan Indonesia.
## 13 Seperti akses terhadap lahan, akses terhadap pendidikan, akses terhadap pelayanan kesehatan, akses permodalan, dan hak atas pembangunan merupakan cara pemenuhan Hak Asasi Manusia yang paling dasar. Memang kita masih memiliki beban pelanggaran HAM berat masa lalu, tidak mudah menyelesaikannya. Karena masalah kompleksitas hukum, masalah pembuktian dan waktu yang terlalu jauh.
## 14 Harusnya ini sudah selesai setelah peristiwa itu terjadi. Tapi kami tetap berkomitmen untuk menyelesaikan masalah HAM ini. Dan untuk menjamin hak-hak tersebut negara harus didukung oleh sistem hukum yang adil dan penegakan supremasi hukum yang baik, melalui reformasi kelembagaan, dan penguatan sistem manajemen hukum yang baik dan budaya taat hukum yang harus terus kita perbaiki.
## 15 Dan hukum harus ditegakkan tanpa pandang bulu. Hukum harus ditegakkan tanpa pandang bulu. Penegakan hukum yang tegas merupakan bagian dari upaya pemberantasan korupsi, yang terus kita lakukan melalui perbaikan sistem pemerintahan dan bekerjasama menguatkan KPK serta mendorong sinergi antara KPK dengan Kejaksaan dan Kepolisian.
## 16 Dan terakhir, kita tetap harus waspada terhadap ancaman terorisme. Pemerintah terus bekerja keras, pendekatan penegakan hukum yang tegas dan pendekatan yang persuasif lewat pembinaan agama, ekonomi, dan sosial.
## 17 Bismillahirromanirrohim. Assalamualaikum warahmatullahi wabarakatuh, salam sejahtera bagi kita sekalian. Shalom om swastiastu, namo buddhaya.
## 18 Hadirin hadirot yang saya hormati. Calon nomor satu yang saya hormati dan saya banggakan, serta saudara sekalian.
## 19 Visi misi kami, kami beri nama Indonesia Menang. Indonesia menang karena sekarang kita rasakan indikator-indikator menunjukkan bahwa kita berada dalam kondisi yang tidak begitu menguntungkan.
## 20 Di dunia ini ada 200 negara kurang lebih, 30 disebut sangat berhasil, 30 sangat tidak berhasil dan miskin, sisanya berada di tengah-tengah. Ciri khas negara yang berhasil adalah harus swasembada pangan, air bersih. Dan juga lembaga-lembaga pemerintahan harus kuat, terutama lembaga-lembaga penegak hukum. Hakim jaksa dan polisi harus unggul, dan harus baik, dan harus tidak boleh sama sekali diragukan integritasnya. Karena itu kami dalam menghadapi masalah hukum, masalah korupsi, masalah HAM, dan masalah terorisme, kami ingin menyelesaikan dari muara masalah.
## 21 Muara masalah menurut kami adalah adalah, kita harus menjamin kualitas hidup semua petugas yang punya wewenang mengambil keputusan, sehingga dia tidak bisa dikorupsi. Dia tidak bisa tergoda oleh godaan-godaan koruptor atau yang akan menyokong dan akan mempengaruhi dia. Ini strategi kami. Kita bisa mengatasinya secara represif, tapi menurut kami masalahnya harus berakar dari akar masalah.
## 22 Kita harus gaji hakim kita begitu hebat, sehingga dia tidak akan terpengaruh, demikian jaksa, demikian polisi. Untuk itu kita harus menguasai sumber-sumber ekonomi bangsa Indonesia.
## 23 Itu saya kira strategi utama kita. Kita yakin dengan lembaga-lembaga yang bersih, yang kuat, kita bisa menegakkan kepastian hukum. Hukum untuk semua, bukan bukan hukum untuk orang-orang kuat atau orang-orang kaya saja. Saya kira itu tekad kami. Keadilan untuk semua, keamanan untuk semua, kemakmuran untuk semua.
## 24 Sandiaga: Hukum yang tidak tebang pilih, tidak tajam ke bawah, tapi tumpul ke atas. Hukum yang menghadirkan kepastian, sehingga bisa membuka peluang ekonomi, menciptakan lapangan kerja.
## 25 Juga kita pastikan hukum tersebut menghadirkan rasa keadilan bagi masyarakat. Banyak masyarakat yang masih mengeluh, dan itu PR kita. Dan bersama Prabowo sandi insyaallah kita tegakkan hukum, kita pastikan tidak ada korupsi lagi.
## 26 Kepastian hukum sangat penting bagi warga, pelaku usaha, dan jalannya pemerintahan. Namun ternyata banyak peraturan Perundang-Undangan yang tumpang tindih, serta tidak harmonisnya peraturan di tingkat pusat serta daerah. Apa strategi Anda untuk menyelesaikan masalah tersebut?
## 27 Kami akan menegakkan badan pembinaan hukum nasional, kami akan perkuat dengan pakar-pakar hukum yang terbaik, untuk melakukan sinkronisasi, penyelarasan sehingga Undang-Undang, peraturan peraturan di pusat tidak bertabrakan dengan peraturan-peraturan di daerah.
## 28 Ini sulit, ini pekerjaan besar, tapi harus kita lakukan supaya ada kepastian hukum. Supaya semuanya tahu sistem hukum di Indonesia, dan hukum itu bekerja untuk semuanya.
## 29 Partisipasi publik juga sangat penting. Kami akan melibatkan para ahli, baik dari universitas di pusat maupun di daerah. Karena banyak sekali produk-produk hukum ini juga diterbitkan oleh pemerintah daerah maupun DPRD. Jadi kami akan memastikan bahwa pekerjaan besar ini harus dipimpin oleh pemimpin utama yaitu Presiden dan Wakil Presiden.
## 30 Kami akan bertanggungjawab untuk memastikan harmonisasi dan sinkronisasi ini bisa menghadirkan kepastian hukum. Sehingga, kepastian hukum itu bisa dirasakan menghadirkan keadilan, bukan hanya untuk orang kaya, tapi juga untuk seluruh lapisan masyarakat.
## 31 Kami ingin juga pastikan bahwa hukum itu bisa menghadirkan satu peluang untuk berinvestasi. Untuk membuka lapangan kerja. Negeri yang kaya raya ini, negeri yang luar biasa gemah ripah loh jinawi ini masih menyisakan banyak masalah. Lapangan kerja susah didapat, peluang usaha susah dilakukan oleh masyarakat karena ketidak pastian hukum.
## 32 Di bawah Prabowo-Sandi, hukum harus ditegakkan dan dalam waktu yang singkat harus kita sinkronkan dan ciptakan harmonisasi. Kepastian hukum akan meningkatkan investasi, lapangan kerja akan tercipta, kesejahteraan akan dirasakan oleh masyarakat. Kami berkomitmen kepastian hukum ini akan menjadi prioritas di bawah Indonesia Menang.
## 33 Prabowo-Sandi, adil makmur di periode 2019-2024.
## 34 Kami berbeda dengan Pak Prabowo dan Pak Sandi. Penting sekali harmonisasi regulasi kita. Oleh sebab itu kami akan menggabungkan fungsi-fungsi legislasi. Baik yang ada di GBHN, di Dirjen Perundang-Undangan, dan fungsi-fungsi legislasi yang ada di semua kementerian.
## 35 Akan kita gabungkan dalam badan yang namanya Pusat Legislasi Nasional. Sehingga kontrol langsung oleh presiden, satu pintu, sehingga tidak terjadi tumpang tindih. Perda-Perda yang ada di daerah-daerah juga harus berkonsultasi, agar tidak tumpan tindih. Konsultasi ke Pusat Legislasi Nasional. Yang kedua, akan kita sederhanakan semuanya. Sehingga apabila ada tumpang tindih, langsung kelihatan dan bisa kita lakukan revisi dengan baik.
## 36 Kalau saya kok tidak lihat perbedaannya. Karena memang pemerintah yang bertanggung jawab untuk melaksanakan penyelarasan dan juga untuk melakukan perbaikan, kemudian juga menghasilkan produk-produk itu. Ini tugas pemerintah.
## 37 Pemerintah adalah, presiden adalah Vice Law Enforcement Officer. Adalah penanggung jawab pelaksanaan dan penegakan hukum. Itu tanggung jawab Presiden. Jadi saya tidak mempersoalkan itu. Tapi yang jelas kenyataannya sekarang tumpang tindih, menumpuk begitu banyak peraturan.
## 38 Perlu ada bantuan pakar-pakar untuk membantu pemerintah. Mempercepat ini masalah semua. Kita ingin percepatan urusan. Selalu di Indonesia masalah terlalu banyak, masalah terbesar. Kita ingin terobosan-terobosan, itu jawaban saya
## 39 Di masyarakat kerap dipertentangkan antara ketegasan penegakan hukum dengan isu HAM. Dalam konteks seperti apa penegakan hukum harus dikedepankan, dan dalam konteks apa HAM yang harus mendapat perhatian. Jawaban harap menuju pada kasus-kasus konkret agar dapat secara jelas menggambarkan permasalahan yang dihadapi.
## 40 Jangan mempertentangkan antara HAM dan penindakan hukum. Penindakan hukum yang sesuai dengan prosedur, itu bukan pelanggaran HAM. Misalnya penahanan terhadap tersangka, memang itu merampas kemerdekaan seseorang. Tapi penegakan hukum itu melindungi masyarakat. Jadi kalau ada tersangka korupsi misalnya, ditahan, itu bukanpelanggaran HAM. Itu memang prosedur dan kita ingin aparat kita tahu bahwa itu dilakukan agar misalnya tersangka tidak menghilangkan barang bukti.
## 41 Yang kedua, mungkin calon tersangka tidak melarikan diri. Dan jika ada pelanggaran hukum, yang melanggar prosedur, penindakan hukum yang melanggar prosedur. Silakan, ada mekanisme yang bisa kita tempuh, lewat praperadilan misalnya. Jadi sekali lagi jangan dipertentangkan antara penegakan hukum dan HAM. Mungkin pak kyai [Ma'ruf] bisa menambahkan.
## 42 Ya saya sudah menambah. Saya mendukung pernyataan Pak Jokowi.
## 43 Kami ingin bertanya, bahwa bapak kan sudah memerintah selama empat tahun lebih. Yang kita ketemukan ada perasaan di masyarakat bahwa kadang-kadang aparat itu berat sebelah.
## 44 Sebagai contoh kalau ada kepala daerah, gubernur gubernur yang mendukung paslon nomor satu itu menyatakan dukungan tidak apa-apa. Tapi ada kepala desa di Jawa Timur menyatakan dukungan kepada kami, sekarang ditahan pak, ditangkap. Jadi saya kira ini juga suatu perlakuan tidak adil, juga menurut saya pelanggaran HAM, karena menyatakan pendapat itu dijamin oleh undang-undang dasar pak. Jadi sebetulnya siapapun boleh menyatakan pendapat, dukungan siapapun. Saya kira ini yang kami mohon Bapak perhitungkan, mungkin juga ada anak buah bapak yang mungkin berlebihan.
## 45 Ya jangan menuduh seperti itu Pak Prabowo. Karena kita ini adalah negara hukum, ada prosedur hukum, ada mekanisme hukum yang bisa kita lakukan. Kalau ada bukti sampaikan saja ke aparat hukum. Jangan kita ini, kita ini sering grusa-grusu untuk menyampaikan sesuatu. Misalnya apa jurkamnya Pak Prabowo, misalnya ini, katanya dianiaya, mukanya babak belur. Kemudian konferensi pers bersama-sama, akhirnya apa yang terjadi? Ternyata operasi plastik. Ini negara hukum, kalau ada bukti-bukti, silakan lewat mekanisme hukum. Laporkan dengan bukti-bukti yang ada. Gampang sekali kok. Gampang sekali. Negara hukum ini. Kenapa harus menuduh-nuduh seperti itu.
## 46 Indonesia adalah negara yang sangat beragam dari sisi agama, etnis, golongan, dan pandangan politik. Namun dalam kenyataan masih terjadi diskriminasi dan persekusi. Dari sisi HAM, apa strategi Anda untuk mengatasi masalah masalah ini?
## 47 Tadi saya sudah katakan, dalam sistem bernegara seorang kepala negara disebut vice excecutive, kepala eksekutif. Berarti seorang kepala negar. Presiden adalah, tadi saya sebut Vice Law Enforcement Officer. Dia adalah petugas penegak hukum yang tertinggi di negara ini.
## 48 Karena itu saya akan menatar seluruh aparat penegak hukum, saya akan instruksikan, saya akan tegaskan bahwa tidak boleh diskriminasi terhadap suku apapun, agama apapun, etnis apapun. Jadi intinya adalah, aparat itu tanggung jawab kepala eksekutif. Jadi kita harus jamin kalau ada pejabat yang menyimpang saya akan pecat.
## 49 Dalam kunjungan ke seribu titik, lokasi, bertemu masyarakat saya menemukan hal-hal yang sangat membuat kita miris. Bahwa ada Kisah Pak Najib, seorang nelayan di pantai pasir putih Cilamaya, di Karawang. Beliau mengambil pasir untuk menanam di mangrove, di hutan bakau. Beliau dipersekusi, dikriminalisasi.
## 50 Banyak persekusi dan kriminalisasi ini tidak terpantau, dan hanya kita lihat yang besar-besar saja yang naik. Sementara kasus-kasus yang berdampak kepada masyarakat, orang-orang kecil, wong cilik tidak ditangani dengan baik.
## 51 Di bawah Prabowo-Sandi hukum harus ditegakkan untuk rakyat kecil. Kita harus menghadirkan kesejahteraan kepada mereka, jangan hukum ini dipakai untuk memukul lawan, tapi melindungi kawan.
## 52 Kita pastikan hukum ini tegak lurus. Supremasi HAM harus kita pastikan hadir di Indonesia. Di bawah Prabowo-Sandi HAM akan kita tegakkan, dan ini harga mati buat kita. Adil makmur bersama Prabowo-Sandi.
## 53 Keragaman, perbedaan-perbedaan, baik beda suku, beda agama, beda tradisi, beda bahasa daerah adalah sudah menjadi sunnatullah. Sudah menjadi hukum Allah yang diberikan kepada bangsa kita Indonesia. Dan aset terbesar bangsa ini adalah persaudaraan. Aset terbesar bangsa ini ada persatuan. Aset terbesar bangsa ini adalah kerukunan.
## 54 Oleh sebab itu saya selalu mengajak, marilah kita menjaga ukhuwah islamiyah kita, menjaga ukhuwah fathoniyah kita. Karena persatuan, persaudaraan adalah aset terbesar bangsa yang kita cintai ini. Kalau memang ada persekusi, tadi Pak Sandi nuduh-nuduh lagi. Ya, gampang sekali. Laporkan. Saya akan perintahkan tindak tegas pelaku tersebut.
## 55 Pak presiden yang saya hormati, saya tidak menuduh.Yang kami sampaikan adalah cerita-cerita yang kami tampung dalam kunjungan kita bertemu dengan masyarakat.
## 56 Kami ingin menghadirkan rasa keadilan bagi masyarakat, hak asasi manusia kita pikir definisi-definisi yang besar. Tapi untuk masyarakat kecil itu adalah hak mendapatkan lapangan pekerjaan.
## 57 Seperti dijamin oleh konstitusi kita, Undang-Undang Dasar 45 pasal 27 ayat 2. Bahwa setiap masyarakat wajib mendapatkan lapangan pekerjaan yang layak. Itu yang ingin kami hadirkan.
## 58 Kami ingin buka lapangan kerja seluas-luasnya. Rakyat berjuang untuk mendapatkan penghidupan yang lebih layak. Mereka menginginkan mata pencaharian dan biaya yang terjangkau. Prabowo-Sandi akan berpihak kepada rakyat. Prabowo-Sandi akan memastikan bahwa HAM juga mencakupi akses terhadap pendidikan, terhadap kesehatan, dan terhadap mata pencaharian yang baik. Demikian bapak presiden.
## 59 Kelompok penyandang disabilitas masih sering mengalami diskriminasi terkait dengan kesejahteraan fasilitas publik, serta hak-hak politik. Bagaimana anda memahami itu disabilitas, dan apa program anda untuk memastikan pemenuhan hak-hak penyandang disabilitas?
## 60 Setelah keluar Undang-Undang mengenai penyandang disabilitas di tahun 2016, saya melihat bahwa paradikma terhadap kaum disabilitas ini sudah berubah. Yang sebelumnya adalah bantuan sosial, adalah kedermawanan, yang harus kita berikan kepada mereka, tetapi yang sekarang dengan undang-undang yang baru, kita melihat paradigmanya adalah pemenuhan hak-hak. Pemerintah, kita sudah memberikan fasilitas-fasilitas untuk pemenuhan hak itu. Baik pemenuhan hak untuk pekerjaan, untuk perumahan, untuk fasilitas umum yang ramah terhadap disabilitas, meskipun juga baru beberapa kota, tetapi sudah kita mulai.
## 61 Kemudian juga yang berkaitan dengan kesetaraan, bisa saya berikan contoh. Di dalam event Asian para games, ini event disabilitas terbesar di Asia. Kita juga memberikan bonus yang sama dengan atlet yang berlaga di Asian Games. Contoh misalnya, yang mendapatkan emas dapat dapat 1,5 milyar. Yang dapat perak bisa kita berikan bonus 500 juta. Yang dapat perunggu kita berikan bonus 250 juta. Sama seperti atlet-atlet yang berlaga di Asian Games. Artinya bahwa kesetaraan itu betul-betul kita berikan kepada kaum disabilitas yang mulai sekarang ini kita terus perhatikan mereka.
## 62 Zulfan Dewantara. Seorang teman difabel, yang kami temui adalah inspirasi Prabowo-Sandi. Beliau bukan mencari lapangan kerja, tapi menciptakan lapangan kerja. Beliau menjadi mentor bisnis online dari ratusan murid. Kesetaraan tadi bukan hanya kesetaraan akses infrastruktur, atau akses terhadap pendidikan dan kesehatan. Tetapi juga akses untuk bisa maju, mendapat peluang untuk membuka lapangan pekerjaan.
## 63 Prabowo-Sandi berkomitmen, kita akan memastikan putra-putri terbaik bangsa yang difabel hidup untuk memenuhi potensinya. Mereka bukan menjadi beban sama sekali. Mereka tidak butuh belas kasihan. Mereka butuhkan kesetaraan. Memastikan agar mereka bisa mendapatkan peluang lapangan pekerjaan. Peluang untuk hidup yang lebih baik, dan peluang untuk menjadikan keluarga mereka menjadi keluarga yang sejahtera. Terima kasih.
## 64 Ya saya kira contoh-contoh seperti yang dikatakan Pak Sandi tadi banyak sekali. Tidak hanya di satu bidang, tapi banyak bidang. Kaum disabilitas itu betul-betul sekarang ini sudah setara. Artinya kita sangat menghargai semua prestasi yang telah mereka kerjakan dan juga hasil-hasil, karya yang telah mereka kerjakan. Saya tadi, apa yang disampaikan Pak Sandi mirip-mirip dengan yang sudah saya sampaikan tadi.
## 65 Saya kira yang penting lagi membangun budaya masyarakat untuk memberikan penghormatan kepada kelompok disabilitas. Menyamakan perlakuannya baik disabilitas maupun non-disabilitas. Nabi sendiri pernah ditegur oleh Allah .... [waktu habis].
## 66 Untuk menduduki jabatan publik, seringkali dibutuhkan biaya yang sangat tinggi, sehingga setelah menduduki jabatan perilaku korupsi kerap tidak terhindarkan. Apa strategi Anda untuk mengatasi politik berbiaya tinggi Ini?
## 67 Prinsipnya rekrutmen itu harus berbasis pada kompetensi, bukan finansial dan bukan nepotisme. Oleh sebab itu, untuk pejabat-pejabat birokrasi, rekrutmen harus dilakukan transparan, sederhana, dengan standar-standar yang jelas. Dan untuk jabatan-jabatan politik, perlu sebuah penyederhanaan sistem, di dalam sistem kepartaian kita. Sehingga Pemilu menjadi murah.
## 68 Pejabat-pejabat tidak terbebani biaya Pemilu. Sehingga kita harapkan kita bisa memangkas politik uang, bisa memangkas suap, bisa memangkas korupsi, dan kita bisa mendapatkan pejabat-pejabat publik yang memiliki integritas, yang memiliki kapasitas yang baik. Dan kita harapkan dengan rekrutmen-rekrutmen ini, jabatan-jabatan baik itu Bupati, baik itu Wali Kota, Gubernur, dan seterusnya kita akan mendapatkan putra-putri terbaik. Karena memang rekrutmennya berjalan dengan transparan, akuntabel, dan bisa semua orang melihat.
## 69 Dan sekarang memang sudah kita lakukan. Contoh, rekrutmen ASN atau PNS kita. Semua berjalan dengan transparan, akuntabel, dan semua orang bisa cek. Anak saya tidak bisa diterima di situ, karena memang tidak lulus. Terima kasih.
## 70 Jadi kalau kami menilai bahwa perlu ada langkah-langkah yang lebih praktis, konkret, dan segera. Sebagai contoh bagaimana bisa seorang gubernur gajinya hanya delapan juta. Kemudian dia mengelola provinsi, umpamanya Jawa Tengah, yang lebih besar dari Malaysia. Dengan APBD yang begitu besar.
## 71 Jadi ini hal-hal yang tidak realistis. Jadi saya kira seorang kepala pemerintah, eksekutif, kalau benar-benar niat memperbaiki itu, kita harus segera berani melakukan terobosan-terobosan supaya penghasilan para pejabat publik itu sangat besar. Kemudian kita potong semua kebutuhan-kebutuhan kampanye. Sebagai contoh TV adalah milik rakyat, dunia maya. Jadi nggak boleh perlu banyak bayar, untuk muncul di TV-TV, demikian juga radio, baliho-baliho... [waktu habis]
## 72 Ya tadi sudah saya sampaikan bahwa rekrutmen yang berdasarkan kompetensi, bukan finansial itu menjadi kunci. Tapi kan contoh, saya sendiri, pada saat pemilihan Wali Kota, saya betul-betul menggunakan anggaran begitu sangat kecil. Ke partai pun, waktu pemilihan Gubernur di DKI Jakarta saya tidak mengeluarkan uang sama sekali.
## 73 Pak Prabowo pun juga tahu mengenai itu. Ketua partai pendukung pun juga tahu mengenai itu. Tetapi memang ini sekali lagi memerlukan sebuah proses yang panjang. Memerlukan proses yang panjang. Artinya apa? Pergerakan politik itu bisa dimulai dari relawan. Bisa dimulai dari keinginan publik untuk mendapatkan pemimpin-pemimpin yang baik tanpa mengedepankan finansial.
## 74 Birokrasi merupakan ujung tombak negara untuk memenuhi hak-hak warga dan pembenahan birokrasi merupakan salah satu upaya untuk memberantas korupsi. Bagaimana langkah-langkah anda untuk mewujudkan birokrasi yang bebas dari korupsi?
## 75 Berkali-kali saya sampaikan di ruang publik. Akar masalahnya adalah bahwa penghasilan para pegawai negeri, para birokrat-birokrat itu kurang. Tidak realistis. Kalau saya memimpin pemerintahan, saya akan perbaiki kualitas hidup semua birokrat dengan realistis. Kemudian bertanya, uangnya dari mana? Saya akan tingkatkan tax ratio yang sekarang berada di 10 persen, bahkan lebih rendah.
## 76 Saya akan kembalikan ke minimal ke minimal 16 persen tax ratio. Berarti kita akan dapat mungkin minimal 60 milyar dolar lebih. Dengan demikian saya akan perbaiki gaji-gaji semua pejabat, birokrat, dan semua pegawai negeri.
## 77 Saya kira dengan kita tingkatkan gajinya dengan signifikan, perbaiki kualitas hidup, jamin kebutuhan-kebutuhan dia. Kalau dia masih korupsi, ya kita harus tindak sekeras-kerasnya. Ya kalau perlu kita contoh tindakan-tindakan drastis negara-negara lain. Kita taruh di mana, mungkin di pulau yang terpencil. Suruh tambang pasir terus-menerus mungkin.
## 78 Jadi kita perbaiki penghasilannya. Itu yang kita perlukan. Tidak tidak masuk akal, pejabat begitu penting penghasilannya sedikit. Tetapi sesudah itu kita awasi dengan ketat, dengan segala senjata, instrumen, perangkat yang kita miliki. Inspektorat, pengawasan-pengawas. Tadi saya sebut kejaksaan, polisi, KPK. Kami akan perkuat KPK. Kami akan bikin KPK di daerah-daerah, di provinsi-provinsi. Kami akan tambah anggaran KPK. KPK harus menjadi penegak, antikorupsi di Republik Indonesia ini.
## 79 Benahi pencatatan aset negara. Penting.
## 80 Saya tidak setuju apa yang tadi disampaikan oleh Pak Prabowo. Karena kita tahu gaji ASN kita, PNS kita saat ini menurut saya cukup. Dengan tambahan tunjangan kinerja yang sudah besar. Yang penting kalau menurut saya sekarang adalah perampingan birokrasi.
## 81 Kemudian ada merit system. Rekrutmen putra-putri terbaik melalui merit system, mutasi dan promosi sesuai dengan kompetensi, sesuai dan integritas, sesuai dengan prestasi, sesuai dengan rekam jejak. Kemudian juga ada pengawasan internal yang kuat. Ini penting sekali pengawasan internal. Dan juga tentu saja pengawasan eksternal, baik dari masyarakat, baik dari media, saya kira ini penting sekali. Baik dari Komisi ASN. Penting sekali pengawasan internal ini bagi perbaikan untuk birokrasi yang bersih. Terima kasih.
## 82 Ya saya kira, terus masalahnya yang saya lihat, saya pelajari dari banyak negara, adalah tadi walaupun aja tuh, jangan ada macam-macam yang disebut untuk kinerja. Tapi tetap ada ketakutan para birokrat akan masa depan mereka. Jadi di situlah terjadi sikap ragu-ragu, dan sikap tidak kuat mendapat godaan, tawaran-tawaran dari swasta untuk bertindak di luar kepentingan rakyat, kepentingan umum.
## 83 Yah, dengan membenahi pencatatan aset negara, saya pengalaman waktu di DKI bahwa kita bisa mendapatkan predikat wajar tanpa pengecualian. Itu digunakan dengan memotivasi para ASN, menggunakan teknologi informasi. Kalau kita sudah tahu aset kita, mungkin akan lebih sulit untuk dikorupsi ke depannya.
## 84 Pemberantasan terhadap terorisme seringkali berbenturan dengan isu Hak Asasi Manusia. Bagaimana strategi Anda agar pemberantasan terorisme bisa benar-benar dijalankan, tanpa ada persepsi dari masyarakat tentang terjadinya pelanggaran HAM. Harap jawab, dapat merujuk pada kasus-kasus yang konkret agar dapat secara jelas menggambarkan permasalahan yang dihadapi.
## 85 Terorisme adalah merupakan kejahatan. Oleh karena itu, terorisme harus diberantas sampai ke akar-akarnya. Majelis Ulama Indonesia telah mengeluarkan fatwa bahwa terorisme bukan jihad. Oleh karena itu haram dilakukan, bahkan terorisme dianggap melakukan kerusakan, ifsad. Dalam Alquran dinyatakan bahwa orang yang melakukan perusakan di bumi harus dihukum dengan keras, dengan berat.
## 86 Oleh karena itu upaya-upaya menanggulangi terorisme harus dilakukan dengan dua cara: mensinergikan cara pencegahan dan penindakan. Ke depan kami lebih mengutamakan pencegahan melalui kontra-radikalisme untuk menghilangkan atau menekan, faham-faham radikal dan intoleran. Dan melalui deradikalisasi untuk mengembalikan mereka yang sudah terpapar.
## 87 Untuk itu di dalam melakukan tindakan kami juga akan melakukan pendekatan yang humanis, yang manusiawi, dengan tidak harus melanggar HAM, Hak Asasi Manusia. Untuk itu dalam menanggulangi terorisme di masa yang akan datang kami akan mengajak ormas-ormas, organisasi masyarakat khususnya organisasi keagamaan.
## 88 Saya melihat bahwa aparat harus diberi pengetahuan mengenai HAM.
## 89 Jadi waktu saya masih muda, saya spesialisasinya adalah di bidang antiteror. Saya yang bentuk, bersama dengan Pak Luhut Panjaitan, pasukan antiteror yang pertama. Jadi saya mengerti, saya paham. Masalahnya adalah, karena pengalaman saya itu, saya mengetahui bahwa seringkali terorisme ini adalah dikirim dari negara lain. Dan sering juga dibuat nyamar. Seolah-olah teroris itu dari orang Islam, padahal itu sebetulnya dia itu bukan dikendalikan oleh orang yang mungkin juga bukan orang Islam. Mungkin juga orang asing, ataupun bekerja untuk orang asing. Saya mengerti benar-benar.
## 90 Jadi, stigmatisasi bahwa seolah-olah radikal itu selalu dicap kepada orang Islam, saya menolak itu. Saya setuju deradikalisasi, saya dukung usaha-usaha kemanusiaan.
## 91 Ya negara kita ini sudah banyak dijadikan contoh oleh negara-negara lain dalam menangani terorisme. Kita tidak hanya melalui pendekatan-pendekatan hukum yang tegas. Tetapi juga ada pendekatan yang persuasif, melalui pembinaan agam, pembinaan ekonomi dan sosial. Tetapi yang paling penting menurut saya aparat harus dibekali pengetahuan mengenai HAM.
## 92 Aparat harus tahu mengenai HAM. SOP juga harus berbasis HAM. Dan Undang-Undang terorisme yang sudah ada di 2018 yang lalu itu juga menitikberatkan pada pencegahan. Pada pendekatan sosial. Pada pendekatan ekonomi. Pada pendekatan budaya. Pada pendekatan keagamaan. Dan juga yang lebih penting, juga ada transparansi saat proses penindakan. Sehingga menjadi jelas.
## 93 Terorisme dan radikalisme demakin menjadi ancaman. Karena itu dibutuhkan langkah pencegahan dan deradikalisasi. Hal ini bukan hanya bagi individu yang sudah terpapar paham terorisme dan keluarganya, tetapi juga lingkungan yang menjadi lahan subur berkembangnya paham ini. Apa strategi Anda untuk menjalankan program pencegahan dan deradikalisasi yang efektif?
## 94 Tadi saya sebut bahwa banyak terorisme yang merupakan penyusupan dari luar, yang terus ke dalam negeri, menurut pendapat saya adalah akibat rasa ketidakadilan. Rasa keputusasaan. Mereka melihat perlakuan yang tidak baik, tidak benar. Mereka merasa tersakiti. Dengan demikian mereka bisa dipengaruhi oleh pengajar-pengajar ataupun paham-paham yang radikal dan mengarah pada kekerasan.
## 95 Jadi saya sangat mendukung setiap usaha deradikalisasi pendidikan. Untuk itu prabowo-sandi, manakala kita yang memimpin pemerintahan, kita akan benar-benar investasi besar-besaran dalam pendidikan, dalam kesehatan. Untuk membantu rakyat yang paling bawah, rakyat paling miskin. Kita akan bantu pesantren-pesantren, madrasah-madrasah, guru-guru di mana-mana harus kita perbaiki kapasitasnya. Kualitas hidupnya. Dengan demikian mereka yang akan bisa mempengaruhi pendidikan, pengajaran, pembangunan iklim yang terbaik untuk suasana, tidak putus asa. Suasana tidak merasa tidak merasa benci, tidak merasa tersakiti.
## 96 Ya, kita juga harus melihat program-program kontra-radikalisasi pada masyarakat luas. Bagaimana kita melakukan kontrak-ideologi, kontra-narasi, dan juga kita lakukan kontra-propaganda. Banyak sekali masyarakat yang tidak bisa merasakan masa depan yang cerah, akhirnya terpapar karena kebutuhan ekonominya.
## 97 Oleh karena itu Prabowo-Sandi akan melihat peta-peta di mana risiko ini timbul. Berdasarkan ideologi, motivasi, dan psikologinya. Kita harus hadir untuk mereka untuk memastikan mereka tidak terjerumus pada terorisme. Itu yang menjadi komitmen adil makmur bersama Prabowo-Sandi
## 98 Deradikalisasi itu, dari mereka yang sudah terpapar, mengembalikan ke jalan yang lurus. Oleh karena itu caranya adalah, apa yang menyebabkan dia menjadi radikal. Kalau itu karena paham keagamaan yang menyimpang, maka yang harus kita doktrinkan, bagaimana meluruskan paham keagamaannya, yang menyimpang itu.
## 99 Tetapi kalau itu disebabkan oleh faktor-faktor ekonomi, sosial, maka pendekatannya adalah melalui pemberian lapangan kerja, dan juga santunan yang bisa mengembalikan mereka ke jalan yang lurus. Saya kira ini yang harus kita kaji betul, kenapa dia menjadi radikal.
## 100 Ya, tadi sudah kita singgung ya, sebab musabab terorisme. Dan untuk itu Indonesia, negara kita harus kuat. Kita harus kuat, dan tadi kita harus swasembada pangan, tidak boleh tergantung bangsa lain. Energi, air, dan kekuatan Angkatan Perang kita harus kuat. Polisi kita harus kuat. Intelijen kita harus kuat.
## 101 Kita harus bisa mendeteksi sebelum terjadi terorisme. Jangan menunggu. Ini perlu investasi. Ini perlu. Saya merasa bahwa ya, ini bukan salah siapa-siapa. Mungkin kelengahan banyak pemerintah, tetapi saya akan meningkatkan investasi di bidang polisi, intelijen, dan angkatan bersenjata, angkatan perang kita harus kita perkuat. Supaya kita bisa tahan, kita bisa mendahului, mencegah terorisme.
## 102 Terima kasih. Dalam visi-misi Bapak menyebutkan bahwa setiap kebijakan akan berperspektif gender dan pemberdayaan perempuan. Akan memprioritaskan pemberdayaan perempuan. Tapi saya melihat dalam struktur kepengurusan partai yang bapak pimpin, jabatan-jabatan strategis seperti Ketua Umum, Ketua Dewan Pembina, Ketua Dewan Penasehat, Ketua Dewan Pakar, Ketua Harian, Wakil Ketua Harian, Sekjen, Bendahara semuanya laki-laki. Bagaimana bapak menjawab inkonsistensi ini?
## 103 Baik, saya ingin jelaskan partai kami adalah partai muda, partai baru. Kami baru berdiri kurang lebih 10 tahun, dan pada saat penyusunan tentunya kita memilih dan menunjuk siapa yang paling pertama dan paling mau untuk muncul.
## 104 Tetapi, benar yang bapak sebut, tapi yang di eselon-eselon seperti contoh, Wakil Ketua Umum, saya kira cukup. Kita punya Wakil Ketua Umum ibu Rahmawati Sukarnoputri, beliau bertanggungjawab untuk ideologi. Kita juga punya beberapa Wakil Ketua Umum lainnya, kemudian kita punya sayap partai yang namanya Perempuan Indonesia Raya. Dan kita punya susunan Caleg, saya kira mungkin terbanyak dari seluruh partai pak.
## 105 Undang-undang kalau tidak salah mewajibkan 30 persen, kita mungkin sudah mendekati 40 persen. Mungkin tidak sampai 40, tapi sudah mendekati dan itu tekad kami. Jadi kita memang mengakui ini adalah suatu perjuangan. Kita belum puas, tapi kami membuka peluang sebesar-besarnya untuk emak-emak, perempuan, untuk bergerak. Dan sekarang pendukung kita yang paling keras adalah di emak-emak seluruh Indonesia. Saya kira demikian.
## 106 Saya bukan Gerindra lagi pak. Nggak bisa jawab, pak. Kecuali bapak angkat lagi pak.
## 107 Nggak, jangan-jangan.
## 108 Ya sebetulnya saya tidak harus menjawab lagi karena Pak Prabowo sudah mengakui. Tetapi bahwa apa yang sudah diakui tadi, kalau saya boleh membandingkan mohon maaf, misalnya di kabinet saya.
## 109 Saat saya membentuk kabinet, ada sembilan menteri perempuan yang menempati tempat-tempat strategis. Misalnya, Menlu. Itu adalah Menteri Luar Negeri [perempuan] pertama. Kemudian menteri BUMN, menteri Keuangan. Kemudian Menteri LHK. Kemudian menteri yang berani dan nekat, Menteri Kelautan dan Perikanan. Dan saya juga pernah membentuk yang namanya Pansel KPK. Terdiri dari sembilan orang yang semuanya perempuan. Dan mereka bisa memilih komisioner yang paling baik.
## 110 Baik, saya kira itu sah. Tetapi juga, sekarang masyarakat juga menilai beberapa yang bapak tadi banggakan justru yang menunjukkan suatu kerugian-kerugian besar bagi kepentingan bangsa dan rakyat.
## 111 Jadi, menurut saya kita jangan permasalahkan orang demi orang. Yang kita memasalahkan adalah kebijakan-kebijakan yang dia hasilkan, yang diprodukkan. Jadi kalau dibilang masalah gender, oke kita cari. Kita bisa hitung jumlah, tapi kalau kita bilang output, ya kita bisa berdebat lagi.
## 112 Kita bisa berdebat lebih lama lagi. Jangan hanya perempuan diangkat jadi kita bangga, harus perempuan tapi juga cakap, dan prorakyat. Dan tidak perempuan mengambil kebijakan-kebijakan yang merugikan rakyat. Ini masalahnya. Jadi saya tidak akan membanggakan hanya karena dia perempuan. Kalau dia perempuan tapi dia tidak membela rakyatnya sendiri, ya saya kira tidak perlu dibanggakan.
## 113 Seperti kita ketahui, banyak hukum yang masih tumpang tindih. Dan salah satu dari pertanyaan yang sering ditanyakan kepada saya di masyarakat, bahwa bagaimana, apalagi bapak sudah empat tahun bekerja, untuk meyakinkan masyarakat bahwa tumpang tindih hukum dan lahirnya benturan-benturan kepentingan baru, seperti penunjukan-penunjukan aparat hukum yang berafiliasi terhadap partai politik. Itu ditanyakan oleh masyarakat. Bagaimana investasi bisa meningkat, kalau ada kepastian hukum yang terus dipertanyakan. UKM sulit untuk berkembang. Banyak sekali UKM yang menanyakan kepastian hukum.
## 114 Kami ingin menanyakan kepada bapak, bagaimana untuk memastikan ini terjadi seandainya bapak mendapatkan dari Allah subhanahu wa ta'ala untuk lima tahun ke depan, sementara bapak sudah empat tahun menunjukkan ketidakberhasilan untuk kepastian hukum, dan benturan kepentingan hadir di mana-mana.
## 115 Saya akan lakukan revisi-revisi Undang-Undang yang menghambat berkembangnya UKM-UKM kita. Kita akan revisi banyak sekali Undang-Undang yang tidak pro kepada investasi.
## 116 Kita juga akan perbaiki aparat-aparat yang tidak memberikan pengayoman, tidak memberikan perlindungan terhadap rakyat kita. Karena menurut saya hukum adalah bagaimana negara ini bisa melindungi rakyatnya. Hukum harus bisa memberikan kepastian kepada investasi dan dunia usaha. Dan hukum juga tidak tebang pilih. Dan hukum betul-betul bisa memberikan rasa tenteram, rasa nyaman kepada seluruh rakyat Indonesia.
## 117 Program kami ke depan adalah melanjutkan reformasi di bidang hukum secara total. Salah satunya adalah penataan regulasi. Penataan regulasi itu menghilangkan yang tumpang tindih dan membuat regulasi peraturan yang berkualitas, yang menguntungkan dan akan memberikan peluang terhadap investasi dan pengembangan UKM.
## 118 Jadi yang kita permasalahkan adalah bagaimana yang bapak sebut tadi. Presiden Jokowi tadi sebut aparat-aparat yang tidak mengayomi itu. Sekarang masalah yang kita ingin tanya itu bagaimana, karena bapak sudah memimpin selama empat tahun.
## 119 Jadi bagaimana, apa yang kita tunggu adalah apa yang bisa dilakukan segera, sehingga tidak terjadi yang seperti, yang kita khawatirkan semua itu. Sehingga terjadilah sekarang kesan bahwa penegakan hukum, keadilan itu hanya untuk orang kuat, orang kaya. Orang yang punya koneksi. Dan tadi ditanya oleh Wakil Presiden saya, insyaallah, jadi ditanya adalah bagaimana tanggapan bapak yang kalau jabatan-jabatan penting itu diserahkan kepada kader yang aktif dari partai-partai politik. Dan bukan seorang yang benar-benar netral.
## 120 Saya kira kita tidak boleh mendiskriminasi. Bahwa sebuah jabatan itu harus diberikan kepada, tidak kepada orang partai atau tidak harus kepada seorang profesional.
## 121 Menurut saya jabatan itu yang paling penting, seperti tadi sudah saya sampaikan, ada sebuah merit system. Ada sebuah proses rekrutmen yang betul. Proses rekrutmen yang transparan, proses rekrutmen yang mengacu pada kompetensi. Kepada integritas. Kepada kapasitas.
## 122 Banyak kok aparat hukum yang berasal dari partai, yang dalam memimpin juga sangat baik dan legendaris. Misalnya Pak Baharudin Lopa, itu dari PPP nyatanya memimpin Kejaksaan juga bisa sangat baik. Kenapa harus dibedakan ini yang partai ini yang non-partai. Saya kira sama saja buat saya, yang penting proses rekrutmennya benar.
## 123 Kita mengetahui bersama bahwa masalah korupsi dan konflik kepentingan ini sangat erat hubungannya. Saya ingin bertanya bagaimana pandangan bapak tentang konflik kepentingan ini.
## 124 Apakah bapak bisa meyakini dan menjamin bahwa pejabat-pejabat yang bekerja untuk bapak benar-benar tidak memiliki kepentingan pribadi atau kelompok atau bisnis dalam kebijakan-kebijakan yang diambil terutama dalam impor-impor beras gula dan komoditas komoditas yang sangat dirasakan merugikan petani- petani kita terima kasih waktu
## 125 Pertama saya akan mulai dari saya Pak Prabowo. Saya ini tidak memiliki beban-beban masa lalu, sehingga enak dalam memberikan perintah-perintah, tidak ada kepentingan-kepentingan pejabat yang kami angkat. Kalau memang ada dan bapak memiliki bukti-bukti yang kuat, dilaporkan saja pak polisi, laporkan saja ke KPK, laporkan saja ke Kejaksaan, kalau memang ada buktinya.
## 126 Tetapi bahwa pemerintah kami ingin, ingin semuanya sederhana, semuanya mudah, seperti yang telah kita bangun yaitu online single submission sebagai contoh. Dengan online single submission ini yang dulunya kalau orang ingin mencari izin sampai bertahun-tahun, bukan berbulan-bulan, bertahun-tahun, izin sekarang, bapak sebagai pengusaha, coba ke online single submission, coba bapak datang.
## 127 Bapak tunggu dua jam, bisa langsung memulai usaha. Inilah yang kita lakukan yaitu memperbaiki sistem sehingga peluang untuk terjadinya korupsi tidak ada, ada transparansi di situ, ada keterbukaan di situ, ada manajemen pengawasan yang ketat, manajement control, kalau bapak memiliki bukti-bukti kuat, silakan dilaporkan.
## 128 Pak Jokowi yang saya hormati, yang membingungkan kami adalah, di anatara menteri-menteri bapak itu berseberangan, ada yang mengatakan produksi persediaan beras cukup, tapi ada lagi yang mau impor beras, jadi ini yang membingungkan kami, jadi kami bertanya kepada bapak.
## 129 Jadi bagaimana pejabat yang bapak angkat, termasuk, Dirut Bulog, Pak Buwas [Budi Waseso] mengatakan bahwa cukup, kemudian Menteri Pertanian bapak mengatakan cukup, tapi menteri perdagangan bapak mengizinkan impor komoditas pangan yang begitu banyak, ini yang membingungkan rakyat dan kami.
## 130 Ini masalah pemerintahan bapak sendiri diantara pejabat-pejabat yang bapak angkat, karena itu kami tanya kepada bapak, apakah Bapak benar-benar yakin tentang tidak ada konflik kepentingan. Itu saja pak.
## 131 Ya kalau ada perbedaan-perbedaan itu saya kira dalam dinamika, sebuah apa, di rapat-rapat menteri-menteri itu saling debat saya persilakan, saya dengarkan, ada yang mau impor ada yang mau tidak impor, tetapi kalau sudah diputuskan bahwa kalau menteri sama semuanya menurut saya malah nggak, tidak ada saling kontrol, tidak ada saling ngecek, tidak ada saling mengawasi, penting sekali sekarang ini.
## 132 Tidak usah semua menteri itu sama semuanya, berbeda nggak apa-apa, debat di rapat gapapa kok, nggak ada masalah. Nanti kalau sudah rampung debatnya barusan saya putuskan, impor atau tidak kita putuskan, saya rasa biasa menteri-menteri saya dengan situasi situasi seperti itu, buat saya bukan sesuatu yang tidak baik malah baik karena ada saling kontrol dan masyarakat juga tahu.
## 133 Kita tahu korupsi adalah kejahatan yang luar biasa, bahkan Pak Prabowo pernah mengatakan bahwa korupsi di Indonesia sudah stadium empat, meskipun ini saya nggak setuju. Tapi menurut ICW, partai yang bapak pimpin termasuk yang terbanyak mencalonkan mantan koruptor atau mantan napi korupsi. Yang saya tahu Caleg itu yang tanda tangan adalah ketua umumnya, berarti Pak Prabowo yang tanda tangan.
## 134 Bagaimana bapak menjelaskan mengenai ini?
## 135 Baik, itu mungkin ICW, tapi saya sendiri belum dapat laporan itu, dan benar-benar itu sangat subjektif. Ya saya tidak, saya tidak setuju itu. Saya seleksi Caleg-Caleg tersebut. Kalau ada bukti juga silakan laporkan kepada kami.
## 136 Begini pak, begini pak, ada juga kadang-kadang tuduhan-tuduhan korupsi yang korupsinya ya menerima THR seluruh DPRD-nya semuanya lintas partai pak. Kalau kita sekarang cek di Kejaksaan, boleh kita bandingkan, berapa orang sekarang yang sudah menunggu masuk KPK atau masuk penjara, kita bisa cek, janganlah kita saling menuduh soal partai kita masing-masing.
## 137 Saya jamin partai Gerindra akan melawan korupsi sampai ke akar-akarnya, kalau ada anggota Partai Gerindra ada yang korupsi maka saya yang akan masukin ke penjara sendiri. Pokoknya kita anti korupsi.
## 138 Mohon maaf Pak Prabowo, jadi yang saya maksud tadi adalah mantan koruptor atau mantan napi korupsi, yang Bapak calonkan sebagai Caleg, itu ada. ICW memberikan data itu jelas kali, ada enam yang bapak calonkan, dan yang tanda tangan dalam Pencalegan itu adalah ketua umumnya dan sekjen, artinya bapak tanda tangan.
## 139 Apakah waktunya sudah selesai untuk bertanya untuk memberikan tanggapan?
## 140 Jadi mohon maaf Pak Prabowo, saya tidak, saya tidak menuduh partai Bapak korupsi, nggak, Ini mantan koruptor, mantan napi korupsi yang sudah dihukum.
## 141 Jadi mantan korupsi, saya kira, pelajari, ini demokrasi Pak. Kita umumkan ke rakyat. Kalau rakyat memilih ya, nggak akan dipilih, yang jelas pak, kalau kasus itu sudah melalui proses, dia sudah dihukum.
## 142 Kalau memang hukum mengizinkan kalau dia masih dianggap masih bisa, dan rakyat menghendaki dia karena dia punya kelebihan-kelebihan lain, mungkin korupsinya juga nggak seberapa. Mungkin dia karena, begini, kalau curi ayam benar itu salah, kalau merugikan rakyat triliunan, itu yang saya kira harus kita habiskan di Indonesia saat ini.
## 143 Kami tidak ingin banyak bicara. Kami sudah paham persoalan bangsa ini dan tahu apa yang harus kami lakukan.
## 144 Kami tidak punya potongan diktator atau otoriter. Kami tidak punya rekam jejak melanggar HAM. Kami tidak punya rekam jejak melakukan kekerasan. Kami juga tidak punya masalah korupsi.
## 145 Jokowi-Amin akan pertaruhkan jabatan dan reputasi dan akan kami gunakan semua kewenangan yang kami miliki untuk perbaikan bangsa ini. Terima kasih. Cukup, kami ingin bekerja.
## 146 Saudara-saudara sekalian, kepastian hukum, penegakan hukum, institusi-institusi hukum, terutama hakim, jaksa, dan polisi adalah prasyarat bagi suatu negara yang berhasil. Untuk itu kami apabila menerima mandat dari rakyat, hal ini yang akan kami perkuat, hal ini akan kami perbaiki terutama kami akan bicara realistis untuk orang supaya kuat, supaya tidak korup, ini yang harus kita bangun penyelesaiannya.
## 147 Jadi yang kami ingin adalah cara penyelesaian akar masalah. Kita tidak mau cari kesalahan kecil-kecil ini atau kita mau mengatakan ini salah itu salah siapa yang salah, tidak. Kami melihat ini persoalan bangsa. Kami ingin menyelesaikan akar masalah. Karena itu kami bertekad untuk menghentikan kebocoran.
## 148 Kami bertekad menaikkan tax ratio. Kami yakin negara ini sangat, sangat kaya tapi terjadi kebocoran-kebocoran. Kekayaan-kekayaan kita mengalir keluar negeri, ini bukan salah siapa saja, ini salah kita bersama, sebagai bangsa, dan kesalahan yang membiarkan ini sudah puluhan tahun kita mau cari masalah jalan keluarnya.
## 149 Kita perbaiki, kita lipat gandakan gaji-gaji hakim, jaksa, dan polisi, dengan demikian kita berharap akan ada lembaga hakim, lembaga polisi, lembaga jaksa, tidak dapat dikorupsi. Sehingga mereka menjadi pilar, sehingga kita bebas dari korupsi.Dengan menggunakan dplyr, kita bisa menggunakan fungsi select untuk memilih kolom tertentu, contoh seperti berikut:
df %>% # Dari df
select(AKTOR) # Ambil variabel AKTOR## AKTOR
## 1 Arief Budiman
## 2 Arief Budiman
## 3 Arief Budiman
## 4 Arief Budiman
## 5 Arief Budiman
## 6 Arief Budiman
## 7 Arief Budiman
## 8 Jokowi
## 9 Jokowi
## 10 Jokowi
## 11 Jokowi
## 12 Jokowi
## 13 Jokowi
## 14 Jokowi
## 15 Jokowi
## 16 Jokowi
## 17 Prabowo
## 18 Prabowo
## 19 Prabowo
## 20 Prabowo
## 21 Prabowo
## 22 Prabowo
## 23 Prabowo
## 24 Prabowo
## 25 Prabowo
## 26 Panelis
## 27 Prabowo
## 28 Prabowo
## 29 Sandi
## 30 Sandi
## 31 Sandi
## 32 Sandi
## 33 Sandi
## 34 Jokowi
## 35 Jokowi
## 36 Prabowo
## 37 Prabowo
## 38 Prabowo
## 39 Panelis
## 40 Jokowi
## 41 Jokowi
## 42 Ma'ruf
## 43 Prabowo
## 44 Prabowo
## 45 Jokowi
## 46 Panelis
## 47 Prabowo
## 48 Prabowo
## 49 Sandi
## 50 Sandi
## 51 Sandi
## 52 Sandi
## 53 Jokowi
## 54 Jokowi
## 55 Sandi
## 56 Sandi
## 57 Sandi
## 58 Sandi
## 59 Panelis
## 60 Jokowi
## 61 Jokowi
## 62 Sandi
## 63 Sandi
## 64 Jokowi
## 65 Ma'ruf
## 66 Panelis
## 67 Jokowi
## 68 Jokowi
## 69 Jokowi
## 70 Prabowo
## 71 Prabowo
## 72 Jokowi
## 73 Jokowi
## 74 Panelis
## 75 Prabowo
## 76 Prabowo
## 77 Prabowo
## 78 Prabowo
## 79 Sandi
## 80 Jokowi
## 81 Jokowi
## 82 Jokowi
## 83 Sandi
## 84 Panelis
## 85 Ma'ruf
## 86 Ma'ruf
## 87 Ma'ruf
## 88 Jokowi
## 89 Prabowo
## 90 Prabowo
## 91 Jokowi
## 92 Jokowi
## 93 Panelis
## 94 Prabowo
## 95 Prabowo
## 96 Sandi
## 97 Sandi
## 98 Ma'ruf
## 99 Ma'ruf
## 100 Prabowo
## 101 Prabowo
## 102 Jokowi
## 103 Prabowo
## 104 Prabowo
## 105 Prabowo
## 106 Sandi
## 107 Prabowo
## 108 Jokowi
## 109 Jokowi
## 110 Prabowo
## 111 Prabowo
## 112 Prabowo
## 113 Sandi
## 114 Sandi
## 115 Jokowi
## 116 Jokowi
## 117 Ma'ruf
## 118 Prabowo
## 119 Prabowo
## 120 Jokowi
## 121 Jokowi
## 122 Jokowi
## 123 Prabowo
## 124 Prabowo
## 125 Jokowi
## 126 Jokowi
## 127 Jokowi
## 128 Prabowo
## 129 Prabowo
## 130 Prabowo
## 131 Jokowi
## 132 Jokowi
## 133 Jokowi
## 134 Jokowi
## 135 Prabowo
## 136 Prabowo
## 137 Prabowo
## 138 Jokowi
## 139 Ira Koesno
## 140 Jokowi
## 141 Prabowo
## 142 Prabowo
## 143 Jokowi
## 144 Jokowi
## 145 Jokowi
## 146 Prabowo
## 147 Prabowo
## 148 Prabowo
## 149 PrabowoJika ingin mengetahui apa saja yang ada di dalam variabel AKTOR dapat menggunakan fungsi unique():
df %>% # Dari df
select(AKTOR) %>% # Ambil variabel AKTOR
unique() # Cek apa saja yang ada di dalam AKTOR## AKTOR
## 1 Arief Budiman
## 8 Jokowi
## 17 Prabowo
## 26 Panelis
## 29 Sandi
## 42 Ma'ruf
## 139 Ira KoesnoJika ingin mensortir data berdasarkan nilai tertentu bisa menggunakan fungsi filter():
df %>% # Dari df
filter(AKTOR == "Arief Budiman") # Filter data dengan variabel AKTOR bernilai "Arief Budiman"## SEGMEN AKTOR BAGAN TOPIK
## 1 SEGMEN I Arief Budiman PEMBUKA NON-TOPIC
## 2 SEGMEN I Arief Budiman PEMBUKA NON-TOPIC
## 3 SEGMEN I Arief Budiman PEMBUKA NON-TOPIC
## 4 SEGMEN I Arief Budiman PEMBUKA NON-TOPIC
## 5 SEGMEN I Arief Budiman PEMBUKA NON-TOPIC
## 6 SEGMEN I Arief Budiman PEMBUKA NON-TOPIC
## 7 SEGMEN I Arief Budiman PEMBUKA NON-TOPIC
## TEKS
## 1 Selamat malam dan salam sejahtera untuk kita semua.
## 2 Yang kami hormati pasangan Calon Presiden dan Wakil Presiden nomor urut 01 bapak haji Joko Widodo dan bapak Kyai Haji Ma'ruf Amin. Yang kami hormati, Pasangan Calon Presiden dan Wakil Presiden nomor urut 02, bapak haji Prabowo Subianto dan bapak Haji Sandiaga Salahuddin Uno sekalian yang berbahagia.
## 3 Malam ini menjadi salah satu malam yang bersejarah bagi bangsa Indonesia. Untuk pertama kalinya kita menyelenggarakan kampanye debat Pasangan Calon Presiden dan Wakil Presiden bersamaan dengan gegap gempitanya jadwal kampanye Pemilu Legislatif.
## 4 Masing-masing Pasangan calon akan diberikan kesempatan yang sama untuk memaparkan visi misi dan program mereka secara mendalam tentang hukum, HAM, korupsi dan terorisme.
## 5 Tidak hanya penting dan strategis bagi Pasangan calon presiden dan wakil presiden, tetapi juga bagi pemilih yang berdaulat memilih akan memiliki kesempatan yang luas untuk memahami dan menjadikan pemaparan pasangan Calon Presiden dan Wakil Presiden malam ini sebagai salah satu referensi penting, saat menggunakan hak konstitusionalnya pada hari pemungutan suara tanggal 17 April 2019.
## 6 Debat yang dilaksanakan malam ini sangat strategis untuk mendukung cita-cita mewujudkan pemilu yang berintegritas dan berkualitas. Itu biasa, perbedaan pendapat adalah keniscayaan dalam demokrasi yang bermanfaat. Pemilih berdaulat, negara kuat, selamat menikmati debat.
## 7 Wassalamualaikum warahmatullahi wabarakatuhKita bisa saja mem-filter lebih dari 1 nilai dengan memasukkan variabel lainnya, misalkan SEGMEN II dengan AKTOR Jokowi
df %>% # Dari df
filter(SEGMEN == "SEGMEN II", AKTOR == "Jokowi") # Filter data dengan variabel AKTOR bernilai "Arief Budiman"## SEGMEN AKTOR BAGAN TOPIK
## 1 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis Hukum dan HAM
## 2 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis Hukum dan HAM
## 3 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis Hukum dan HAM
## 4 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis Hukum dan HAM
## 5 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis Hukum dan HAM
## 6 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis Hukum dan HAM
## 7 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis Hukum dan HAM
## 8 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis Hukum dan HAM
## 9 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis Hukum dan HAM
## 10 SEGMEN II Jokowi Menjawab Pertanyaan dari Panelis Hukum dan HAM
## TEKS
## 1 Kami berbeda dengan Pak Prabowo dan Pak Sandi. Penting sekali harmonisasi regulasi kita. Oleh sebab itu kami akan menggabungkan fungsi-fungsi legislasi. Baik yang ada di GBHN, di Dirjen Perundang-Undangan, dan fungsi-fungsi legislasi yang ada di semua kementerian.
## 2 Akan kita gabungkan dalam badan yang namanya Pusat Legislasi Nasional. Sehingga kontrol langsung oleh presiden, satu pintu, sehingga tidak terjadi tumpang tindih. Perda-Perda yang ada di daerah-daerah juga harus berkonsultasi, agar tidak tumpan tindih. Konsultasi ke Pusat Legislasi Nasional. Yang kedua, akan kita sederhanakan semuanya. Sehingga apabila ada tumpang tindih, langsung kelihatan dan bisa kita lakukan revisi dengan baik.
## 3 Jangan mempertentangkan antara HAM dan penindakan hukum. Penindakan hukum yang sesuai dengan prosedur, itu bukan pelanggaran HAM. Misalnya penahanan terhadap tersangka, memang itu merampas kemerdekaan seseorang. Tapi penegakan hukum itu melindungi masyarakat. Jadi kalau ada tersangka korupsi misalnya, ditahan, itu bukanpelanggaran HAM. Itu memang prosedur dan kita ingin aparat kita tahu bahwa itu dilakukan agar misalnya tersangka tidak menghilangkan barang bukti.
## 4 Yang kedua, mungkin calon tersangka tidak melarikan diri. Dan jika ada pelanggaran hukum, yang melanggar prosedur, penindakan hukum yang melanggar prosedur. Silakan, ada mekanisme yang bisa kita tempuh, lewat praperadilan misalnya. Jadi sekali lagi jangan dipertentangkan antara penegakan hukum dan HAM. Mungkin pak kyai [Ma'ruf] bisa menambahkan.
## 5 Ya jangan menuduh seperti itu Pak Prabowo. Karena kita ini adalah negara hukum, ada prosedur hukum, ada mekanisme hukum yang bisa kita lakukan. Kalau ada bukti sampaikan saja ke aparat hukum. Jangan kita ini, kita ini sering grusa-grusu untuk menyampaikan sesuatu. Misalnya apa jurkamnya Pak Prabowo, misalnya ini, katanya dianiaya, mukanya babak belur. Kemudian konferensi pers bersama-sama, akhirnya apa yang terjadi? Ternyata operasi plastik. Ini negara hukum, kalau ada bukti-bukti, silakan lewat mekanisme hukum. Laporkan dengan bukti-bukti yang ada. Gampang sekali kok. Gampang sekali. Negara hukum ini. Kenapa harus menuduh-nuduh seperti itu.
## 6 Keragaman, perbedaan-perbedaan, baik beda suku, beda agama, beda tradisi, beda bahasa daerah adalah sudah menjadi sunnatullah. Sudah menjadi hukum Allah yang diberikan kepada bangsa kita Indonesia. Dan aset terbesar bangsa ini adalah persaudaraan. Aset terbesar bangsa ini ada persatuan. Aset terbesar bangsa ini adalah kerukunan.
## 7 Oleh sebab itu saya selalu mengajak, marilah kita menjaga ukhuwah islamiyah kita, menjaga ukhuwah fathoniyah kita. Karena persatuan, persaudaraan adalah aset terbesar bangsa yang kita cintai ini. Kalau memang ada persekusi, tadi Pak Sandi nuduh-nuduh lagi. Ya, gampang sekali. Laporkan. Saya akan perintahkan tindak tegas pelaku tersebut.
## 8 Setelah keluar Undang-Undang mengenai penyandang disabilitas di tahun 2016, saya melihat bahwa paradikma terhadap kaum disabilitas ini sudah berubah. Yang sebelumnya adalah bantuan sosial, adalah kedermawanan, yang harus kita berikan kepada mereka, tetapi yang sekarang dengan undang-undang yang baru, kita melihat paradigmanya adalah pemenuhan hak-hak. Pemerintah, kita sudah memberikan fasilitas-fasilitas untuk pemenuhan hak itu. Baik pemenuhan hak untuk pekerjaan, untuk perumahan, untuk fasilitas umum yang ramah terhadap disabilitas, meskipun juga baru beberapa kota, tetapi sudah kita mulai.
## 9 Kemudian juga yang berkaitan dengan kesetaraan, bisa saya berikan contoh. Di dalam event Asian para games, ini event disabilitas terbesar di Asia. Kita juga memberikan bonus yang sama dengan atlet yang berlaga di Asian Games. Contoh misalnya, yang mendapatkan emas dapat dapat 1,5 milyar. Yang dapat perak bisa kita berikan bonus 500 juta. Yang dapat perunggu kita berikan bonus 250 juta. Sama seperti atlet-atlet yang berlaga di Asian Games. Artinya bahwa kesetaraan itu betul-betul kita berikan kepada kaum disabilitas yang mulai sekarang ini kita terus perhatikan mereka.
## 10 Ya saya kira contoh-contoh seperti yang dikatakan Pak Sandi tadi banyak sekali. Tidak hanya di satu bidang, tapi banyak bidang. Kaum disabilitas itu betul-betul sekarang ini sudah setara. Artinya kita sangat menghargai semua prestasi yang telah mereka kerjakan dan juga hasil-hasil, karya yang telah mereka kerjakan. Saya tadi, apa yang disampaikan Pak Sandi mirip-mirip dengan yang sudah saya sampaikan tadi.Melakukan tokenizing
Kita dapat melakukan tokennizing dengan menggunakan fungsi unnest_token() dari library tidytext seperti berikut:
# Ambil library tidytext
library(tidytext)
df %>% # Dari df
# Filter data berdasarkan SEGMEN "SEGMEN II", AKTOR "Jokowi", dengan TOPIK "Hukum dan HAM"
filter(SEGMEN == "SEGMEN II", AKTOR == "Jokowi", TOPIK == "Hukum dan HAM") %>%
select(TEKS) %>% # Pilih variabel TEKS
unnest_tokens(output = Tokenized, input = TEKS) # Tokenize TEKS dengan nama output Tokenized## Tokenized
## 1 kami
## 1.1 berbeda
## 1.2 dengan
## 1.3 pak
## 1.4 prabowo
## 1.5 dan
## 1.6 pak
## 1.7 sandi
## 1.8 penting
## 1.9 sekali
## 1.10 harmonisasi
## 1.11 regulasi
## 1.12 kita
## 1.13 oleh
## 1.14 sebab
## 1.15 itu
## 1.16 kami
## 1.17 akan
## 1.18 menggabungkan
## 1.19 fungsi
## 1.20 fungsi
## 1.21 legislasi
## 1.22 baik
## 1.23 yang
## 1.24 ada
## 1.25 di
## 1.26 gbhn
## 1.27 di
## 1.28 dirjen
## 1.29 perundang
## 1.30 undangan
## 1.31 dan
## 1.32 fungsi
## 1.33 fungsi
## 1.34 legislasi
## 1.35 yang
## 1.36 ada
## 1.37 di
## 1.38 semua
## 1.39 kementerian
## 2 akan
## 2.1 kita
## 2.2 gabungkan
## 2.3 dalam
## 2.4 badan
## 2.5 yang
## 2.6 namanya
## 2.7 pusat
## 2.8 legislasi
## 2.9 nasional
## 2.10 sehingga
## 2.11 kontrol
## 2.12 langsung
## 2.13 oleh
## 2.14 presiden
## 2.15 satu
## 2.16 pintu
## 2.17 sehingga
## 2.18 tidak
## 2.19 terjadi
## 2.20 tumpang
## 2.21 tindih
## 2.22 perda
## 2.23 perda
## 2.24 yang
## 2.25 ada
## 2.26 di
## 2.27 daerah
## 2.28 daerah
## 2.29 juga
## 2.30 harus
## 2.31 berkonsultasi
## 2.32 agar
## 2.33 tidak
## 2.34 tumpan
## 2.35 tindih
## 2.36 konsultasi
## 2.37 ke
## 2.38 pusat
## 2.39 legislasi
## 2.40 nasional
## 2.41 yang
## 2.42 kedua
## 2.43 akan
## 2.44 kita
## 2.45 sederhanakan
## 2.46 semuanya
## 2.47 sehingga
## 2.48 apabila
## 2.49 ada
## 2.50 tumpang
## 2.51 tindih
## 2.52 langsung
## 2.53 kelihatan
## 2.54 dan
## 2.55 bisa
## 2.56 kita
## 2.57 lakukan
## 2.58 revisi
## 2.59 dengan
## 2.60 baik
## 3 jangan
## 3.1 mempertentangkan
## 3.2 antara
## 3.3 ham
## 3.4 dan
## 3.5 penindakan
## 3.6 hukum
## 3.7 penindakan
## 3.8 hukum
## 3.9 yang
## 3.10 sesuai
## 3.11 dengan
## 3.12 prosedur
## 3.13 itu
## 3.14 bukan
## 3.15 pelanggaran
## 3.16 ham
## 3.17 misalnya
## 3.18 penahanan
## 3.19 terhadap
## 3.20 tersangka
## 3.21 memang
## 3.22 itu
## 3.23 merampas
## 3.24 kemerdekaan
## 3.25 seseorang
## 3.26 tapi
## 3.27 penegakan
## 3.28 hukum
## 3.29 itu
## 3.30 melindungi
## 3.31 masyarakat
## 3.32 jadi
## 3.33 kalau
## 3.34 ada
## 3.35 tersangka
## 3.36 korupsi
## 3.37 misalnya
## 3.38 ditahan
## 3.39 itu
## 3.40 bukanpelanggaran
## 3.41 ham
## 3.42 itu
## 3.43 memang
## 3.44 prosedur
## 3.45 dan
## 3.46 kita
## 3.47 ingin
## 3.48 aparat
## 3.49 kita
## 3.50 tahu
## 3.51 bahwa
## 3.52 itu
## 3.53 dilakukan
## 3.54 agar
## 3.55 misalnya
## 3.56 tersangka
## 3.57 tidak
## 3.58 menghilangkan
## 3.59 barang
## 3.60 bukti
## 4 yang
## 4.1 kedua
## 4.2 mungkin
## 4.3 calon
## 4.4 tersangka
## 4.5 tidak
## 4.6 melarikan
## 4.7 diri
## 4.8 dan
## 4.9 jika
## 4.10 ada
## 4.11 pelanggaran
## 4.12 hukum
## 4.13 yang
## 4.14 melanggar
## 4.15 prosedur
## 4.16 penindakan
## 4.17 hukum
## 4.18 yang
## 4.19 melanggar
## 4.20 prosedur
## 4.21 silakan
## 4.22 ada
## 4.23 mekanisme
## 4.24 yang
## 4.25 bisa
## 4.26 kita
## 4.27 tempuh
## 4.28 lewat
## 4.29 praperadilan
## 4.30 misalnya
## 4.31 jadi
## 4.32 sekali
## 4.33 lagi
## 4.34 jangan
## 4.35 dipertentangkan
## 4.36 antara
## 4.37 penegakan
## 4.38 hukum
## 4.39 dan
## 4.40 ham
## 4.41 mungkin
## 4.42 pak
## 4.43 kyai
## 4.44 ma'ruf
## 4.45 bisa
## 4.46 menambahkan
## 5 ya
## 5.1 jangan
## 5.2 menuduh
## 5.3 seperti
## 5.4 itu
## 5.5 pak
## 5.6 prabowo
## 5.7 karena
## 5.8 kita
## 5.9 ini
## 5.10 adalah
## 5.11 negara
## 5.12 hukum
## 5.13 ada
## 5.14 prosedur
## 5.15 hukum
## 5.16 ada
## 5.17 mekanisme
## 5.18 hukum
## 5.19 yang
## 5.20 bisa
## 5.21 kita
## 5.22 lakukan
## 5.23 kalau
## 5.24 ada
## 5.25 bukti
## 5.26 sampaikan
## 5.27 saja
## 5.28 ke
## 5.29 aparat
## 5.30 hukum
## 5.31 jangan
## 5.32 kita
## 5.33 ini
## 5.34 kita
## 5.35 ini
## 5.36 sering
## 5.37 grusa
## 5.38 grusu
## 5.39 untuk
## 5.40 menyampaikan
## 5.41 sesuatu
## 5.42 misalnya
## 5.43 apa
## 5.44 jurkamnya
## 5.45 pak
## 5.46 prabowo
## 5.47 misalnya
## 5.48 ini
## 5.49 katanya
## 5.50 dianiaya
## 5.51 mukanya
## 5.52 babak
## 5.53 belur
## 5.54 kemudian
## 5.55 konferensi
## 5.56 pers
## 5.57 bersama
## 5.58 sama
## 5.59 akhirnya
## 5.60 apa
## 5.61 yang
## 5.62 terjadi
## 5.63 ternyata
## 5.64 operasi
## 5.65 plastik
## 5.66 ini
## 5.67 negara
## 5.68 hukum
## 5.69 kalau
## 5.70 ada
## 5.71 bukti
## 5.72 bukti
## 5.73 silakan
## 5.74 lewat
## 5.75 mekanisme
## 5.76 hukum
## 5.77 laporkan
## 5.78 dengan
## 5.79 bukti
## 5.80 bukti
## 5.81 yang
## 5.82 ada
## 5.83 gampang
## 5.84 sekali
## 5.85 kok
## 5.86 gampang
## 5.87 sekali
## 5.88 negara
## 5.89 hukum
## 5.90 ini
## 5.91 kenapa
## 5.92 harus
## 5.93 menuduh
## 5.94 nuduh
## 5.95 seperti
## 5.96 itu
## 6 keragaman
## 6.1 perbedaan
## 6.2 perbedaan
## 6.3 baik
## 6.4 beda
## 6.5 suku
## 6.6 beda
## 6.7 agama
## 6.8 beda
## 6.9 tradisi
## 6.10 beda
## 6.11 bahasa
## 6.12 daerah
## 6.13 adalah
## 6.14 sudah
## 6.15 menjadi
## 6.16 sunnatullah
## 6.17 sudah
## 6.18 menjadi
## 6.19 hukum
## 6.20 allah
## 6.21 yang
## 6.22 diberikan
## 6.23 kepada
## 6.24 bangsa
## 6.25 kita
## 6.26 indonesia
## 6.27 dan
## 6.28 aset
## 6.29 terbesar
## 6.30 bangsa
## 6.31 ini
## 6.32 adalah
## 6.33 persaudaraan
## 6.34 aset
## 6.35 terbesar
## 6.36 bangsa
## 6.37 ini
## 6.38 ada
## 6.39 persatuan
## 6.40 aset
## 6.41 terbesar
## 6.42 bangsa
## 6.43 ini
## 6.44 adalah
## 6.45 kerukunan
## 7 oleh
## 7.1 sebab
## 7.2 itu
## 7.3 saya
## 7.4 selalu
## 7.5 mengajak
## 7.6 marilah
## 7.7 kita
## 7.8 menjaga
## 7.9 ukhuwah
## 7.10 islamiyah
## 7.11 kita
## 7.12 menjaga
## 7.13 ukhuwah
## 7.14 fathoniyah
## 7.15 kita
## 7.16 karena
## 7.17 persatuan
## 7.18 persaudaraan
## 7.19 adalah
## 7.20 aset
## 7.21 terbesar
## 7.22 bangsa
## 7.23 yang
## 7.24 kita
## 7.25 cintai
## 7.26 ini
## 7.27 kalau
## 7.28 memang
## 7.29 ada
## 7.30 persekusi
## 7.31 tadi
## 7.32 pak
## 7.33 sandi
## 7.34 nuduh
## 7.35 nuduh
## 7.36 lagi
## 7.37 ya
## 7.38 gampang
## 7.39 sekali
## 7.40 laporkan
## 7.41 saya
## 7.42 akan
## 7.43 perintahkan
## 7.44 tindak
## 7.45 tegas
## 7.46 pelaku
## 7.47 tersebut
## 8 setelah
## 8.1 keluar
## 8.2 undang
## 8.3 undang
## 8.4 mengenai
## 8.5 penyandang
## 8.6 disabilitas
## 8.7 di
## 8.8 tahun
## 8.9 2016
## 8.10 saya
## 8.11 melihat
## 8.12 bahwa
## 8.13 paradikma
## 8.14 terhadap
## 8.15 kaum
## 8.16 disabilitas
## 8.17 ini
## 8.18 sudah
## 8.19 berubah
## 8.20 yang
## 8.21 sebelumnya
## 8.22 adalah
## 8.23 bantuan
## 8.24 sosial
## 8.25 adalah
## 8.26 kedermawanan
## 8.27 yang
## 8.28 harus
## 8.29 kita
## 8.30 berikan
## 8.31 kepada
## 8.32 mereka
## 8.33 tetapi
## 8.34 yang
## 8.35 sekarang
## 8.36 dengan
## 8.37 undang
## 8.38 undang
## 8.39 yang
## 8.40 baru
## 8.41 kita
## 8.42 melihat
## 8.43 paradigmanya
## 8.44 adalah
## 8.45 pemenuhan
## 8.46 hak
## 8.47 hak
## 8.48 pemerintah
## 8.49 kita
## 8.50 sudah
## 8.51 memberikan
## 8.52 fasilitas
## 8.53 fasilitas
## 8.54 untuk
## 8.55 pemenuhan
## 8.56 hak
## 8.57 itu
## 8.58 baik
## 8.59 pemenuhan
## 8.60 hak
## 8.61 untuk
## 8.62 pekerjaan
## 8.63 untuk
## 8.64 perumahan
## 8.65 untuk
## 8.66 fasilitas
## 8.67 umum
## 8.68 yang
## 8.69 ramah
## 8.70 terhadap
## 8.71 disabilitas
## 8.72 meskipun
## 8.73 juga
## 8.74 baru
## 8.75 beberapa
## 8.76 kota
## 8.77 tetapi
## 8.78 sudah
## 8.79 kita
## 8.80 mulai
## 9 kemudian
## 9.1 juga
## 9.2 yang
## 9.3 berkaitan
## 9.4 dengan
## 9.5 kesetaraan
## 9.6 bisa
## 9.7 saya
## 9.8 berikan
## 9.9 contoh
## 9.10 di
## 9.11 dalam
## 9.12 event
## 9.13 asian
## 9.14 para
## 9.15 games
## 9.16 ini
## 9.17 event
## 9.18 disabilitas
## 9.19 terbesar
## 9.20 di
## 9.21 asia
## 9.22 kita
## 9.23 juga
## 9.24 memberikan
## 9.25 bonus
## 9.26 yang
## 9.27 sama
## 9.28 dengan
## 9.29 atlet
## 9.30 yang
## 9.31 berlaga
## 9.32 di
## 9.33 asian
## 9.34 games
## 9.35 contoh
## 9.36 misalnya
## 9.37 yang
## 9.38 mendapatkan
## 9.39 emas
## 9.40 dapat
## 9.41 dapat
## 9.42 1,5
## 9.43 milyar
## 9.44 yang
## 9.45 dapat
## 9.46 perak
## 9.47 bisa
## 9.48 kita
## 9.49 berikan
## 9.50 bonus
## 9.51 500
## 9.52 juta
## 9.53 yang
## 9.54 dapat
## 9.55 perunggu
## 9.56 kita
## 9.57 berikan
## 9.58 bonus
## 9.59 250
## 9.60 juta
## 9.61 sama
## 9.62 seperti
## 9.63 atlet
## 9.64 atlet
## 9.65 yang
## 9.66 berlaga
## 9.67 di
## 9.68 asian
## 9.69 games
## 9.70 artinya
## 9.71 bahwa
## 9.72 kesetaraan
## 9.73 itu
## 9.74 betul
## 9.75 betul
## 9.76 kita
## 9.77 berikan
## 9.78 kepada
## 9.79 kaum
## 9.80 disabilitas
## 9.81 yang
## 9.82 mulai
## 9.83 sekarang
## 9.84 ini
## 9.85 kita
## 9.86 terus
## 9.87 perhatikan
## 9.88 mereka
## 10 ya
## 10.1 saya
## 10.2 kira
## 10.3 contoh
## 10.4 contoh
## 10.5 seperti
## 10.6 yang
## 10.7 dikatakan
## 10.8 pak
## 10.9 sandi
## 10.10 tadi
## 10.11 banyak
## 10.12 sekali
## 10.13 tidak
## 10.14 hanya
## 10.15 di
## 10.16 satu
## 10.17 bidang
## 10.18 tapi
## 10.19 banyak
## 10.20 bidang
## 10.21 kaum
## 10.22 disabilitas
## 10.23 itu
## 10.24 betul
## 10.25 betul
## 10.26 sekarang
## 10.27 ini
## 10.28 sudah
## 10.29 setara
## 10.30 artinya
## 10.31 kita
## 10.32 sangat
## 10.33 menghargai
## 10.34 semua
## 10.35 prestasi
## 10.36 yang
## 10.37 telah
## 10.38 mereka
## 10.39 kerjakan
## 10.40 dan
## 10.41 juga
## 10.42 hasil
## 10.43 hasil
## 10.44 karya
## 10.45 yang
## 10.46 telah
## 10.47 mereka
## 10.48 kerjakan
## 10.49 saya
## 10.50 tadi
## 10.51 apa
## 10.52 yang
## 10.53 disampaikan
## 10.54 pak
## 10.55 sandi
## 10.56 mirip
## 10.57 mirip
## 10.58 dengan
## 10.59 yang
## 10.60 sudah
## 10.61 saya
## 10.62 sampaikan
## 10.63 tadiUntuk membuat wordcloud kita butuh frekuensi dari masing-masing huruf sehingga kita harus menggunakan fungsi count().
df %>% # Dari df
# Filter data berdasarkan SEGMEN "SEGMEN II", AKTOR "Jokowi", dengan TOPIK "Hukum dan HAM"
filter(SEGMEN == "SEGMEN II", AKTOR == "Jokowi", TOPIK == "Hukum dan HAM") %>%
select(TEKS) %>% # Pilih variabel TEKS
unnest_tokens(output = Tokenized, input = TEKS) %>% # Tokenize TEKS dengan nama output Tokenized
count(Tokenized,sort = T) # Hitung semua huruf dalam variabel Tokenized, lalu di-sort dari yang tertinggi## # A tibble: 260 x 2
## Tokenized n
## <chr> <int>
## 1 yang 33
## 2 kita 26
## 3 ada 14
## 4 hukum 14
## 5 ini 14
## 6 itu 13
## 7 di 10
## 8 dan 9
## 9 adalah 8
## 10 dengan 8
## # ... with 250 more rowsDapat dilihat bahwa kita sudah memperoleh huruf dengan masing-masing frekuensi kemunculannya dalam TEKS. Dapat dilihat juga bahwa terdapat kata-kata seperti “yang”, “kita”, “ada”, “ini”, “di”, “dan” dan kata-kata lainnya yang memperoleh frekuensi kemunculan tertinggi. Kata-kata tersebut disebut sebagai stopword dan biasanya dibuang agar tidak mengganggu proses pencarian topik ataupun ketika divisualisasi dengan wordcloud. Namun untuk sementara kita tidak membuang kata-kata tersebut.
# Panggil library wordcloud2
library(wordcloud2)
df %>% # Dari df
# Filter data berdasarkan SEGMEN "SEGMEN II", AKTOR "Jokowi", dengan TOPIK "Hukum dan HAM"
filter(SEGMEN == "SEGMEN II", AKTOR == "Jokowi", TOPIK == "Hukum dan HAM") %>%
select(TEKS) %>% # Pilih variabel TEKS
unnest_tokens(output = Tokenized, input = TEKS) %>% # Tokenize TEKS dengan nama output Tokenized
count(Tokenized,sort = T) %>% # Hitung semua huruf dalam variabel Tokenized, lalu di-sort dari yang tertinggi
wordcloud2() # Visualisasikan menjadi wordcloudSelain itu kita dapat mengubah beberapa parameter di dalam fungsi wordcloud2() misalnya parameter backgroundColor, size dan shape:
df %>% # Dari df
# Filter data berdasarkan SEGMEN "SEGMEN II", AKTOR "Jokowi", dengan TOPIK "Hukum dan HAM"
filter(SEGMEN == "SEGMEN II", AKTOR == "Jokowi", TOPIK == "Hukum dan HAM") %>%
select(TEKS) %>% # Pilih variabel TEKS
unnest_tokens(output = Tokenized, input = TEKS) %>% # Tokenize TEKS dengan nama output Tokenized
count(Tokenized,sort = T) %>% # Hitung semua huruf dalam variabel Tokenized, lalu di-sort dari yang tertinggi
wordcloud2(size = 0.5, backgroundColor = "Dark", shape = "star") # Visualisasikan menjadi wordcloudTerkait parameter lain dapat dilihat melalui dokumentasi yang dapat diakses dengan memberi tanda ? dibelakangnya
?wordcloud2## starting httpd help server ... doneMembuang Stopwords
Seperti yang sudah dijelaskan sebelumnya, stopwords biasanya mengganggu ketika melakukan pemodelan topik, maka dari itu kita akan membuangnya dengan menggunakan fungsi anti_join():
# Ambil stopword dari github https://github.com/masdevid/ID-Stopwords, simpan kedalam variabel stopword
stopword <- read.csv2("stopword.csv")
# Melihat isi 10 stopword pertama
head(stopword,10)## stopword
## 1 ada
## 2 adalah
## 3 adanya
## 4 adapun
## 5 agak
## 6 agaknya
## 7 agar
## 8 akan
## 9 akankah
## 10 akhirdf %>% # Dari df
# Filter data berdasarkan SEGMEN "SEGMEN II", AKTOR "Jokowi", dengan TOPIK "Hukum dan HAM"
filter(SEGMEN == "SEGMEN II", AKTOR == "Jokowi", TOPIK == "Hukum dan HAM") %>%
select(TEKS) %>% # Pilih variabel TEKS
unnest_tokens(output = Tokenized, input = TEKS) %>% # Tokenize TEKS dengan nama output Tokenized
anti_join(y = stopword, by = c("Tokenized" = "stopword")) %>% # Buang stopword
count(Tokenized, sort = T) # Hitung frekuensi setiap huruf## # A tibble: 152 x 2
## Tokenized n
## <chr> <int>
## 1 hukum 14
## 2 bukti 6
## 3 disabilitas 6
## 4 bangsa 5
## 5 prosedur 5
## 6 terbesar 5
## 7 aset 4
## 8 beda 4
## 9 contoh 4
## 10 fungsi 4
## # ... with 142 more rowsDapat dilihat bahwa beberapa stopword sudah dibuang sehingga siap untuk divisualisasikan melalui wordcloud.
df %>% # Dari df
# Filter data berdasarkan SEGMEN "SEGMEN II", AKTOR "Jokowi", dengan TOPIK "Hukum dan HAM"
filter(SEGMEN == "SEGMEN II", AKTOR == "Jokowi", TOPIK == "Hukum dan HAM") %>%
select(TEKS) %>% # Pilih variabel TEKS
unnest_tokens(output = Tokenized, input = TEKS) %>% # Tokenize TEKS dengan nama output Tokenized
anti_join(y = stopword, by = c("Tokenized" = "stopword")) %>% # Buang stopword
count(Tokenized, sort = T) %>% # Hitung frekuensi setiap huruf
wordcloud2()Berikut hasil visualisasi dari masing-masing calon pada teks debat beberapa hari yang lalu:
Jokowi
df %>% # Dari df
# Filter data berdasarkan AKTOR "Jokowi"
filter(AKTOR == "Jokowi") %>%
select(TEKS) %>% # Pilih variabel TEKS
unnest_tokens(output = Tokenized, input = TEKS) %>% # Tokenize TEKS dengan nama output Tokenized
anti_join(y = stopword, by = c("Tokenized" = "stopword")) %>% # Buang stopword
count(Tokenized, sort = T) %>% # Hitung frekuensi setiap huruf
wordcloud2(backgroundColor = "dark", size = 0.5)Ma’ruf
df %>% # Dari df
# Filter data berdasarkan AKTOR "Ma'ruf"
filter(AKTOR == "Ma'ruf") %>%
select(TEKS) %>% # Pilih variabel TEKS
unnest_tokens(output = Tokenized, input = TEKS) %>% # Tokenize TEKS dengan nama output Tokenized
anti_join(y = stopword, by = c("Tokenized" = "stopword")) %>% # Buang stopword
count(Tokenized, sort = T) %>% # Hitung frekuensi setiap huruf
wordcloud2(backgroundColor = "dark", size = 0.5)Prabowo
df %>% # Dari df
# Filter data berdasarkan AKTOR "Prabowo"
filter(AKTOR == "Prabowo") %>%
select(TEKS) %>% # Pilih variabel TEKS
unnest_tokens(output = Tokenized, input = TEKS) %>% # Tokenize TEKS dengan nama output Tokenized
anti_join(y = stopword, by = c("Tokenized" = "stopword")) %>% # Buang stopword
count(Tokenized, sort = T) %>% # Hitung frekuensi setiap huruf
wordcloud2(backgroundColor = "dark", size = 0.5)Sandi
df %>% # Dari df
# Filter data berdasarkan AKTOR "Sandi"
filter(AKTOR == "Sandi") %>%
select(TEKS) %>% # Pilih variabel TEKS
unnest_tokens(output = Tokenized, input = TEKS) %>% # Tokenize TEKS dengan nama output Tokenized
anti_join(y = stopword, by = c("Tokenized" = "stopword")) %>% # Buang stopword
count(Tokenized, sort = T) %>% # Hitung frekuensi setiap huruf
wordcloud2(backgroundColor = "dark", size = 0.5)