Analisis data tweet bencana palu
Nurfadila
2023-12-11
library(wordcloud)## Loading required package: RColorBrewerlibrary(tm)## Loading required package: NLPlibrary(textclean)
library(tidytext)
library(ggplot2)##
## Attaching package: 'ggplot2'## The following object is masked from 'package:NLP':
##
## annotatelibrary(parallel)
library(tokenizers)
library(tau)
library(NLP)
library(stringr)
library(devtools)## Loading required package: usethislibrary(quanteda)## Warning in .recacheSubclasses(def@className, def, env): undefined subclass
## "ndiMatrix" of class "replValueSp"; definition not updated## Warning in stringi::stri_info(): Your current locale is not in the list of
## available locales. Some functions may not work properly. Refer to
## stri_locale_list() for more details on known locale specifiers.
## Warning in stringi::stri_info(): Your current locale is not in the list of
## available locales. Some functions may not work properly. Refer to
## stri_locale_list() for more details on known locale specifiers.## Package version: 3.3.1
## Unicode version: 13.0
## ICU version: 69.1## Parallel computing: 4 of 4 threads used.## See https://quanteda.io for tutorials and examples.##
## Attaching package: 'quanteda'## The following object is masked from 'package:tm':
##
## stopwords## The following objects are masked from 'package:NLP':
##
## meta, meta<-library(kayadata)
library(syuzhet)
library(e1071)
library(sentimentr)##
## Attaching package: 'sentimentr'## The following object is masked from 'package:syuzhet':
##
## get_sentenceslibrary(SentimentAnalysis)##
## Attaching package: 'SentimentAnalysis'## The following object is masked from 'package:base':
##
## writelibrary(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, unionlibrary(pacman)
library(readr)##
## Attaching package: 'readr'## The following object is masked from 'package:tau':
##
## tokenizelibrary(readxl)
bencana_palu <- read_csv("C:/Users/LENOVO-PC/Downloads/bencana_palu.csv")## Warning: One or more parsing issues, call `problems()` on your data frame for details,
## e.g.:
## dat <- vroom(...)
## problems(dat)## Rows: 75 Columns: 14## ── Column specification ────────────────────────────────────────────────────────
## Delimiter: ","
## chr (8): created_at, full_text, quote_count, lang, username, tweet_url, imag...
## dbl (6): id_str, reply_count, retweet_count, favorite_count, user_id_str, co...
##
## ℹ Use `spec()` to retrieve the full column specification for this data.
## ℹ Specify the column types or set `show_col_types = FALSE` to quiet this message.View(bencana_palu)
pacman::p_load_gh("trinker/textstem")
pacman::p_load(textstem, dplyr)
databencana_palu<- bencana_palu
databencana_palu## # A tibble: 75 × 14
## created_at id_str full_text quote_count reply_count retweet_count
## <chr> <dbl> <chr> <chr> <dbl> <dbl>
## 1 Tue Oct 08 21:04:47 … 1.18e18 "Setahun… 10 29 242
## 2 Sun Mar 17 00:08:52 … 1.11e18 "Slanker… 2 24 113
## 3 Fri Mar 11 01:28:43 … 1.50e18 "Beliau … 24 56 275
## 4 Wed Oct 09 05:54:14 … 1.18e18 "Hampir … 24 16 297
## 5 Wed May 08 23:53:50 … 1.13e18 "Pak @jo… 12 21 197
## 6 Wed Sep 25 14:51:03 … 1.18e18 "Setahun… 2 9 92
## 7 Thu Apr 11 04:15:46 … 1.12e18 "PakJK m… 3 2 12
## 8 Tue Jul 23 09:19:40 … 1.15e18 "Kenapa … 8 22 209
## 9 Fri Mar 27 08:53:53 … 1.24e18 "Tanyaka… 0 0 13
## 10 Tue Oct 08 09:01:07 … 1.18e18 "Setahun… 8 4 130
## # ℹ 65 more rows
## # ℹ 8 more variables: favorite_count <dbl>, lang <chr>, user_id_str <dbl>,
## # conversation_id_str <dbl>, username <chr>, tweet_url <chr>,
## # image_url <chr>, location <chr>rev <- bencana_palu$full_text
head(rev)## [1] "Setahun pasca bencana Palu msh ada warga yg menempati tenda2 pengunsian. Mdh2an apa yg diperintahkan bpk presiden kpd menteri PUPR Wamenkeu & kepla BNPB utk Wamena bisa terealisasi dg baik. Soalnya perintah yg sama utk Palu & NTB blm selesai jg. Bgm dg sdr2 kita di Ambon nanti. https://t.co/pDLXriwmNP"
## [2] "Slankers Malang Galang Dana Aksi donasi utk bencana Palu Donggala keren. Kebalik dg yg di Semarang pake uang rakyat #FitnahNagaBonar https://t.co/yjpxJlkWXN"
## [3] "Beliau pejuang kemanusiaan Tdk sdkt yg menyebut beliau orang baik Gratiskan pasien bantu bencana palu ambon sumbar dll Andai mnrt hukum penguasa beliau bersalah Layakkah beliau tanpa pengadilan diadili dijalan? Saya jd ikut bertanya apa yg diketahuinya 🤔#PrayForDokterSunardi https://t.co/bhhPJV4Ld0"
## [4] "Hampir Setahun Bencana Palu Pengungsi Masih Tinggal di Tenda Darurat https://t.co/jREjC2y98E"
## [5] "Pak @jokowi dulu bpk bilang bencana Palu seminggu akan diselesaikan sehingga normal kembali kehidupan sehari-hari masyarakat di sana Ini sdh 6 bulan msh byk korban bencana yg tinggal di pengungsian. Penuhi janji itu lbh urgent pak drpd cari lokasi buat ibu kota baru. https://t.co/ATEDovzjIO"
## [6] "Setahun Bencana Palu Banyak Korban Masih Tinggal di Tenda Yang bilang Palu pulih setelah satu minggu semenjak bencana orangnya masih hidup? https://t.co/Ev9ORRLLRa"lower case = mengubah huruf kapital menjadi huruf kecil
rev <- tolower(rev)
head(rev)## [1] "setahun pasca bencana palu msh ada warga yg menempati tenda2 pengunsian. mdh2an apa yg diperintahkan bpk presiden kpd menteri pupr wamenkeu & kepla bnpb utk wamena bisa terealisasi dg baik. soalnya perintah yg sama utk palu & ntb blm selesai jg. bgm dg sdr2 kita di ambon nanti. https://t.co/pdlxriwmnp"
## [2] "slankers malang galang dana aksi donasi utk bencana palu donggala keren. kebalik dg yg di semarang pake uang rakyat #fitnahnagabonar https://t.co/yjpxjlkwxn"
## [3] "beliau pejuang kemanusiaan tdk sdkt yg menyebut beliau orang baik gratiskan pasien bantu bencana palu ambon sumbar dll andai mnrt hukum penguasa beliau bersalah layakkah beliau tanpa pengadilan diadili dijalan? saya jd ikut bertanya apa yg diketahuinya 🬩#prayfordoktersunardi https://t.co/bhhpjv4ld0"
## [4] "hampir setahun bencana palu pengungsi masih tinggal di tenda darurat https://t.co/jrejc2y98e"
## [5] "pak @jokowi dulu bpk bilang bencana palu seminggu akan diselesaikan sehingga normal kembali kehidupan sehari-hari masyarakat di sana ini sdh 6 bulan msh byk korban bencana yg tinggal di pengungsian. penuhi janji itu lbh urgent pak drpd cari lokasi buat ibu kota baru. https://t.co/atedovzjio"
## [6] "setahun bencana palu banyak korban masih tinggal di tenda yang bilang palu pulih setelah satu minggu semenjak bencana orangnya masih hidup? https://t.co/ev9orrllra"#Mengembalikan Kata yang disingkat Menjadi Kata Aslinya
rev <- replace_contraction(rev)
head(rev)## [1] "setahun pasca bencana palu msh ada warga yg menempati tenda2 pengunsian. mdh2an apa yg diperintahkan bpk presiden kpd menteri pupr wamenkeu & kepla bnpb utk wamena bisa terealisasi dg baik. soalnya perintah yg sama utk palu & ntb blm selesai jg. bgm dg sdr2 kita di ambon nanti. https://t.co/pdlxriwmnp"
## [2] "slankers malang galang dana aksi donasi utk bencana palu donggala keren. kebalik dg yg di semarang pake uang rakyat #fitnahnagabonar https://t.co/yjpxjlkwxn"
## [3] "beliau pejuang kemanusiaan tdk sdkt yg menyebut beliau orang baik gratiskan pasien bantu bencana palu ambon sumbar dll andai mnrt hukum penguasa beliau bersalah layakkah beliau tanpa pengadilan diadili dijalan? saya jd ikut bertanya apa yg diketahuinya 🬩#prayfordoktersunardi https://t.co/bhhpjv4ld0"
## [4] "hampir setahun bencana palu pengungsi masih tinggal di tenda darurat https://t.co/jrejc2y98e"
## [5] "pak @jokowi dulu bpk bilang bencana palu seminggu akan diselesaikan sehingga normal kembali kehidupan sehari-hari masyarakat di sana ini sdh 6 bulan msh byk korban bencana yg tinggal di pengungsian. penuhi janji itu lbh urgent pak drpd cari lokasi buat ibu kota baru. https://t.co/atedovzjio"
## [6] "setahun bencana palu banyak korban masih tinggal di tenda yang bilang palu pulih setelah satu minggu semenjak bencana orangnya masih hidup? https://t.co/ev9orrllra"#Mengembalikan Kata yang Mengalami Perpanjangan Menjadi Kata Aslinya
rev <- replace_word_elongation(rev)
head(rev)## [1] "setahun pasca bencana palu msh ada warga yg menempati tenda2 pengunsian. mdh2an apa yg diperintahkan bpk presiden kpd menteri pupr wamenkeu & kepla bnpb utk wamena bisa terealisasi dg baik. soalnya perintah yg sama utk palu & ntb blm selesai jg. bgm dg sdr2 kita di ambon nanti. https://t.co/pdlxriwmnp"
## [2] "slankers malang galang dana aksi donasi utk bencana palu donggala keren. kebalik dg yg di semarang pake uang rakyat #fitnahnagabonar https://t.co/yjpxjlkwxn"
## [3] "beliau pejuang kemanusiaan tdk sdkt yg menyebut beliau orang baik gratiskan pasien bantu bencana palu ambon sumbar dll andai mnrt hukum penguasa beliau bersalah layakkah beliau tanpa pengadilan diadili dijalan? saya jd ikut bertanya apa yg diketahuinya 🬩#prayfordoktersunardi https://t.co/bhhpjv4ld0"
## [4] "hampir setahun bencana palu pengungsi masih tinggal di tenda darurat https://t.co/jrejc2y98e"
## [5] "pak @jokowi dulu bpk bilang bencana palu seminggu akan diselesaikan sehingga normal kembali kehidupan sehari-hari masyarakat di sana ini sdh 6 bulan msh byk korban bencana yg tinggal di pengungsian. penuhi janji itu lbh urgent pak drpd cari lokasi buat ibu kota baru. https://t.co/atedovzjio"
## [6] "setahun bencana palu banyak korban masih tinggal di tenda yang bilang palu pulih setelah satu minggu semenjak bencana orangnya masih hidup? https://t.co/ev9orrllra"#Menghapus simbol
rev <- strip(rev)
head(rev)## [1] "setahun pasca bencana palu msh ada warga yg menempati tenda pengunsian mdh an apa yg diperintahkan bpk presiden kpd menteri pupr wamenkeu amp kepla bnpb utk wamena bisa terealisasi dg baik soalnya perintah yg sama utk palu amp ntb blm selesai jg bgm dg sdr kita di ambon nanti httpstcopdlxriwmnp"
## [2] "slankers malang galang dana aksi donasi utk bencana palu donggala keren kebalik dg yg di semarang pake uang rakyat fitnahnagabonar httpstcoyjpxjlkwxn"
## [3] "beliau pejuang kemanusiaan tdk sdkt yg menyebut beliau orang baik gratiskan pasien bantu bencana palu ambon sumbar dll andai mnrt hukum penguasa beliau bersalah layakkah beliau tanpa pengadilan diadili dijalan saya jd ikut bertanya apa yg diketahuinya 🬩prayfordoktersunardi httpstcobhhpjv ld"
## [4] "hampir setahun bencana palu pengungsi masih tinggal di tenda darurat httpstcojrejc y e"
## [5] "pak jokowi dulu bpk bilang bencana palu seminggu akan diselesaikan sehingga normal kembali kehidupan seharihari masyarakat di sana ini sdh bulan msh byk korban bencana yg tinggal di pengungsian penuhi janji itu lbh urgent pak drpd cari lokasi buat ibu kota baru httpstcoatedovzjio"
## [6] "setahun bencana palu banyak korban masih tinggal di tenda yang bilang palu pulih setelah satu minggu semenjak bencana orangnya masih hidup httpstcoev orrllra"#stemming/lemmatizing = kata dasar
stem_strings(rev)## [1] "setahun pasca bencana palu msh ada warga yg menempati tenda pengunsian mdh an apa yg diperintahkan bpk presiden kpd menteri pupr wamenkeu amp kepla bnpb utk wamena bisa terealisasi dg baik soalnya perintah yg sama utk palu amp ntb blm selesai jg bgm dg sdr kita di ambon nanti httpstcopdlxriwmnp"
## [2] "slanker malang galang dana aksi donasi utk bencana palu donggala keren kebalik dg yg di semarang pake uang rakyat fitnahnagabonar httpstcoyjpxjlkwxn"
## [3] "beliau pejuang kemanusiaan tdk sdkt yg menyebut beliau orang baik gratiskan pasien bantu bencana palu ambon sumbar dll andai mnrt hukum penguasa beliau bersalah layakkah beliau tanpa pengadilan diadili dijalan saya jd ikut bertanya apa yg diketahuinya 🬩prayfordoktersunardi httpstcobhhpjv ld"
## [4] "hampir setahun bencana palu pengungsi masih tinggal di tenda darurat httpstcojrejc y e"
## [5] "pak jokowi dulu bpk bilang bencana palu seminggu akan diselesaikan sehingga normal kembali kehidupan seharihari masyarakat di sana ini sdh bulan msh byk korban bencana yg tinggal di pengungsian penuhi janji itu lbh urgent pak drpd cari lokasi buat ibu kota baru httpstcoatedovzjio"
## [6] "setahun bencana palu banyak korban masih tinggal di tenda yang bilang palu pulih setelah satu minggu semenjak bencana orangnya masih hidup httpstcoev orrllra"
## [7] "pakjk memimpin rapat rekonstruksi dampak bencana paludonggala sulteng pak jk menegaskan pemerintah tetap memperhatikan daerah bencana sekalipun indonesia sedang menghadapi pilpr httpstcosotwk vne"
## [8] "kenapa emang aksi sosialnya untuk pendidikan juga ada di indonesia mau baha ihr itu narasumb tau apa kagak ihr pernah bantu korban bencana palu dan juga selama ini kerja sama dengan pbb di campcamp pengungsi bencana kemanusiaan dan konflik nyumbang kagak"
## [9] "tanyakan pada korban bencana palu lombok dan longsor dibeberapa wilayah di jawa barat baru semua tu"
## [10] "setahun pascabencana palu masih ada warga yang menempati tendatenda pengungsian mereka tak hanya menghadapi masalah tempat tinggal tapi juga pekerjaan pendidikan bahkan air bersih simak perjalanan kumparan bertemu warga terdampak bencana palu di httpstcof kvm wsgv httpstcoxo e q "
## [11] "thread kejadian ganjil pasca bencana palu iyaphallosalamualaikum sababt teel jdi nagih mo bikin thread horor lg ni mmpung masi fresh crita dikpala dan ada mood jgkali ini aku mo crita tntang bbrpa kjdian ganjil pasca bencana palu let go httpstcov znad frq"
## [12] "waktu kanak emak berpikir hanya orang kaya yg bisa bantu org lain setelah emak dewasa emak baru mengerti ternyata orang miskin pun bisa membantu orang lain ada seorang miskin namun krn dia b menggerakkan org utk membantu bencana palu bbrp th lalu lwt dia terkumpul dana m"
## [13] "kuasa allah swt lah yg mengatur semua nya trmasuk bhw tsunami aceh trjadi di zaman pak sbyudhoyono ga kebayang jika trjadi skarang 👳 jgn kan skala aceh bencana palu amp lombok sja ga ke uru maaf anda hr bnyak blajar pak jokowi 👳 kspgoid fahrihamzah jansenjsp httpstcoa uxi urfo"
## [14] "the jakmania korwil kebayoran barugk mengadakan acara penggalangan dana untuk korban bencana paludonggala hadir dalam kesempatan itu perwakilan pemain persija sandi sute ketua the jakmania bung feri dan dirut persija gede widiad persijajakarta persijaselamanya httpstcooacya k l"
## [15] "water palu sejam tiada air mungkin kita di malaysia dah mengeluh bayangkan berharihari bermingguminggu tanpa air bersih utk minum masak amp mencuci namun itulah yg terpaksa dilalui mangsa bencana palu so help u to help them water palu kkb palu spreadinghuman httpstcov yu xao"
## [16] "film yg memotret perjuangan adik amp guru pasca bencana palu mohon retweetnya ya kakak maman husenjafar ulil ernestprakasa nadir alissawahid kemdikbudri"
## [17] "bencana palu iluni ui serahkan dana miliar kepada kementerian pupr httpstcowsiwyejsmz httpstco ryjv wqfh"
## [18] "on progress puji tuhan huntap project bencana palu🐰 httpstco hkhajzfrk"
## [19] "ketika aksi demo menuntut kecurangan pemilu rezim begitu sigap total bahkan menghalalkan segala cara untuk menghalau tapi jika terkait kepedulian terhadap rakyat yg tertimpa musibah mereka abai bencana palu ntb dst hingga corona lalu media dan buzzerp memanipulasi fakta"
## [20] "pun juga saat bencana palu semua bantuan dari label berlogo partai cebong rekanrekan saya yang di lapangan menolak untuk dimasukkan ke dalam logsitik tim dompet dhuafa"
## [21] "haloo sahabat selamat pagi menjelang siang ada kabar gembira nih setelah melalui beberapa prose sebelumnya akhirnya hunian tetap huntap untuk korban terdampak bencana palu sigi dan donggala pasigala siap dibangun puprsigapmembangunnegeri infoditjenck httpstcon nbplw m"
## [22] "hari ini di healthylifettv ketemu saudara korban bencana palu amp banten orang kuat yang mewakili sekian banyak korban lainnya kita doakan segala yg terbaik untuk pemulihan keadaan di httpstco ypm p x"
## [23] "belum saja selesai penanganan bencana palu amp donggala angin kencang di palembang dan jatuhnya pesawat lion air sudah menyusul kota padang yg disapu banjir"
## [24] "setahun bencana palu banyak korban masih tinggal di tendamereka berharap apa yang dijanjikan pemerintah tidak hanya sebata janji tetapi segera diteralisasikan usul nih gmn klo tuker gule aset seperti halnya ibukota yg baru pinokioingkarjanji httpstcouqwarj "
## [25] "setahun lalu bersama pak sutopopn apa kabar pak disana sudah tidak kesakitan lagi luar biasa jam pagi baru selesai kemo dan jam dan konfren updat bencana palu httpstcoal kwlezpw"
## [26] "gubernur indonesia bisa nyumbang bencana palu donggala membiayai warganya mudik dan balik grati apa iya sekela kpu yang sudah ada anggaran pemilunya tidak bisa menghadirkan saksi atau melengkapi berkasnya sekalipun itu dari seluruh kota di indonesia 💥 in na na httpstwittercomna na statu wed mai persen pengungsi bencana palu masih tinggal di tenda pengungsian httpstcodzjxnmsfd in geloracohttpstwittercomgeloracostatu indonesia sun dec artikelterbaru kenapa kompa dan republika tak meliput isu lgbt di bencana paludonggala httpstcofvskrmiuku in quretahttpstwittercomquretastatu indonesia tue dec bangpino muka penjilat jokowi tlg dtg ke rumahku donk sy korban bencana palu jgn cuma omdo in nhaynaattamimihttpstwittercomnhaynaattamimistatu hammer citi wed feb indonesia ada di kawasan rawan bencana sebab itu efektivita penyebaran informasi saat kejadian bencana amat krusial utk disempurnakan menilik bencana palu donggala amp banten kami mengevaluasi model distribusi informasi bencana indonesia hasilnya 💥 httpstco jupcfodxg in hakasasiidhttpstwittercomhakasasiidstatu jakarta capit region"
## [27] "betul sy sampaikan itu krn yg dulu spt bencana palu ntb dikontroversikan scr politik yg satu bilang adzab yg lain bilang ujian pdhal korbannya bercampur aliran politiknya dan banyak org baiknya allah maha pengasih tak mungkin mengadzab dgn membabi buta itu sunnatullah"
## [28] "ketua umum bhayangkari beri trauma heal untuk korban bencana palu httpstcopdugzfeoak httpstcoi amabxia"
## [29] "sudah bulan korban bencana palu masih kesulitan penuhi kebutuhan hidup httpstcohpcbo css"
## [30] "tk bang sdh memberikan semangat kpd saudara sy pelaku usaha di palu smg menjadikan palubangkit sy berharap prabowosandi yg terpilih amp b tetapkan bencana palu sbg bencana nasion agar fasilita kredit pelaku usaha diputihkan krn tempat amp barang usaha sdh tdk ada in rahmanidha httpstwittercomrahmanidha statu bantaeng wed nov bkipm denpasar kembali menyerahkan sumbangan u korban bencana paludonggalaamplombok sumbangan disalurkan lewat act wilayah bali u dihantarkan ke lokasi bencanasemoga sumbangan yg diberikan dp membantuamp bermanfaat bg korban bencana paludonggala amp lombok 📠 onehealthkipm httpstco x f bbehr in bkipmdenpasarhttpstwittercombkipmdenpasarstatu httpspbstwimgcommediadtdybcvamzpjpgdenpasar"
## [31] "tahun aha centr di hari ulang tahun aha center yang ke ini podcast asap indonesia merili episod behindthescen bersama dipo djungdjungan summa selaku resourc mobilis manag aha centr dengan topik respon lembaga di asean terhadap bencana palu ahacentr httpstcon buzp eq"
## [32] "hermanat beritanya bakal heboh menutupi berita jauh yg lebih pent bencana palu tragedi wanena timika kabut asapa kenaikan iuran bpj gugurnya demonstran kecuali satu mbahwir masih di r 🕲 httpstcoyimjswg g"
## [33] "jadi sedih ingat korban bencana palu setelah dihajar gempa likuifaksi dan tsunami hidup berubah drasti listrik air dan pasokan terputu berhari pejabat menghilang warga terpaksa jarah makanan kejahatan meningkat yg trauma pergi dr palu eh skrg ada korona"
## [34] "alhamdulillah hasil ogot dan donasi nonbar manuk sudah di salurkan untuk korban bencana paludonggala dan banten via bigredspalu amp bigredsserang hatur nuhun untuk teman yang udah menyisihkan rezekinya untuk mereka yang membutuhkan semoga dibala sama yang lebih baik 😡 httpstcoakwmrvnoti"
## [35] "orang baik haru didukung korban bencana palu sama lombok belum bere itu semua karena pemdanya gak becu bagibagi sertifikat itu semua karena kepedulian pak jokowi pada rakyat pemda gak ada urusan paham love pak jokowi kamsahamnida spasiba"
## [36] "vivacoid tambah janji nih rumah di lombok rumah di palu uang bencana lombok uang bencana palu rumah di cibitung oya rumah di sinabung semoga beliau tdk diperberat langkahnya krn janji yg pernah di sampaikan kiyaimarufamin md"
## [37] "ini rawan gempa jangan dibangun bandara bendungan perumahan jangan kita mengulangulang kesalahan jkw link tapi peta bencana palu yang dibuat abaikan survei bmkg kompa ' gbr jokowi bnpbindonesia atrbpn infomitigasi httpstcovnv ger h httpstcou fqgy vd"
## [38] "setahun bencana palu habib rotan jangan buat acara yang mengundang bala httpstcorrei ldcuv"
## [39] "hampir setahun bencana palu pengungsi masih tinggal di tenda darurat httpstcopl bldrb g"
## [40] "pemprov sumbar ngirim berton rendang ke daerah yg kena bencanapalu lumajang dll ajamereka yg ngiler"
## [41] "mdmc kalsel berikan pendampingan psikososi bagi korban bencana palu httpstcod y hsa z muhammadiyah mdmc pendampingan psikologi korbanbencanapalu httpstcozdn tgjuti"
## [42] "sementara itu duit buat penanganan dan pemulihan bencana paludonggala dan ntb begitu sulit belum lagi petuga yg meningg kpp gak jela siapa yg mau nanggung itu di depan mata aja gak bere lah ini mau ngomongin pindah ibukota yg duitnya gak jela darimana"
## [43] "ye mau geser soal kebencian agama kaka gw kristen protestan anaknya tinggal di rumah gw kuliah di upn veteran bencana palu sigi dan donggala di kota palu bangun mushola darurat sigi gw bangun gereja darurat agar apa agar semua umat bisa ibadah seperti biasanya"
## [44] "bppt gelar pelepasan mobil air siap minum bppt untuk korban bencana paludonggala selengkapnya httpstco hledzjgol pemerintahbekerja palu jokowi kemkominfo httpstcosucah nzz"
## [45] "zarazettirazr penanganan bencana palu kebakaran hutan kerusuhan papua gempa ambon memanggilmu wahai presiden prioritaskan kepentingan bangsamu daripada egomu miri prihatin"
## [46] "ma wibu jejepangan jkt nyenggol tentang lgbt penyebab bencana palu dan donggala ya i do not know him irl but i rememb when someth from hi past leak in twitter last year"
## [47] "dxdele matthewmarcel icecoldnovemb bro simpati dan empati gak haru disuarakan forget the anya tapi coba lihat lagi di masa awkarin bantuin orangorang bencana palu dan sama sekali dia ga up apapun di ig stori sampai orangmedia lain yang buat chill semua orang bisa bersimpati with their own wai"
## [48] "semangat sore sahabatpupr tahukah sahabat kalau hunian tetap huntap bagi korban bencana palu akan selesai pada desemb loh sultengbangkit httpstcojykutuhr v"
## [49] "sepertinya presiden pemerintah pusat sudah tidak ingat lagi dianggap sudah selesai ~~ hampir setahun bencana palu pengungsi masih tinggal di tenda darurat httpstconinwxgdgyb"
## [50] "kisah archi anj yang tangguh archi tetap maksim dalam bertuga meski kondisi kesehatannya sedang buruk archi juga pernah diterjunkan ke wilayah terdampak bencana palu petobo longsor di manuju dan sapaya gowa sulsel httpstco pbajyretp"
## [51] "pejabat pupr korupsi di tengah bencana paludonggala saksikan kabar petang pukul wib hanya di tvone amp stream di tvone connect android httpstcoqukhwwigl amp io httpstcoqyuxijrgpp kabarpetangtvon httpstco vo hf ksl"
## [52] "ibrahimazzaini sy sama beberapa teman lagi ngunpulin infak dari para penderma untuk membantu para korban bencana palu yg sampai saat ini masih banyak yg belum terkaf mohon doa dan bantuannya bang"
## [53] "wamenlufachir sampaikan apresiasi dan ucapkan terima kasih kepada negara sahabat dan oi yang telah memberikan bantuan kemanusiaan kepada korban terdampak bencana palu di kantin diplomasi httpstcoheqa iqx"
## [54] "presiden jokowi sebelum menambah utang janji baiknya utang yg dulu dibayar duluan penuhi dulu janji bangunperbaiki rumah korban bencana palu sdh tiga tahun mrk menunggu"
## [55] "banyak laporan ttg penanganan rr bencana palu yg lambat perlu evaluasi amp percepatan jokowi bnpbindonesia infomitigasi"
## [56] "enda imanlagi siap bang di sini ada knp kita dukung pembebasan ini ini dokumen yg masih akan berkembang krn sebetulnya banyak kondisi lain dlu pernah pa bencana palu kita juga gagap tp posisi icjr jela di sini thnk diingetin bang enda berikut httpstcov v cxinx"
## [57] "mame ikhlasul d tukt mburin sama saya juga bukan fpicuma lihat sepak terjang mrk pa ngire pengantin masuk ke gereja bencana terutama pa bencana palu menolong tanpa pandang agamamembuat saya malu dulu pernah nggak suka sama mrk"
## [58] "andreqoj lusihq bukitsamata dmarwan kemenagri kemendagriri kemenkumhamri mohmahfudmd iya parah banget laskarislamfpi masa disaat pemerintah gabisa turun ngebantu korban gempa eh mereka udah nyamp duluan ke lokasi bencana palu lombok wamena dan daerah lain yang pemerintah terkesan tak peduli waktu ditimpa bencana mereka duluan bantuin"
## [59] "pemerintah tetapkan zona rawan bencana palu httpstcoqeq hv qce"
## [60] "jokowi yg terpilih jadi ri nanti mesti ambil kebijakan tega pak agr pandangan publik tdk terhalangi oleh bangunan komersil yg menjadi obstacl kesempatan pd daerah pasca bencanapalu lombok caritabanten lega rasanya jk dpt memandang laut tanpa obstacl susipudjiastuti prabowo"
## [61] "berikut ini nominasi anugerah kpi kategori program beritajurnalistik break new tvritvrinasion cnn tech new tran tvtranstvcorp menembu duka bencana palu sigli dan dongala antvantvoffici httpstcom vn wgujo"
## [62] "ingat bencana palu bencana lombok utang bpj kerugian bumn tapi turnamen pubgmobil dibayari negara kadang kami pengen bilang tak elok pengen nabok dan sontoloyo lalu apa lagi ya kata yg pa jumatberkah uangnegarabuatmainan"
## [63] "pagi sob sudah tahu kalau indonesia punya alat mekani multiguna pedesaan ammd pada oktob kemenperin mengirimkan ammd yg dikombinasi dgn alat penjernih air tujuannya mmbantu mngirimkan air bagi para korban bencana palu yg kesulitan mendapatkan aks air bersih httpstco iajrbdczd"
## [64] "cek pemulihan bencana palu beliau sungguh berhati mulia ini mungkin karena presidennya tidak peduli nih sama bencana palu sehingga haru ada pemimpin di tingkat bawah setelah presiden gubernur yang berinisiatif mungkin loh ya ini mungkin namanya juga bersangka baik"
## [65] "xxfrelxx hujandisenja sovietfoxtrot my short stori seorang anak kecil melapor malammalam kepada relawan dan tentara pasca bencana palu ada mayat di sana kami bergega mengevakuasi di lokasi yang ditunjuk anak tadi kami melihat sesosok mayat di reruntuhan mayat anak kecil yang memberitahu kami"
## [66] "detikcom mari coba saya bantu list bpj tekor rupiah meroket kasu novel baswedan kebakaran hutan di kalimantan korban penggusuran konflik agraria neraca perdagangan minu korban bencana palu dan lombok jir abi bata karakternya"
## [67] "kemenko polhukam pantau verifikasi data penduduk terdampak bencana palu httpstco lagdhihh"
## [68] "putrawadapi apakah ini orang yg sama yang janji pada bencana palu dan lombokaku terkesima hatihati prankowi beraksi"
## [69] "tirtoid sebentar lagi kasu legalisasi penjarahan saat bencana palu juga mau voni semoga ada pembelajaran untuk pak joko agar memilih pembantu yang lebih baik dari saat ini"
## [70] "rumah adat lobo dari kulawi bisa jadi solusi bangunan tahan gempa inisiatif rumah bambu dari asfid tak hanya sekadar hunian bagi penyinta bencana palu tapi sekaligu mengembangkan potensi ekonomi dan keterampilan warga di desa balapopu httpstco xefsjymvi httpstcozd vdt qr"
## [71] "tuntut hak pascatiga tahun bencana palu penyinta geruduk kantor wali kota httpstcokfxuj som"
## [72] "pupr huntara untuk korban bencana palu rampung februari httpstcoxjqmsg zxu"
## [73] "gitar bertanda tangan seluruh personel megadeth resmi terjual rp juta dalam acara lelang untuk bencana palu httpstcomsgjfckhfv"
## [74] "donadam jadi inget si panglima biawak pa bencana palu minta tolong sana sini untuk di carikan tiket pesawat ke palu karna keluarganya disana tidak bisa di hubungieh pa sudah di bantumalah nyinyir lagisama seperti nolongin anj kejepit jadinya"
## [75] "sudah hampir tiga bulan kami tidak mendapatkan bantuan kata warga huntara korban bencana palu publisherstori httpstco tbncleyww"lemmatize_strings(rev)## [1] "setahun pasca bencana palu msh ada warga yg menempati tenda pengunsian mdh a apa yg diperintahkan bpk presiden kpd menteri pupr wamenkeu amp kepla bnpb utk wamena bisa terealisasi dg baik soalnya perintah yg sama utk palu amp ntb blm selesai jg bgm dg sdr kita di ambon nanti httpstcopdlxriwmnp"
## [2] "slankers malang galang dana aksi donasi utk bencana palu donggala keren kebalik dg yg di semarang pake uang rakyat fitnahnagabonar httpstcoyjpxjlkwxn"
## [3] "beliau pejuang kemanusiaan tdk sdkt yg menyebut beliau orang baik gratiskan pasien bantu bencana palu ambon sumbar dll andai mnrt hukum penguasa beliau bersalah layakkah beliau tanpa pengadilan diadili dijalan saya jd ikut bertanya apa yg diketahuinya 🬩prayfordoktersunardi httpstcobhhpjv ld"
## [4] "hampir setahun bencana palu pengungsi masih tinggal di tenda darurat httpstcojrejc y e"
## [5] "pak jokowi dulu bpk bilang bencana palu seminggu akan diselesaikan sehingga normal kembali kehidupan seharihari masyarakat di sana ini sdh bulan msh byk korban bencana yg tinggal di pengungsian penuhi janji itu lbh urgent pak drpd cari lokasi buat ibu kota baru httpstcoatedovzjio"
## [6] "setahun bencana palu banyak korban masih tinggal di tenda yang bilang palu pulih setelah satu minggu semenjak bencana orangnya masih hidup httpstcoev orrllra"
## [7] "pakjk memimpin rapat rekonstruksi dampak bencana paludonggala sulteng pak jk menegaskan pemerintah tetap memperhatikan daerah bencana sekalipun indonesia sedang menghadapi pilpres httpstcosotwk vne"
## [8] "kenapa emang aksi sosialnya untuk pendidikan juga ada di indonesia mau bahas ihr itu narasumber tau apa kagak ihr pernah bantu korban bencana palu dan juga selama ini kerja sama dengan pbb di campcamp pengungsi bencana kemanusiaan dan konflik nyumbang kagak"
## [9] "tanyakan pada korban bencana palu lombok dan longsor dibeberapa wilayah di jawa barat baru semua tu"
## [10] "setahun pascabencana palu masih ada warga yang menempati tendatenda pengungsian mereka tak hanya menghadapi masalah tempat tinggal tapi juga pekerjaan pendidikan bahkan air bersih simak perjalanan kumparan bertemu warga terdampak bencana palu di httpstcof kvm wsgv httpstcoxo e q s"
## [11] "thread kejadian ganjil pasca bencana palu iyaphallosalamualaikum sababt teel jdi nagih mo bikin thread horor lg ni mmpung masi fresh crita dikpala dan ada mood jgkali ini aku mo crita tntang bbrpa kjdian ganjil pasca bencana palu let go httpstcov znad frq"
## [12] "waktu kanak emak berpikir hanya orang kaya yg bisa bantu org lie setelah emak dewasa emak baru mengerti ternyata orang miskin pun bisa membantu orang lie ada seorang miskin namun krn dia b menggerakkan org utk membantu bencana palu bbrp th lalu lwt dia terkumpul dana be"
## [13] "kuasa allah swt lah yg mengatur semua nya trmasuk bhw tsunami aceh trjadi di zaman pak sbyudhoyono ga kebayang jika trjadi skarang 👳 jgn kan skala aceh bencana palu amp lombok sja ga ke urus maaf anda hr bnyak blajar pak jokowi 👳 kspgoid fahrihamzah jansenjsp httpstcoa uxi urfo"
## [14] "the jakmania korwil kebayoran barugk mengadakan acara penggalangan dana untuk korban bencana paludonggala hadir dalam kesempatan itu perwakilan pemain persija sandi sute ketua the jakmania bung fery dan dirut persija gede widiade persijajakarta persijaselamanya httpstcooacya k l"
## [15] "water palu sejam tiada air mungkin kita di malaysia dah mengeluh bayangkan berharihari bermingguminggu tanpa air bersih utk minum masak amp mencuci namun itulah yg terpaksa dilalui mangsa bencana palu so help us to help them water palu kkb palu spreadinghumanity httpstcov yu xao"
## [16] "film yg memotret perjuangan adik amp guru pasca bencana palu mohon retweetnya you kakak maman husenjafar ulil ernestprakasa nadir alissawahid kemdikbudri"
## [17] "bencana palu iluni ui serahkan dana miliar kepada kementerian pupr httpstcowsiwyejsmz httpstco ryjv wqfh"
## [18] "on progress puji tuhan huntap project bencana palu🐰 httpstco hkhajzfrk"
## [19] "ketika aksi demo menuntut kecurangan pemilu rezim begitu sigap total bahkan menghalalkan segala cara untuk menghalau tapi jika terkait kepedulian terhadap rakyat yg tertimpa musibah mereka abai bencana palu ntb dst hingga corona lalu medium dan buzzerp memanipulasi fakta"
## [20] "pun juga saat bencana palu semua bantuan dari label berlogo partai cebong rekanrekan saya yang di lapangan menolak untuk dimasukkan ke dalam logsitik tim dompet dhuafa"
## [21] "haloo sahabat selamat pagi menjelang siang ada kabar gembira nih setelah melalui beberapa prose sebelumnya akhirnya hunian tetap huntap untuk korban terdampak bencana palu sigi dan donggala pasigala siap dibangun puprsigapmembangunnegeri infoditjenck httpstcon nbplw be"
## [22] "hari ini di healthylifettv ketemu saudara korban bencana palu amp banten orang kuat yang mewakili sekian banyak korban lainnya kita doakan segala yg terbaik untuk pemulihan keadaan di httpstco ypm p x"
## [23] "belum saja selesai penanganan bencana palu amp donggala angin kencang di palembang dan jatuhnya pesawat lion air sudah menyusul kota padang yg disapu banjir"
## [24] "setahun bencana palu banyak korban masih tinggal di tendamereka berharap apa yang dijanjikan pemerintah tidak hanya sebatas janji tetapi segera diteralisasikan usul nih gmn klo tuker guling aset seperti halnya ibukota yg baru pinokioingkarjanji httpstcouqwarjs s"
## [25] "setahun lalu bersama pak sutopopn apa kabar pak disana sudah tidak kesakitan lagi luar biasa jam pagi baru selesai kemo dan jam dan konfrens update bencana palu httpstcoal kwlezpw"
## [26] "gubernur indonesia bisa nyumbang bencana palu donggala membiayai warganya mudik dan balik gratis apa iya sekelas kpu yang sudah ada anggaran pemilunya tidak bisa menghadirkan saksi atau melengkapi berkasnya sekalipun itu dari seluruh kota di indonesia 💥 in na na httpstwittercomna na status wed may persen pengungsi bencana palu masih tinggal di tenda pengungsian httpstcodzjxnmsfd in geloracohttpstwittercomgeloracostatus indonesia sun dec artikelterbaru kenapa kompas dan republika tak meliput isu lgbt di bencana paludonggala httpstcofvskrmiuku in quretahttpstwittercomquretastatus indonesia tue dec bangpino muka penjilat jokowi tlg dtg ke rumahku donk sy korban bencana palu jgn cuma omdo in nhaynaattamimihttpstwittercomnhaynaattamimistatus hammer city wed feb indonesia ada di kawasan rawan bencana sebab itu efektivitas penyebaran informasi saat kejadian bencana amat krusial utk disempurnakan menilik bencana palu donggala amp banten kami mengevaluasi model distribusi informasi bencana indonesia hasilnya 💥 httpstco jupcfodxg in hakasasiidhttpstwittercomhakasasiidstatus jakarta capital region"
## [27] "betul sy sampaikan itu krn yg dulu spt bencana palu ntb dikontroversikan scr politik yg satu bilang adzab yg lie bilang ujian pdhal korbannya bercampur aliran politiknya dan banyak org baiknya allah maha pengasih tak mungkin mengadzab dgn membabi buta itu sunnatullah"
## [28] "ketua umum bhayangkari beri trauma heal untuk korban bencana palu httpstcopdugzfeoak httpstcoy amabxia"
## [29] "sudah bulan korban bencana palu masih kesulitan penuhi kebutuhan hidup httpstcohpcbo css"
## [30] "tks bang sdh memberikan semangat kpd saudara sy pelaku usaha di palu smg menjadikan palubangkit sy berharap prabowosandi yg terpilih amp b tetapkan bencana palu sbg bencana nasional agar fasilitas kredit pelaku usaha diputihkan krn tempat amp barang usaha sdh tdk ada in rahmanidha httpstwittercomrahmanidha status bantaeng wed nov bkipm denpasar kembali menyerahkan sumbangan u korban bencana paludonggalaamplombok sumbangan disalurkan lewat act wilayah bali u dihantarkan ke lokasi bencanasemoga sumbangan yg diberikan dp membantuamp bermanfaat bg korban bencana paludonggala amp lombok 📠 onehealthkipm httpstco x f bbehr in bkipmdenpasarhttpstwittercombkipmdenpasarstatus httpspbstwimgcommediadtdybcvamzpjpgdenpasar"
## [31] "tahun aha centre di hari ulang tahun aha center yang ke ini podcast asap indonesia merilis episode behindthescene bersama dipo djungdjungan summa selaku resource mobilisation manager aha centre dengan topik respon lembaga di asean terhadap bencana palu ahacentre httpstcon buzp eq"
## [32] "hermanat beritanya bakal heboh menutupi berita jauh yg lebih penting bencana palu tragedi wanena timika kabut asapa kenaikan iuran bpjs gugurnya demonstran kecuali satu mbahwir masih di r 🕲 httpstcoyimjswge g"
## [33] "jadi sedih ingat korban bencana palu setelah dihajar gempa likuifaksi dan tsunami hidup berubah drastis listrik air dan pasokan terputus berhari pejabat menghilang warga terpaksa jarah makanan kejahatan meningkat yg trauma pergi dr palu eh skrg ada korona"
## [34] "alhamdulillah hasil ogot dan donasi nonbar manuk sudah di salurkan untuk korban bencana paludonggala dan banten via bigredspalu amp bigredsserang hatur nuhun untuk teman yang udah menyisihkan rezekinya untuk mereka yang membutuhkan semoga dibalas sama yang lebih baik 😡 httpstcoakwmrvnoti"
## [35] "orang baik harus didukung korban bencana palu sama lombok belum beres itu semua karena pemdanya gak becus bagibagi sertifikat itu semua karena kepedulian pak jokowi pada rakyat pemda gak ada urusan paham love pak jokowi kamsahamnida spasiba"
## [36] "vivacoid tambah janji nih rumah di lombok rumah di palu uang bencana lombok uang bencana palu rumah di cibitung oya rumah di sinabung semoga beliau tdk diperberat langkahnya krn janji yg pernah di sampaikan kiyaimarufamin md"
## [37] "ini rawan gempa jangan dibangun bandara bendungan perumahan jangan kita mengulangulang kesalahan jkw link tapi peta bencana palu yang dibuat abaikan survei bmkg kompas ' gbr jokowi bnpbindonesia atrbpn infomitigasi httpstcovnve ger h httpstcou fqgy vd"
## [38] "setahun bencana palu habib rotan jangan buat acara yang mengundang bala httpstcorrei ldcuv"
## [39] "hampir setahun bencana palu pengungsi masih tinggal di tenda darurat httpstcopl bldrb g"
## [40] "pemprov sumbar ngirim berton rendang ke daerah yg kena bencanapalu lumajang dll ajamereka yg ngiler"
## [41] "mdmc kalsel berikan pendampingan psikososial bagi korban bencana palu httpstcod y hsa z muhammadiyah mdmc pendampingan psikologi korbanbencanapalu httpstcozdn tgjuti"
## [42] "sementara itu duit buat penanganan dan pemulihan bencana paludonggala dan ntb begitu sulit belum lagi petugas yg meninggal kpps gak jelas siapa yg mau nanggung itu di depan mata aja gak beres lah ini mau ngomongin pindah ibukota yg duitnya gak jelas darimana"
## [43] "ye mau geser soal kebencian agama kaka gw kristen protestan anaknya tinggal di rumah gw kuliah di upn veteran bencana palu sigi dan donggala di kota palu bangun mushola darurat sigi gw bangun gereja darurat agar apa agar semua umat bisa ibadah seperti biasanya"
## [44] "bppt gelar pelepasan mobile air siap minum bppt untuk korban bencana paludonggala selengkapnya httpstco hledzjgol pemerintahbekerja palu jokowi kemkominfo httpstcosucah nzz"
## [45] "zarazettirazr penanganan bencana palu kebakaran hutan kerusuhan papua gempa ambon memanggilmu wahai presiden prioritaskan kepentingan bangsamu daripada egomu miris prihatin"
## [46] "ma wibu jejepangan jkt nyenggol tentang lgbt penyebab bencana palu dan donggala you i do not know him irl but i remember when something from his past leak in twitter last year"
## [47] "dxdele matthewmarcell icecoldnovember bro simpati dan empati gak harus disuarakan forget the anya tapi coba lihat lagi di masa awkarin bantuin orangorang bencana palu dan sama sekali dia ga up apapun di ig story sampai orangmedia lie yang buat chill semua orang bisa bersimpati with their own way"
## [48] "semangat sore sahabatpupr tahukah sahabat kalau hunian tetap huntap bagi korban bencana palu akan selesai pada desember loh sultengbangkit httpstcojykutuhr v"
## [49] "sepertinya presiden pemerintah pusat sudah tidak ingat lagi dianggap sudah selesai ~~ hampir setahun bencana palu pengungsi masih tinggal di tenda darurat httpstconinwxgdgyb"
## [50] "kisah archi anjing yang tangguh archi tetap maksimal dalam bertugas meski kondisi kesehatannya sedang buruk archi juga pernah diterjunkan ke wilayah terdampak bencana palu petobo longsor di manuju dan sapaya gowa sulsel httpstco pbajyretp"
## [51] "pejabat pupr korupsi di tengah bencana paludonggala saksikan kabar petang pukul wib hanya di tvone amp stream di tvone connect android httpstcoqukhwwigl amp ios httpstcoqyuxijrgpp kabarpetangtvone httpstco vo hf ksl"
## [52] "ibrahimazzaini sy sama beberapa teman lagi ngunpulin infak dari para penderma untuk membantu para korban bencana palu yg sampai saat ini masih banyak yg belum terkafer mohon doa dan bantuannya bang"
## [53] "wamenlufachir sampaikan apresiasi dan ucapkan terima kasih kepada negara sahabat dan oi yang telah memberikan bantuan kemanusiaan kepada korban terdampak bencana palu di kantin diplomasi httpstcoheqa iqx"
## [54] "presiden jokowi sebelum menambah utang janji baiknya utang yg dulu dibayar duluan penuhi dulu janji bangunperbaiki rumah korban bencana palu sdh tiga tahun mrk menunggu"
## [55] "banyak laporan ttg penanganan rr bencana palu yg lambat perlu evaluasi amp percepatan jokowi bnpbindonesia infomitigasi"
## [56] "enda imanlagi siap bang di sini ada knp kita dukung pembebasan ini ini dokumen yg masih akan berkembang krn sebetulnya banyak kondisi lie dlu pernah pa bencana palu kita juga gagap tp posisi icjr jelas di sini thnks diingetin bang enda berikut httpstcov v cxinx"
## [57] "mame ikhlasul have tukt mburin sama saya juga bukan fpicuma lihat sepak terjang mrk pa ngiring pengantin masuk ke gereja bencana terutama pa bencana palu menolong tanpa pandang agamamembuat saya malu dulu pernah nggak suka sama mrk"
## [58] "andreqoje lusihq bukitsamata dmarwan kemenagri kemendagriri kemenkumhamri mohmahfudmd iya parah banget laskarislamfpi masa disaat pemerintah gabisa turun ngebantu korban gempa eh mereka udah nyampe duluan ke lokasi bencana palu lombok wamena dan daerah lie yang pemerintah terkesan tak peduli waktu ditimpa bencana mereka duluan bantuin"
## [59] "pemerintah tetapkan zona rawan bencana palu httpstcoqeq hv qce"
## [60] "jokowi yg terpilih jadi ri nanti mesti ambil kebijakan tegas pak agr pandangan publik tdk terhalangi oleh bangunan komersil yg menjadi obstacle kesempatan pd daerah pasca bencanapalu lombok caritabanten lega rasanya jk dpt memandang laut tanpa obstacle susipudjiastuti prabowo"
## [61] "berikut ini nominasi anugerah kpi kategori program beritajurnalistik break news tvritvrinasional cnn tech news trans tvtranstvcorp menembus duka bencana palu sigli dan dongala antvantvofficial httpstcom vn wgujo"
## [62] "ingat bencana palu bencana lombok utang bpjs kerugian bumn tapi turnamen pubgmobile dibayari negara kadang kami pengen bilang tak elok pengen nabok dan sontoloyo lalu apa lagi you kata yg pa jumatberkah uangnegarabuatmainan"
## [63] "pagi sob sudah tahu kalau indonesia punya alat mekanis multiguna pedesaan ammdes pada oktober kemenperin mengirimkan ammdes yg dikombinasi dgn alat penjernih air tujuannya mmbantu mngirimkan air bagi para korban bencana palu yg kesulitan mendapatkan akses air bersih httpstco iajrbdczd"
## [64] "cek pemulihan bencana palu beliau sungguh berhati mulia ini mungkin karena presidennya tidak peduli nih sama bencana palu sehingga harus ada pemimpin di tingkat bawah setelah presiden gubernur yang berinisiatif mungkin loh you ini mungkin namanya juga bersangka baik"
## [65] "xxfrelxx hujandisenja sovietfoxtrot my short story seorang anak kecil melapor malammalam kepada relawan dan tentara pasca bencana palu ada mayat di sana kami bergegas mengevakuasi di lokasi yang ditunjuk anak tadi kami melihat sesosok mayat di reruntuhan mayat anak kecil yang memberitahu kami"
## [66] "detikcom mari coba saya bantu list bpjs tekor rupiah meroket kasus novel baswedan kebakaran hutan di kalimantan korban penggusuran konflik agraria neraca perdagangan minus korban bencana palu dan lombok jir abis batas karakternya"
## [67] "kemenko polhukam pantau verifikasi datum penduduk terdampak bencana palu httpstco lagdhihh"
## [68] "putrawadapi apakah ini orang yg sama yang janji pada bencana palu dan lombokaku terkesima hatihati prankowi beraksi"
## [69] "tirtoid sebentar lagi kasus legalisasi penjarahan saat bencana palu juga mau vonis semoga ada pembelajaran untuk pak joko agar memilih pembantu yang lebih baik dari saat ini"
## [70] "rumah adat lobo dari kulawi bisa jadi solusi bangunan tahan gempa inisiatif rumah bambu dari asfid tak hanya sekadar hunian bagi penyintas bencana palu tapi sekaligus mengembangkan potensi ekonomi dan keterampilan warga di desa balapopu httpstco xefsjymvi httpstcozd vdt qr"
## [71] "tuntut hak pascatiga tahun bencana palu penyintas geruduk kantor wali kota httpstcokfxuj som"
## [72] "pupr huntara untuk korban bencana palu rampung februari httpstcoxjqmsg zxu"
## [73] "gitar bertanda tangan seluruh personel megadeth resmi terjual rp juta dalam acara lelang untuk bencana palu httpstcomsgjfckhfv"
## [74] "donadam jadi inget si panglima biawak pa bencana palu minta tolong sana sini untuk di carikan tiket pesawat ke palu karna keluarganya disana tidak bisa di hubungieh pa sudah di bantumalah nyinyir lagisama seperti nolongin anjing kejepit jadinya"
## [75] "sudah hampir tiga bulan kami tidak mendapatkan bantuan kata warga huntara korban bencana palu publisherstory httpstco tbncleyww"sc<-c("driver","drive","drove","driven","drives","driving")
stem_words(sc)## [1] "driver" "drive" "drove" "driven" "drive" "drive"lemmatize_words(sc)## [1] "driver" "drive" "drive" "drive" "drive" "drive"#menghapus kata penghubung
rev <-removeWords(rev, c("di","dan","yang","akan","agar","seperti","yaitu","kami","kami",
"mari","pada","jelang","dimana","dengan","kamu","ini","seluruh",
"diminta","tak","itu","hai","bisa","bkn","oleh","amp","jam",
"masa","berikut","kalau","klik","kyungsoo","tuh","httpstconvv",
"httpstcoxu","yzmrlyx","nya","bts","kota","tuh","kpuid","rt","hingga","saat",
"belum","apa","sih","suara","wkwkwk","bgt","bkngoid","httpstco","asn","bakal"))
head(rev)## [1] "setahun pasca bencana palu msh ada warga yg menempati tenda pengunsian mdh an yg diperintahkan bpk presiden kpd menteri pupr wamenkeu kepla bnpb utk wamena terealisasi dg baik soalnya perintah yg sama utk palu ntb blm selesai jg bgm dg sdr kita ambon nanti httpstcopdlxriwmnp"
## [2] "slankers malang galang dana aksi donasi utk bencana palu donggala keren kebalik dg yg semarang pake uang rakyat fitnahnagabonar httpstcoyjpxjlkwxn"
## [3] "beliau pejuang kemanusiaan tdk sdkt yg menyebut beliau orang baik gratiskan pasien bantu bencana palu ambon sumbar dll andai mnrt hukum penguasa beliau bersalah layakkah beliau tanpa pengadilan diadili dijalan saya jd ikut bertanya yg diketahuinya 🬩prayfordoktersunardi httpstcobhhpjv ld"
## [4] "hampir setahun bencana palu pengungsi masih tinggal tenda darurat httpstcojrejc y e"
## [5] "pak jokowi dulu bpk bilang bencana palu seminggu diselesaikan sehingga normal kembali kehidupan seharihari masyarakat sana sdh bulan msh byk korban bencana yg tinggal pengungsian penuhi janji lbh urgent pak drpd cari lokasi buat ibu baru httpstcoatedovzjio"
## [6] "setahun bencana palu banyak korban masih tinggal tenda bilang palu pulih setelah satu minggu semenjak bencana orangnya masih hidup httpstcoev orrllra"write.csv(rev,file = "C:/Users/LENOVO-PC/OneDrive/Documents/UTS_NURFADILA_E0221008/databencana2_palu.csv", row.names = F) ##Membuat Word Cloud #Mengubah Data Frame Menjadi Data Faktor
tdm <- TermDocumentMatrix(rev)
tdm## <<TermDocumentMatrix (terms: 1211, documents: 75)>>
## Non-/sparse entries: 1859/88966
## Sparsity : 98%
## Maximal term length: 49
## Weighting : term frequency (tf)m <- as.matrix(tdm)
View(m)
v <- sort(rowSums(m),decreasing = TRUE)
head(v)## bencana palu korban untuk ada masih
## 93 83 29 16 15 12#Mengubah Data Faktor Menjadi Data Frame
d <- data.frame(word = names(v), freq = v)
head(d)## word freq
## bencana bencana 93
## palu palu 83
## korban korban 29
## untuk untuk 16
## ada ada 15
## masih masih 12wordcloud(d$word, d$freq,
random.order = FALSE,
max.words = 500,
colors = brewer.pal(name = "Dark2",8 ))
##Term Dokument Matriks
tdm <- TermDocumentMatrix(rev,
control = list(wordLengths = c(1, Inf)))
tdm## <<TermDocumentMatrix (terms: 1283, documents: 75)>>
## Non-/sparse entries: 1986/94239
## Sparsity : 98%
## Maximal term length: 49
## Weighting : term frequency (tf)inspect frequent words
(freq.terms <- findFreqTerms(tdm, lowfreq = 50))## [1] "bencana" "palu"term.freq <- rowSums(as.matrix(tdm))
term.freq <- subset(term.freq, term.freq >= 50)
df <- data.frame(term = names(term.freq), freq = term.freq)
ggplot(df, aes(x = term, y = freq)) + geom_bar(stat = "identity") +
xlab("Terms") + ylab("Count") + coord_flip()
which words are associated with ‘r’?
findAssocs(tdm, "bencana", 0.2)## $bencana
## wed
## 0.91
## in
## 0.89
## amat
## 0.84
## anggaran
## 0.84
## artikelterbaru
## 0.84
## atau
## 0.84
## balik
## 0.84
## bangpino
## 0.84
## berkasnya
## 0.84
## capital
## 0.84
## city
## 0.84
## cuma
## 0.84
## dec
## 0.84
## disempurnakan
## 0.84
## distribusi
## 0.84
## donk
## 0.84
## dtg
## 0.84
## efektivitas
## 0.84
## feb
## 0.84
## geloracohttpstwittercomgeloracostatus
## 0.84
## gratis
## 0.84
## hakasasiidhttpstwittercomhakasasiidstatus
## 0.84
## hammer
## 0.84
## hasilnya
## 0.84
## httpstcodzjxnmsfd
## 0.84
## httpstcofvskrmiuku
## 0.84
## httpstwittercomna
## 0.84
## informasi
## 0.84
## isu
## 0.84
## jakarta
## 0.84
## jupcfodxg
## 0.84
## kawasan
## 0.84
## kpu
## 0.84
## krusial
## 0.84
## may
## 0.84
## melengkapi
## 0.84
## meliput
## 0.84
## membiayai
## 0.84
## mengevaluasi
## 0.84
## menghadirkan
## 0.84
## menilik
## 0.84
## model
## 0.84
## mudik
## 0.84
## muka
## 0.84
## na
## 0.84
## nhaynaattamimihttpstwittercomnhaynaattamimistatus
## 0.84
## omdo
## 0.84
## pemilunya
## 0.84
## penjilat
## 0.84
## penyebaran
## 0.84
## persen
## 0.84
## quretahttpstwittercomquretastatus
## 0.84
## region
## 0.84
## republika
## 0.84
## rumahku
## 0.84
## saksi
## 0.84
## sebab
## 0.84
## sekelas
## 0.84
## status
## 0.84
## sun
## 0.84
## tlg
## 0.84
## tue
## 0.84
## warganya
## 0.84
## 💥
## 0.84
## indonesia
## 0.83
## sekalipun
## 0.67
## kenapa
## 0.67
## nyumbang
## 0.67
## kejadian
## 0.67
## gubernur
## 0.67
## iya
## 0.67
## jgn
## 0.58
## kompas
## 0.58
## lgbt
## 0.58
## palu
## 0.56
## sy
## 0.56
## ada
## 0.54
## donggala
## 0.53
## pengungsian
## 0.53
## banten
## 0.46
## rawan
## 0.46
## paludonggala
## 0.42
## pengungsi
## 0.39
## ke
## 0.36
## tenda
## 0.34
## act
## 0.34
## bali
## 0.34
## bantaeng
## 0.34
## barang
## 0.34
## bbehr
## 0.34
## bencanasemoga
## 0.34
## bermanfaat
## 0.34
## bg
## 0.34
## bkipm
## 0.34
## bkipmdenpasarhttpstwittercombkipmdenpasarstatus
## 0.34
## denpasar
## 0.34
## diberikan
## 0.34
## dihantarkan
## 0.34
## diputihkan
## 0.34
## disalurkan
## 0.34
## dp
## 0.34
## f
## 0.34
## fasilitas
## 0.34
## httpspbstwimgcommediadtdybcvamzpjpgdenpasar
## 0.34
## httpstwittercomrahmanidha
## 0.34
## kredit
## 0.34
## lewat
## 0.34
## membantuamp
## 0.34
## menjadikan
## 0.34
## menyerahkan
## 0.34
## nasional
## 0.34
## nov
## 0.34
## onehealthkipm
## 0.34
## palubangkit
## 0.34
## paludonggalaamplombok
## 0.34
## pelaku
## 0.34
## prabowosandi
## 0.34
## rahmanidha
## 0.34
## sbg
## 0.34
## smg
## 0.34
## sumbangan
## 0.34
## tks
## 0.34
## u
## 0.34
## usaha
## 0.34
## 📠
## 0.34
## kembali
## 0.31
## sdh
## 0.31
## tidak
## 0.31
## tinggal
## 0.30
## lokasi
## 0.26
## utk
## 0.25
## korban
## 0.25
## dari
## 0.25
## kpd
## 0.22
## masih
## 0.22
## tempat
## 0.22
## bs
## 0.22
## saudara
## 0.22
## x
## 0.22
## berharap
## 0.22
## memberikan
## 0.22
## semangat
## 0.22
## tetapkan
## 0.22which words are associated with ‘r’?
findAssocs(tdm, "palu", 0.2)## $palu
## bencana
## 0.56
## wed
## 0.51
## in
## 0.50
## bayangkan
## 0.49
## berharihari
## 0.49
## bermingguminggu
## 0.49
## dah
## 0.49
## dilalui
## 0.49
## help
## 0.49
## itulah
## 0.49
## kkb
## 0.49
## malaysia
## 0.49
## mangsa
## 0.49
## masak
## 0.49
## mencuci
## 0.49
## mengeluh
## 0.49
## sejam
## 0.49
## so
## 0.49
## spreadinghumanity
## 0.49
## them
## 0.49
## tiada
## 0.49
## to
## 0.49
## us
## 0.49
## water
## 0.49
## xao
## 0.49
## yu
## 0.49
## amat
## 0.49
## anggaran
## 0.49
## artikelterbaru
## 0.49
## atau
## 0.49
## balik
## 0.49
## bangpino
## 0.49
## berkasnya
## 0.49
## capital
## 0.49
## city
## 0.49
## cuma
## 0.49
## dec
## 0.49
## disempurnakan
## 0.49
## distribusi
## 0.49
## donk
## 0.49
## dtg
## 0.49
## efektivitas
## 0.49
## feb
## 0.49
## geloracohttpstwittercomgeloracostatus
## 0.49
## gratis
## 0.49
## hakasasiidhttpstwittercomhakasasiidstatus
## 0.49
## hammer
## 0.49
## hasilnya
## 0.49
## httpstcodzjxnmsfd
## 0.49
## httpstcofvskrmiuku
## 0.49
## httpstwittercomna
## 0.49
## informasi
## 0.49
## isu
## 0.49
## jakarta
## 0.49
## jupcfodxg
## 0.49
## kawasan
## 0.49
## kpu
## 0.49
## krusial
## 0.49
## may
## 0.49
## melengkapi
## 0.49
## meliput
## 0.49
## membiayai
## 0.49
## mengevaluasi
## 0.49
## menghadirkan
## 0.49
## menilik
## 0.49
## model
## 0.49
## mudik
## 0.49
## muka
## 0.49
## na
## 0.49
## nhaynaattamimihttpstwittercomnhaynaattamimistatus
## 0.49
## omdo
## 0.49
## pemilunya
## 0.49
## penjilat
## 0.49
## penyebaran
## 0.49
## persen
## 0.49
## quretahttpstwittercomquretastatus
## 0.49
## region
## 0.49
## republika
## 0.49
## rumahku
## 0.49
## saksi
## 0.49
## sebab
## 0.49
## sekelas
## 0.49
## sun
## 0.49
## tlg
## 0.49
## tue
## 0.49
## warganya
## 0.49
## 💥
## 0.49
## ada
## 0.47
## kejadian
## 0.46
## terpaksa
## 0.46
## gubernur
## 0.46
## status
## 0.46
## utk
## 0.45
## indonesia
## 0.43
## donggala
## 0.37
## pengungsian
## 0.37
## bersih
## 0.37
## httpstcov
## 0.37
## kenapa
## 0.34
## nyumbang
## 0.34
## namun
## 0.34
## jgn
## 0.34
## minum
## 0.34
## iya
## 0.34
## kompas
## 0.34
## lgbt
## 0.34
## tenda
## 0.31
## tinggal
## 0.30
## air
## 0.30
## sy
## 0.29
## mungkin
## 0.28
## tidak
## 0.28
## rawan
## 0.27
## masih
## 0.23
## kpd
## 0.22
## menempati
## 0.22
## sekalipun
## 0.22
## tempat
## 0.22
## kita
## 0.21
## warga
## 0.21remove sparse terms
tdm2 <- removeSparseTerms(tdm, sparse = 0.95)
m2 <- as.matrix(tdm2)cluster hierarchical terms
distMatrix <- dist(scale(m2))
fit <- hclust(distMatrix, method = "ward.D")
fit##
## Call:
## hclust(d = distMatrix, method = "ward.D")
##
## Cluster method : ward.D
## Distance : euclidean
## Number of objects: 72plot(fit)
rect.hclust(fit, k = 2) # cut tree into 6 clusters
#Cluster k-means
m3 <- t(m2) # transpose the matrix to cluster documents (tweets)
set.seed(122) # set a fixed random seed
k <- 2 # number of clusters
kmeansResult <- kmeans(m3, k)
round(kmeansResult$centers, digits = 3) # cluster centers## ada baik bencana kita ntb palu pasca presiden sama selesai setahun
## 1 0.176 0.081 1.149 0.081 0.054 1.068 0.081 0.068 0.135 0.068 0.122
## 2 2.000 0.000 8.000 0.000 0.000 4.000 0.000 0.000 0.000 0.000 0.000
## tenda utk warga yg dana donggala bantu orang saya tanpa tdk darurat
## 1 0.068 0.068 0.081 0.527 0.054 0.068 0.054 0.108 0.068 0.054 0.054 0.068
## 2 1.000 1.000 0.000 0.000 0.000 2.000 0.000 0.000 0.000 0.000 0.000 0.000
## hampir masih pengungsi tinggal baru bilang buat dulu janji jokowi korban
## 1 0.054 0.149 0.054 0.108 0.068 0.068 0.054 0.068 0.095 0.122 0.378
## 2 0.000 1.000 1.000 1.000 0.000 0.000 0.000 0.000 0.000 1.000 1.000
## lokasi pak banyak setelah daerah indonesia paludonggala pemerintah tetap
## 1 0.054 0.149 0.095 0.068 0.054 0.054 0.095 0.081 0.054
## 2 0.000 0.000 0.000 0.000 0.000 6.000 1.000 0.000 0.000
## juga mau pernah untuk lombok semua air hanya mereka tapi terdampak
## 1 0.122 0.068 0.068 0.216 0.135 0.095 0.122 0.068 0.068 0.081 0.068
## 2 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000 0.000
## krn lain lalu ke dalam ya dari nih penanganan sudah tidak lagi
## 1 0.068 0.081 0.054 0.122 0.054 0.054 0.068 0.054 0.054 0.122 0.081 0.095
## 2 0.000 0.000 0.000 1.000 0.000 0.000 1.000 0.000 0.000 1.000 1.000 0.000
## sy gempa jadi rumah bagi pas
## 1 0.054 0.068 0.054 0.108 0.054 0.081
## 2 1.000 0.000 0.000 0.000 0.000 0.000for (i in 1:k) {
cat(paste("cluster ", i, ": ", sep = ""))
s <- sort(kmeansResult$centers[i, ], decreasing = T)
cat(names(s)[1:5], "\n")
# print the tweets of every cluster
# print(tweets[which(kmeansResult£cluster==i)])
}## cluster 1: bencana palu yg korban untuk
## cluster 2: bencana indonesia palu ada donggala##Analisis Sentiment
setwd("C:/Users/LENOVO-PC/OneDrive/Documents/UTS_NURFADILA_E0221008")
diabet.df<- read_xlsx("databencana_palu1.xlsx")
head(diabet.df)## # A tibble: 6 × 2
## x komen
## <chr> <chr>
## 1 setahun pasca bencana palu msh ada warga yg menempati tenda pengunsian … posi…
## 2 slankers malang galang dana aksi donasi utk bencana palu donggala keren… nega…
## 3 beliau pejuang kemanusiaan tdk sdkt yg menyebut beliau orang baik grati… neut…
## 4 hampir setahun bencana palu pengungsi masih tinggal tenda darurat http… neut…
## 5 pak jokowi dulu bpk bilang bencana palu seminggu diselesaikan sehingga… posi…
## 6 setahun bencana palu banyak korban masih tinggal tenda bilang palu pu… nega…str(diabet.df)## tibble [65 × 2] (S3: tbl_df/tbl/data.frame)
## $ x : chr [1:65] "setahun pasca bencana palu msh ada warga yg menempati tenda pengunsian mdh an yg diperintahkan bpk presiden kp"| __truncated__ "slankers malang galang dana aksi donasi utk bencana palu donggala keren kebalik dg yg semarang pake uang rakya"| __truncated__ "beliau pejuang kemanusiaan tdk sdkt yg menyebut beliau orang baik gratiskan pasien bantu bencana palu ambon sum"| __truncated__ "hampir setahun bencana palu pengungsi masih tinggal tenda darurat httpstcojrejc y e" ...
## $ komen: chr [1:65] "positive" "negative" "neutral" "neutral" ...diabet.data = diabet.df
diabet.data = as.data.frame(unclass(diabet.data),
stringsAsFactors = TRUE)Buat DataFrame hanya untuk komentar positif
komentar_positif <- diabet.df %>%
filter(komen == "positive")
komentar_positif <-komentar_positif$x
komentar_positif## [1] "setahun pasca bencana palu msh ada warga yg menempati tenda pengunsian mdh an yg diperintahkan bpk presiden kpd menteri pupr wamenkeu kepla bnpb utk wamena terealisasi dg baik soalnya perintah yg sama utk palu ntb blm selesai jg bgm dg sdr kita ambon nanti httpstcopdlxriwmnp"
## [2] "pak jokowi dulu bpk bilang bencana palu seminggu diselesaikan sehingga normal kembali kehidupan seharihari masyarakat sana sdh bulan msh byk korban bencana yg tinggal pengungsian penuhi janji lbh urgent pak drpd cari lokasi buat ibu baru httpstcoatedovzjio"
## [3] "pakjk memimpin rapat rekonstruksi dampak bencana paludonggala sulteng pak jk menegaskan pemerintah tetap memperhatikan daerah bencana sekalipun indonesia sedang menghadapi pilpres httpstcosotwk vne"
## [4] "the jakmania korwil kebayoran barugk mengadakan acara penggalangan dana untuk korban bencana paludonggala hadir dalam kesempatan perwakilan pemain persija sandi sute ketua the jakmania bung fery dirut persija gede widiade persijajakarta persijaselamanya httpstcooacya k l"
## [5] "bencana palu iluni ui serahkan dana miliar kepada kementerian pupr httpstcowsiwyejsmz ryjv wqfh"
## [6] "haloo sahabat selamat pagi menjelang siang ada kabar gembira nih setelah melalui beberapa proses sebelumnya akhirnya hunian tetap huntap untuk korban terdampak bencana palu sigi donggala pasigala siap dibangun puprsigapmembangunnegeri infoditjenck httpstcon nbplw m"
## [7] "hari healthylifettv ketemu saudara korban bencana palu banten orang kuat mewakili sekian banyak korban lainnya kita doakan segala yg terbaik untuk pemulihan keadaan ypm p x"
## [8] "gubernur indonesia nyumbang bencana palu donggala membiayai warganya mudik balik gratis iya sekelas kpu sudah ada anggaran pemilunya tidak menghadirkan saksi atau melengkapi berkasnya sekalipun dari indonesia 💥 in na na httpstwittercomna na status wed may persen pengungsi bencana palu masih tinggal tenda pengungsian httpstcodzjxnmsfd in geloracohttpstwittercomgeloracostatus indonesia sun dec artikelterbaru kenapa kompas republika meliput isu lgbt bencana paludonggala httpstcofvskrmiuku in quretahttpstwittercomquretastatus indonesia tue dec bangpino muka penjilat jokowi tlg dtg ke rumahku donk sy korban bencana palu jgn cuma omdo in nhaynaattamimihttpstwittercomnhaynaattamimistatus hammer city wed feb indonesia ada kawasan rawan bencana sebab efektivitas penyebaran informasi kejadian bencana amat krusial utk disempurnakan menilik bencana palu donggala banten mengevaluasi model distribusi informasi bencana indonesia hasilnya 💥 jupcfodxg in hakasasiidhttpstwittercomhakasasiidstatus jakarta capital region"
## [9] "tks bang sdh memberikan semangat kpd saudara sy pelaku usaha palu smg menjadikan palubangkit sy berharap prabowosandi yg terpilih bs tetapkan bencana palu sbg bencana nasional fasilitas kredit pelaku usaha diputihkan krn tempat barang usaha sdh tdk ada in rahmanidha httpstwittercomrahmanidha status bantaeng wed nov bkipm denpasar kembali menyerahkan sumbangan u korban bencana paludonggalaamplombok sumbangan disalurkan lewat act wilayah bali u dihantarkan ke lokasi bencanasemoga sumbangan yg diberikan dp membantuamp bermanfaat bg korban bencana paludonggala lombok 📠onehealthkipm x f bbehr in bkipmdenpasarhttpstwittercombkipmdenpasarstatus httpspbstwimgcommediadtdybcvamzpjpgdenpasar"
## [10] "alhamdulillah hasil ogot donasi nonbar manuk sudah salurkan untuk korban bencana paludonggala banten via bigredspalu bigredsserang hatur nuhun untuk teman udah menyisihkan rezekinya untuk mereka membutuhkan semoga dibalas sama lebih baik 😡 httpstcoakwmrvnoti"
## [11] "setahun bencana palu habib rotan jangan buat acara mengundang bala httpstcorrei ldcuv"
## [12] "pemprov sumbar ngirim berton rendang ke daerah yg kena bencanapalu lumajang dll ajamereka yg ngiler"
## [13] "mdmc kalsel berikan pendampingan psikososial bagi korban bencana palu httpstcod y hsa z muhammadiyah mdmc pendampingan psikologi korbanbencanapalu httpstcozdn tgjuti"
## [14] "semangat sore sahabatpupr tahukah sahabat hunian tetap huntap bagi korban bencana palu selesai desember loh sultengbangkit httpstcojykutuhr v"
## [15] "ibrahimazzaini sy sama beberapa teman lagi ngunpulin infak dari para penderma untuk membantu para korban bencana palu yg sampai masih banyak yg terkafer mohon doa bantuannya bang"
## [16] "wamenlufachir sampaikan apresiasi ucapkan terima kasih kepada negara sahabat oi telah memberikan bantuan kemanusiaan kepada korban terdampak bencana palu kantin diplomasi httpstcoheqa iqx"
## [17] "mame ikhlasul d tukt mburin sama saya juga bukan fpicuma lihat sepak terjang mrk pas ngiring pengantin masuk ke gereja bencana terutama pas bencana palu menolong tanpa pandang agamamembuat saya malu dulu pernah nggak suka sama mrk"
## [18] "andreqoje lusihq bukitsamata dmarwan kemenagri kemendagriri kemenkumhamri mohmahfudmd iya parah banget laskarislamfpi disaat pemerintah gabisa turun ngebantu korban gempa eh mereka udah nyampe duluan ke lokasi bencana palu lombok wamena daerah lain pemerintah terkesan peduli waktu ditimpa bencana mereka duluan bantuin"
## [19] "jokowi yg terpilih jadi ri nanti mesti ambil kebijakan tegas pak agr pandangan publik tdk terhalangi bangunan komersil yg menjadi obstacle kesempatan pd daerah pasca bencanapalu lombok caritabanten lega rasanya jk dpt memandang laut tanpa obstacle susipudjiastuti prabowo"
## [20] "pagi sob sudah tahu indonesia punya alat mekanis multiguna pedesaan ammdes oktober kemenperin mengirimkan ammdes yg dikombinasi dgn alat penjernih air tujuannya mmbantu mngirimkan air bagi para korban bencana palu yg kesulitan mendapatkan akses air bersih iajrbdczd"
## [21] "kemenko polhukam pantau verifikasi data penduduk terdampak bencana palu lagdhihh"
## [22] "tirtoid sebentar lagi kasus legalisasi penjarahan bencana palu juga mau vonis semoga ada pembelajaran untuk pak joko memilih pembantu lebih baik dari"
## [23] "rumah adat lobo dari kulawi jadi solusi bangunan tahan gempa inisiatif rumah bambu dari asfid hanya sekadar hunian bagi penyintas bencana palu tapi sekaligus mengembangkan potensi ekonomi keterampilan warga desa balapopu xefsjymvi httpstcozd vdt qr"
## [24] "pupr huntara untuk korban bencana palu rampung februari httpstcoxjqmsg zxu"
## [25] "gitar bertanda tangan personel megadeth resmi terjual rp juta dalam acara lelang untuk bencana palu httpstcomsgjfckhfv"##Membuat Word Cloud komentar Positif #Mengubah Data Frame Menjadi Data Faktor
tdm_pos <- TermDocumentMatrix(komentar_positif)
tdm_pos## <<TermDocumentMatrix (terms: 525, documents: 25)>>
## Non-/sparse entries: 685/12440
## Sparsity : 95%
## Maximal term length: 49
## Weighting : term frequency (tf)m_pos <- as.matrix(tdm_pos)
View(m_pos)
v_pos <- sort(rowSums(m_pos),decreasing = TRUE)
head(v_pos)## bencana palu korban untuk indonesia ada
## 37 25 16 10 8 6#Mengubah Data Faktor Menjadi Data Frame
d_pos <- data.frame(word = names(v_pos), freq = v_pos)
head(d_pos)## word freq
## bencana bencana 37
## palu palu 25
## korban korban 16
## untuk untuk 10
## indonesia indonesia 8
## ada ada 6wordcloud(d_pos$word, d_pos$freq,
random.order = FALSE,
max.words = 500,
colors = brewer.pal(name = "Dark2",8 )) 
Buat DataFrame hanya untuk komentar negatif
komentar_negatif <- diabet.df %>%
filter(komen == "negative")
komentar_negatif<-komentar_negatif$x
komentar_negatif## [1] "slankers malang galang dana aksi donasi utk bencana palu donggala keren kebalik dg yg semarang pake uang rakyat fitnahnagabonar"
## [2] "setahun bencana palu banyak korban masih tinggal tenda bilang palu pulih setelah satu minggu semenjak bencana orangnya masih hidup httpstcoev orrllra"
## [3] "kenapa emang aksi sosialnya untuk pendidikan juga ada indonesia mau bahas ihr narasumber tau kagak ihr pernah bantu korban bencana palu juga selama kerja sama pbb campcamp pengungsi bencana kemanusiaan konflik nyumbang kagak"
## [4] "setahun pascabencana palu masih ada warga menempati tendatenda pengungsian mereka hanya menghadapi masalah tempat tinggal tapi juga pekerjaan pendidikan bahkan air bersih simak perjalanan kumparan bertemu warga terdampak bencana palu httpstcof kvm wsgv httpstcoxo e q s"
## [5] "kuasa allah swt lah yg mengatur semua trmasuk bhw tsunami aceh trjadi zaman pak sbyudhoyono ga kebayang jika trjadi skarang 👳 jgn kan skala aceh bencana palu lombok sja ga ke urus maaf anda hrs bnyak blajar pak jokowi 👳 kspgoid fahrihamzah jansenjsp httpstcoa uxi urfo"
## [6] "ketika aksi demo menuntut kecurangan pemilu rezim begitu sigap total bahkan menghalalkan segala cara untuk menghalau tapi jika terkait kepedulian terhadap rakyat yg tertimpa musibah mereka abai bencana palu ntb dst corona lalu media buzzerp memanipulasi fakta"
## [7] "setahun bencana palu banyak korban masih tinggal tendamereka berharap dijanjikan pemerintah tidak hanya sebatas janji tetapi segera diteralisasikan usul nih gmn klo tuker guling aset halnya ibukota yg baru pinokioingkarjanji httpstcouqwarjs s"
## [8] "ketua umum bhayangkari beri trauma healing untuk korban bencana palu httpstcopdugzfeoak httpstcoy amabxia"
## [9] "sudah bulan korban bencana palu masih kesulitan penuhi kebutuhan hidup httpstcohpcbo css"
## [10] "orang baik harus didukung korban bencana palu sama lombok beres semua karena pemdanya gak becus bagibagi sertifikat semua karena kepedulian pak jokowi rakyat pemda gak ada urusan paham love pak jokowi kamsahamnida spasiba"
## [11] "vivacoid tambah janji nih rumah lombok rumah palu uang bencana lombok uang bencana palu rumah cibitung oya rumah sinabung semoga beliau tdk diperberat langkahnya krn janji yg pernah sampaikan kiyaimarufamin md"
## [12] "sementara duit buat penanganan pemulihan bencana paludonggala ntb begitu sulit lagi petugas yg meninggal kpps gak jelas siapa yg mau nanggung depan mata aja gak beres lah mau ngomongin pindah ibukota yg duitnya gak jelas darimana"
## [13] "presiden jokowi sebelum menambah utang janji baiknya utang yg dulu dibayar duluan penuhi dulu janji bangunperbaiki rumah korban bencana palu sdh tiga tahun mrk menunggu"
## [14] "ingat bencana palu bencana lombok utang bpjs kerugian bumn tapi turnamen pubgmobile dibayari negara kadang pengen bilang elok pengen nabok sontoloyo lalu lagi ya kata yg pas jumatberkah uangnegarabuatmainan"
## [15] "detikcom coba saya bantu list bpjs tekor rupiah meroket kasus novel baswedan kebakaran hutan kalimantan korban penggusuran konflik agraria neraca perdagangan minus korban bencana palu lombok jir abis batas karakternya"
## [16] "tuntut hak pascatiga tahun bencana palu penyintas geruduk kantor wali httpstcokfxuj som"
## [17] "donadam jadi inget si panglima biawak pas bencana palu minta tolong sana sini untuk carikan tiket pesawat ke palu karna keluarganya disana tidak hubungieh pas sudah bantumalah nyinyir lagisama nolongin anjing kejepit jadinya🟮🟮🟮"##Membuat Word Cloud komentar Positif #Mengubah Data Frame Menjadi Data Faktor
tdm_neg <- TermDocumentMatrix(komentar_negatif)
tdm_neg## <<TermDocumentMatrix (terms: 320, documents: 17)>>
## Non-/sparse entries: 419/5021
## Sparsity : 92%
## Maximal term length: 20
## Weighting : term frequency (tf)m_neg <- as.matrix(tdm_neg)
View(m_neg)
v_neg <- sort(rowSums(m_neg),decreasing = TRUE)
head(v_neg)## bencana palu korban lombok masih janji
## 21 20 9 6 5 5#Mengubah Data Faktor Menjadi Data Frame
d_neg <- data.frame(word = names(v_neg), freq = v_neg)
head(d_neg)## word freq
## bencana bencana 21
## palu palu 20
## korban korban 9
## lombok lombok 6
## masih masih 5
## janji janji 5wordcloud(d_neg$word, d_neg$freq,
random.order = FALSE,
max.words = 500,
colors = brewer.pal(name = "Dark2",8 )) 
Buat DataFrame hanya untuk komentar Neutral
komentar_neutral <- diabet.df %>%
filter(komen == "neutral")
komentar_neutral<-komentar_neutral$x
komentar_neutral## [1] "beliau pejuang kemanusiaan tdk sdkt yg menyebut beliau orang baik gratiskan pasien bantu bencana palu ambon sumbar dll andai mnrt hukum penguasa beliau bersalah layakkah beliau tanpa pengadilan diadili dijalan saya jd ikut bertanya yg diketahuinya 🬩prayfordoktersunardi httpstcobhhpjv ld"
## [2] "hampir setahun bencana palu pengungsi masih tinggal tenda darurat httpstcojrejc y e"
## [3] "tanyakan korban bencana palu lombok longsor dibeberapa wilayah jawa barat baru semua tu"
## [4] "water palu sejam tiada air mungkin kita malaysia dah mengeluh bayangkan berharihari bermingguminggu tanpa air bersih utk minum masak mencuci namun itulah yg terpaksa dilalui mangsa bencana palu so help us to help them water palu kkb palu spreadinghumanity httpstcov yu xao"
## [5] "film yg memotret perjuangan adik guru pasca bencana palu mohon retweetnya ya kakak maman husenjafar ulil ernestprakasa nadirs alissawahid kemdikbudri"
## [6] "saja selesai penanganan bencana palu donggala angin kencang palembang jatuhnya pesawat lion air sudah menyusul padang yg disapu banjir"
## [7] "betul sy sampaikan krn yg dulu spt bencana palu ntb dikontroversikan scr politik yg satu bilang adzab yg lain bilang ujian pdhal korbannya bercampur aliran politiknya banyak org baiknya allah maha pengasih mungkin mengadzab dgn membabi buta sunnatullah"
## [8] "hermanat beritanya heboh menutupi berita jauh yg lebih penting bencana palu tragedi wanena timika kabut asapa kenaikan iuran bpjs gugurnya demonstran kecuali satu mbahwir masih rs 🕲 httpstcoyimjswge g"
## [9] "jadi sedih ingat korban bencana palu setelah dihajar gempa likuifaksi tsunami hidup berubah drastis listrik air pasokan terputus berhari pejabat menghilang warga terpaksa jarah makanan kejahatan meningkat yg trauma pergi dr palu eh skrg ada korona"
## [10] "rawan gempa jangan dibangun bandara bendungan perumahan jangan kita mengulangulang kesalahan jkw link tapi peta bencana palu dibuat abaikan survei bmkg kompas ' gbr jokowi bnpbindonesia atrbpn infomitigasi httpstcovnve ger h httpstcou fqgy vd"
## [11] "hampir setahun bencana palu pengungsi masih tinggal tenda darurat httpstcopl bldrb g"
## [12] "bppt gelar pelepasan  mobile air siap minum bppt untuk korban bencana paludonggala selengkapnya  hledzjgol pemerintahbekerja palu jokowi kemkominfo httpstcosucah nzz"
## [13] "zarazettirazr penanganan bencana palu kebakaran hutan kerusuhan papua gempa ambon memanggilmu wahai presiden prioritaskan kepentingan bangsamu daripada egomu miris prihatin"
## [14] "dxdele matthewmarcell icecoldnovember bro simpati empati gak harus disuarakan forget the anya tapi coba lihat lagi awkarin bantuin orangorang bencana palu sama sekali dia ga up apapun ig story sampai orangmedia lain buat chill semua orang bersimpati with their own way"
## [15] "sepertinya presiden pemerintah pusat sudah tidak ingat lagi dianggap sudah selesai ~~ hampir setahun bencana palu pengungsi masih tinggal tenda darurat httpstconinwxgdgyb"
## [16] "pejabat pupr korupsi tengah bencana paludonggala saksikan kabar petang pukul wib hanya tvone streaming tvone connect android httpstcoqukhwwigl ios httpstcoqyuxijrgpp kabarpetangtvone vo hf ksl"
## [17] "banyak laporan ttg penanganan rr bencana palu yg lambat perlu evaluasi percepatan jokowi bnpbindonesia infomitigasi"
## [18] "pemerintah tetapkan zona rawan bencana palu httpstcoqeq hv qce"
## [19] "nominasi anugerah kpi kategori program beritajurnalistik breaking news tvritvrinasional cnn tech news trans tvtranstvcorp menembus duka bencana palu sigli dongala antvantvofficial httpstcom vn wgujo"
## [20] "cek pemulihan bencana palu beliau sungguh berhati mulia mungkin karena presidennya tidak peduli nih sama bencana palu sehingga harus ada pemimpin tingkat bawah setelah presiden gubernur berinisiatif mungkin loh ya mungkin namanya juga bersangka baik"
## [21] "xxfrelxx hujandisenja sovietfoxtrot my short story seorang anak kecil melapor malammalam kepada relawan tentara pasca bencana palu ada mayat sana bergegas mengevakuasi lokasi ditunjuk anak tadi melihat sesosok mayat reruntuhan mayat anak kecil memberitahu"
## [22] "putrawadapi apakah orang yg sama janji bencana palu lombokaku terkesima hatihati prankowi beraksi"
## [23] "sudah hampir tiga bulan tidak mendapatkan bantuan kata warga huntara korban bencana palu publisherstory tbncleyww"##Membuat Word Cloud komentar Neutral #Mengubah Data Frame Menjadi Data Faktor
tdm_neutral <- TermDocumentMatrix(komentar_neutral)
tdm_neutral## <<TermDocumentMatrix (terms: 389, documents: 23)>>
## Non-/sparse entries: 500/8447
## Sparsity : 94%
## Maximal term length: 24
## Weighting : term frequency (tf)m_neutral <- as.matrix(tdm_neutral)
View(m_neutral)
v_neutral <- sort(rowSums(m_neutral),decreasing = TRUE)
head(v_neutral)## palu bencana beliau air mungkin hampir
## 27 24 5 5 5 4#Mengubah Data Faktor Menjadi Data Frame
d_neutral <- data.frame(word = names(v_neutral), freq = v_neutral)
head(d_neutral)## word freq
## palu palu 27
## bencana bencana 24
## beliau beliau 5
## air air 5
## mungkin mungkin 5
## hampir hampir 4wordcloud(d_neutral$word, d_neutral$freq,
random.order = FALSE,
max.words = 500,
colors = brewer.pal(name = "Dark2",8 )) 
PEMBAGIAN DATA
set nilai random generator
set.seed(1234)
library(caret)## Loading required package: latticelibrary(Matrix)membagi data 80% training, 20% testing
bagi <- createDataPartition(diabet.df$komen, p = 0.8, list=F)
training<- diabet.df[bagi,]
head(training)## # A tibble: 6 × 2
## x komen
## <chr> <chr>
## 1 setahun pasca bencana palu msh ada warga yg menempati tenda pengunsian … posi…
## 2 hampir setahun bencana palu pengungsi masih tinggal tenda darurat http… neut…
## 3 pak jokowi dulu bpk bilang bencana palu seminggu diselesaikan sehingga… posi…
## 4 setahun bencana palu banyak korban masih tinggal tenda bilang palu pu… nega…
## 5 pakjk memimpin rapat rekonstruksi dampak bencana paludonggala sulteng p… posi…
## 6 tanyakan korban bencana palu lombok longsor dibeberapa wilayah jawa … neut…testing<- diabet.df[-bagi,]
View(testing)METODE VALIDASI
cross-validasi 5 lipat
control <- trainControl(method = "cv", number = 5, classProbs = TRUE)
control## $method
## [1] "cv"
##
## $number
## [1] 5
##
## $repeats
## [1] NA
##
## $search
## [1] "grid"
##
## $p
## [1] 0.75
##
## $initialWindow
## NULL
##
## $horizon
## [1] 1
##
## $fixedWindow
## [1] TRUE
##
## $skip
## [1] 0
##
## $verboseIter
## [1] FALSE
##
## $returnData
## [1] TRUE
##
## $returnResamp
## [1] "final"
##
## $savePredictions
## [1] FALSE
##
## $classProbs
## [1] TRUE
##
## $summaryFunction
## function (data, lev = NULL, model = NULL)
## {
## if (is.character(data$obs))
## data$obs <- factor(data$obs, levels = lev)
## postResample(data[, "pred"], data[, "obs"])
## }
## <bytecode: 0x00000246eafc4588>
## <environment: namespace:caret>
##
## $selectionFunction
## [1] "best"
##
## $preProcOptions
## $preProcOptions$thresh
## [1] 0.95
##
## $preProcOptions$ICAcomp
## [1] 3
##
## $preProcOptions$k
## [1] 5
##
## $preProcOptions$freqCut
## [1] 19
##
## $preProcOptions$uniqueCut
## [1] 10
##
## $preProcOptions$cutoff
## [1] 0.9
##
##
## $sampling
## NULL
##
## $index
## NULL
##
## $indexOut
## NULL
##
## $indexFinal
## NULL
##
## $timingSamps
## [1] 0
##
## $predictionBounds
## [1] FALSE FALSE
##
## $seeds
## [1] NA
##
## $adaptive
## $adaptive$min
## [1] 5
##
## $adaptive$alpha
## [1] 0.05
##
## $adaptive$method
## [1] "gls"
##
## $adaptive$complete
## [1] TRUE
##
##
## $trim
## [1] FALSE
##
## $allowParallel
## [1] TRUENAIVE BAYES
modelNB<-naiveBayes(komen~.,data = training)
head(modelNB)## $apriori
## Y
## negative neutral positive
## 14 19 20
##
## $tables
## $tables$x
## x
## Y alhamdulillah hasil ogot donasi nonbar manuk sudah salurkan untuk korban bencana paludonggala banten via bigredspalu bigredsserang hatur nuhun untuk teman udah menyisihkan rezekinya untuk mereka membutuhkan semoga dibalas sama lebih baik 😡 httpstcoakwmrvnoti
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y andreqoje lusihq bukitsamata dmarwan kemenagri kemendagriri kemenkumhamri mohmahfudmd iya parah banget laskarislamfpi disaat pemerintah gabisa turun ngebantu korban gempa eh mereka udah nyampe duluan ke lokasi bencana palu lombok wamena daerah lain pemerintah terkesan peduli waktu ditimpa bencana mereka duluan bantuin
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y banyak laporan ttg penanganan rr bencana palu yg lambat perlu evaluasi percepatan jokowi bnpbindonesia infomitigasi
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y bencana palu iluni ui serahkan dana miliar kepada kementerian pupr httpstcowsiwyejsmz ryjv wqfh
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y betul sy sampaikan krn yg dulu spt bencana palu ntb dikontroversikan scr politik yg satu bilang adzab yg lain bilang ujian pdhal korbannya bercampur aliran politiknya banyak org baiknya allah maha pengasih mungkin mengadzab dgn membabi buta sunnatullah
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y cek pemulihan bencana palu beliau sungguh berhati mulia mungkin karena presidennya tidak peduli nih sama bencana palu sehingga harus ada pemimpin tingkat bawah setelah presiden gubernur berinisiatif mungkin loh ya mungkin namanya juga bersangka baik
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y detikcom coba saya bantu list bpjs tekor rupiah meroket kasus novel baswedan kebakaran hutan kalimantan korban penggusuran konflik agraria neraca perdagangan minus korban bencana palu lombok jir abis batas karakternya
## negative 0.07142857
## neutral 0.00000000
## positive 0.00000000
## x
## Y donadam jadi inget si panglima biawak pas bencana palu minta tolong sana sini untuk carikan tiket pesawat ke palu karna keluarganya disana tidak hubungieh pas sudah bantumalah nyinyir lagisama nolongin anjing kejepit jadinya🟮🟮🟮
## negative 0.07142857
## neutral 0.00000000
## positive 0.00000000
## x
## Y dxdele matthewmarcell icecoldnovember bro simpati empati gak harus disuarakan forget the anya tapi coba lihat lagi awkarin bantuin orangorang bencana palu sama sekali dia ga up apapun ig story sampai orangmedia lain buat chill semua orang bersimpati with their own way
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y film yg memotret perjuangan adik guru pasca bencana palu mohon retweetnya ya kakak maman husenjafar ulil ernestprakasa nadirs alissawahid kemdikbudri
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y gubernur indonesia nyumbang bencana palu donggala membiayai warganya mudik balik gratis iya sekelas kpu sudah ada anggaran pemilunya tidak menghadirkan saksi atau melengkapi berkasnya sekalipun dari indonesia 💥 in na na httpstwittercomna na status wed may persen pengungsi bencana palu masih tinggal tenda pengungsian httpstcodzjxnmsfd in geloracohttpstwittercomgeloracostatus indonesia sun dec artikelterbaru kenapa kompas republika meliput isu lgbt bencana paludonggala httpstcofvskrmiuku in quretahttpstwittercomquretastatus indonesia tue dec bangpino muka penjilat jokowi tlg dtg ke rumahku donk sy korban bencana palu jgn cuma omdo in nhaynaattamimihttpstwittercomnhaynaattamimistatus hammer city wed feb indonesia ada kawasan rawan bencana sebab efektivitas penyebaran informasi kejadian bencana amat krusial utk disempurnakan menilik bencana palu donggala banten mengevaluasi model distribusi informasi bencana indonesia hasilnya 💥 jupcfodxg in hakasasiidhttpstwittercomhakasasiidstatus jakarta capital region
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y haloo sahabat selamat pagi menjelang siang ada kabar gembira nih setelah melalui beberapa proses sebelumnya akhirnya hunian tetap huntap untuk korban terdampak bencana palu sigi donggala pasigala siap dibangun puprsigapmembangunnegeri infoditjenck httpstcon nbplw m
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y hampir setahun bencana palu pengungsi masih tinggal tenda darurat httpstcojrejc y e
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y hermanat beritanya heboh menutupi berita jauh yg lebih penting bencana palu tragedi wanena timika kabut asapa kenaikan iuran bpjs gugurnya demonstran kecuali satu mbahwir masih rs 🕲 httpstcoyimjswge g
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y ibrahimazzaini sy sama beberapa teman lagi ngunpulin infak dari para penderma untuk membantu para korban bencana palu yg sampai masih banyak yg terkafer mohon doa bantuannya bang
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y ingat bencana palu bencana lombok utang bpjs kerugian bumn tapi turnamen pubgmobile dibayari negara kadang pengen bilang elok pengen nabok sontoloyo lalu lagi ya kata yg pas jumatberkah uangnegarabuatmainan
## negative 0.07142857
## neutral 0.00000000
## positive 0.00000000
## x
## Y jadi sedih ingat korban bencana palu setelah dihajar gempa likuifaksi tsunami hidup berubah drastis listrik air pasokan terputus berhari pejabat menghilang warga terpaksa jarah makanan kejahatan meningkat yg trauma pergi dr palu eh skrg ada korona
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y jokowi yg terpilih jadi ri nanti mesti ambil kebijakan tegas pak agr pandangan publik tdk terhalangi bangunan komersil yg menjadi obstacle kesempatan pd daerah pasca bencanapalu lombok caritabanten lega rasanya jk dpt memandang laut tanpa obstacle susipudjiastuti prabowo
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y ketika aksi demo menuntut kecurangan pemilu rezim begitu sigap total bahkan menghalalkan segala cara untuk menghalau tapi jika terkait kepedulian terhadap rakyat yg tertimpa musibah mereka abai bencana palu ntb dst corona lalu media buzzerp memanipulasi fakta
## negative 0.07142857
## neutral 0.00000000
## positive 0.00000000
## x
## Y ketua umum bhayangkari beri trauma healing untuk korban bencana palu httpstcopdugzfeoak httpstcoy amabxia
## negative 0.07142857
## neutral 0.00000000
## positive 0.00000000
## x
## Y kuasa allah swt lah yg mengatur semua trmasuk bhw tsunami aceh trjadi zaman pak sbyudhoyono ga kebayang jika trjadi skarang 👳 jgn kan skala aceh bencana palu lombok sja ga ke urus maaf anda hrs bnyak blajar pak jokowi 👳 kspgoid fahrihamzah jansenjsp httpstcoa uxi urfo
## negative 0.07142857
## neutral 0.00000000
## positive 0.00000000
## x
## Y mdmc kalsel berikan pendampingan psikososial bagi korban bencana palu httpstcod y hsa z muhammadiyah mdmc pendampingan psikologi korbanbencanapalu httpstcozdn tgjuti
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y nominasi anugerah kpi kategori program beritajurnalistik breaking news tvritvrinasional cnn tech news trans tvtranstvcorp menembus duka bencana palu sigli dongala antvantvofficial httpstcom vn wgujo
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y orang baik harus didukung korban bencana palu sama lombok beres semua karena pemdanya gak becus bagibagi sertifikat semua karena kepedulian pak jokowi rakyat pemda gak ada urusan paham love pak jokowi kamsahamnida spasiba
## negative 0.07142857
## neutral 0.00000000
## positive 0.00000000
## x
## Y pagi sob sudah tahu indonesia punya alat mekanis multiguna pedesaan ammdes oktober kemenperin mengirimkan ammdes yg dikombinasi dgn alat penjernih air tujuannya mmbantu mngirimkan air bagi para korban bencana palu yg kesulitan mendapatkan akses air bersih iajrbdczd
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y pak jokowi dulu bpk bilang bencana palu seminggu diselesaikan sehingga normal kembali kehidupan seharihari masyarakat sana sdh bulan msh byk korban bencana yg tinggal pengungsian penuhi janji lbh urgent pak drpd cari lokasi buat ibu baru httpstcoatedovzjio
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y pakjk memimpin rapat rekonstruksi dampak bencana paludonggala sulteng pak jk menegaskan pemerintah tetap memperhatikan daerah bencana sekalipun indonesia sedang menghadapi pilpres httpstcosotwk vne
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y pejabat pupr korupsi tengah bencana paludonggala saksikan kabar petang pukul wib hanya tvone streaming tvone connect android httpstcoqukhwwigl ios httpstcoqyuxijrgpp kabarpetangtvone vo hf ksl
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y pemerintah tetapkan zona rawan bencana palu httpstcoqeq hv qce
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y pemprov sumbar ngirim berton rendang ke daerah yg kena bencanapalu lumajang dll ajamereka yg ngiler
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y putrawadapi apakah orang yg sama janji bencana palu lombokaku terkesima hatihati prankowi beraksi
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y rawan gempa jangan dibangun bandara bendungan perumahan jangan kita mengulangulang kesalahan jkw link tapi peta bencana palu dibuat abaikan survei bmkg kompas ' gbr jokowi bnpbindonesia atrbpn infomitigasi httpstcovnve ger h httpstcou fqgy vd
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y rumah adat lobo dari kulawi jadi solusi bangunan tahan gempa inisiatif rumah bambu dari asfid hanya sekadar hunian bagi penyintas bencana palu tapi sekaligus mengembangkan potensi ekonomi keterampilan warga desa balapopu xefsjymvi httpstcozd vdt qr
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y semangat sore sahabatpupr tahukah sahabat hunian tetap huntap bagi korban bencana palu selesai desember loh sultengbangkit httpstcojykutuhr v
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y sementara duit buat penanganan pemulihan bencana paludonggala ntb begitu sulit lagi petugas yg meninggal kpps gak jelas siapa yg mau nanggung depan mata aja gak beres lah mau ngomongin pindah ibukota yg duitnya gak jelas darimana
## negative 0.07142857
## neutral 0.00000000
## positive 0.00000000
## x
## Y sepertinya presiden pemerintah pusat sudah tidak ingat lagi dianggap sudah selesai ~~ hampir setahun bencana palu pengungsi masih tinggal tenda darurat httpstconinwxgdgyb
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y setahun bencana palu banyak korban masih tinggal tenda bilang palu pulih setelah satu minggu semenjak bencana orangnya masih hidup httpstcoev orrllra
## negative 0.07142857
## neutral 0.00000000
## positive 0.00000000
## x
## Y setahun bencana palu banyak korban masih tinggal tendamereka berharap dijanjikan pemerintah tidak hanya sebatas janji tetapi segera diteralisasikan usul nih gmn klo tuker guling aset halnya ibukota yg baru pinokioingkarjanji httpstcouqwarjs s
## negative 0.07142857
## neutral 0.00000000
## positive 0.00000000
## x
## Y setahun bencana palu habib rotan jangan buat acara mengundang bala httpstcorrei ldcuv
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y setahun pasca bencana palu msh ada warga yg menempati tenda pengunsian mdh an yg diperintahkan bpk presiden kpd menteri pupr wamenkeu kepla bnpb utk wamena terealisasi dg baik soalnya perintah yg sama utk palu ntb blm selesai jg bgm dg sdr kita ambon nanti httpstcopdlxriwmnp
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y setahun pascabencana palu masih ada warga menempati tendatenda pengungsian mereka hanya menghadapi masalah tempat tinggal tapi juga pekerjaan pendidikan bahkan air bersih simak perjalanan kumparan bertemu warga terdampak bencana palu httpstcof kvm wsgv httpstcoxo e q s
## negative 0.07142857
## neutral 0.00000000
## positive 0.00000000
## x
## Y sudah bulan korban bencana palu masih kesulitan penuhi kebutuhan hidup httpstcohpcbo css
## negative 0.07142857
## neutral 0.00000000
## positive 0.00000000
## x
## Y sudah hampir tiga bulan tidak mendapatkan bantuan kata warga huntara korban bencana palu publisherstory tbncleyww
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y tanyakan korban bencana palu lombok longsor dibeberapa wilayah jawa barat baru semua tu
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y the jakmania korwil kebayoran barugk mengadakan acara penggalangan dana untuk korban bencana paludonggala hadir dalam kesempatan perwakilan pemain persija sandi sute ketua the jakmania bung fery dirut persija gede widiade persijajakarta persijaselamanya httpstcooacya k l
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y tirtoid sebentar lagi kasus legalisasi penjarahan bencana palu juga mau vonis semoga ada pembelajaran untuk pak joko memilih pembantu lebih baik dari
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y tks bang sdh memberikan semangat kpd saudara sy pelaku usaha palu smg menjadikan palubangkit sy berharap prabowosandi yg terpilih bs tetapkan bencana palu sbg bencana nasional fasilitas kredit pelaku usaha diputihkan krn tempat barang usaha sdh tdk ada in rahmanidha httpstwittercomrahmanidha status bantaeng wed nov bkipm denpasar kembali menyerahkan sumbangan u korban bencana paludonggalaamplombok sumbangan disalurkan lewat act wilayah bali u dihantarkan ke lokasi bencanasemoga sumbangan yg diberikan dp membantuamp bermanfaat bg korban bencana paludonggala lombok 📠onehealthkipm x f bbehr in bkipmdenpasarhttpstwittercombkipmdenpasarstatus httpspbstwimgcommediadtdybcvamzpjpgdenpasar
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y tuntut hak pascatiga tahun bencana palu penyintas geruduk kantor wali httpstcokfxuj som
## negative 0.07142857
## neutral 0.00000000
## positive 0.00000000
## x
## Y vivacoid tambah janji nih rumah lombok rumah palu uang bencana lombok uang bencana palu rumah cibitung oya rumah sinabung semoga beliau tdk diperberat langkahnya krn janji yg pernah sampaikan kiyaimarufamin md
## negative 0.07142857
## neutral 0.00000000
## positive 0.00000000
## x
## Y wamenlufachir sampaikan apresiasi ucapkan terima kasih kepada negara sahabat oi telah memberikan bantuan kemanusiaan kepada korban terdampak bencana palu kantin diplomasi httpstcoheqa iqx
## negative 0.00000000
## neutral 0.00000000
## positive 0.05000000
## x
## Y water palu sejam tiada air mungkin kita malaysia dah mengeluh bayangkan berharihari bermingguminggu tanpa air bersih utk minum masak mencuci namun itulah yg terpaksa dilalui mangsa bencana palu so help us to help them water palu kkb palu spreadinghumanity httpstcov yu xao
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y xxfrelxx hujandisenja sovietfoxtrot my short story seorang anak kecil melapor malammalam kepada relawan tentara pasca bencana palu ada mayat sana bergegas mengevakuasi lokasi ditunjuk anak tadi melihat sesosok mayat reruntuhan mayat anak kecil memberitahu
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
## x
## Y zarazettirazr penanganan bencana palu kebakaran hutan kerusuhan papua gempa ambon memanggilmu wahai presiden prioritaskan kepentingan bangsamu daripada egomu miris prihatin
## negative 0.00000000
## neutral 0.05263158
## positive 0.00000000
##
##
## $levels
## [1] "negative" "neutral" "positive"
##
## $isnumeric
## x
## FALSE
##
## $call
## naiveBayes.default(x = X, y = Y, laplace = laplace)#Melakukan Prediksi Menggunakan Data Testing
prediksiNB_test<-predict(modelNB,testing)
hasil_testNB=confusionMatrix(table(prediksiNB_test,testing$komen))
hasil_testNB## Confusion Matrix and Statistics
##
##
## prediksiNB_test negative neutral positive
## negative 0 0 0
## neutral 0 0 0
## positive 3 4 5
##
## Overall Statistics
##
## Accuracy : 0.4167
## 95% CI : (0.1517, 0.7233)
## No Information Rate : 0.4167
## P-Value [Acc > NIR] : 0.6084
##
## Kappa : 0
##
## Mcnemar's Test P-Value : NA
##
## Statistics by Class:
##
## Class: negative Class: neutral Class: positive
## Sensitivity 0.00 0.0000 1.0000
## Specificity 1.00 1.0000 0.0000
## Pos Pred Value NaN NaN 0.4167
## Neg Pred Value 0.75 0.6667 NaN
## Prevalence 0.25 0.3333 0.4167
## Detection Rate 0.00 0.0000 0.4167
## Detection Prevalence 0.00 0.0000 1.0000
## Balanced Accuracy 0.50 0.5000 0.5000