rev <- tolower(rev)
head(rev)
## [1] "erupsi gunung marapi sumbar https://t.co/4fapr2k9x2"
## [2] "salah satu korban pasca erupsi mt.marapi sumatera barat hari ini.. #marapi #mtmarapi #erupsi https://t.co/n66h5zetmi"
## [3] "proses evakuasi korban erupsi g. marapi. semoga proses evakuasi berjalan lancar. dan para korban yang belum di temukan bisa segera ditemukan. aamiin #erupsimarapi #gunungmarapi https://t.co/7pmpejcivj"
## [4] "video pendaki saat erupsi terjadi di gunung merapi sumbar (3/12/2023) https://t.co/yjz2gapv9n"
## [5] "satu persatu korban di temukan dengan medan yg berat dan masih sering terjadi erupsi menjadi hambatan evakuasi dan itu bukan halangan bagi tim utk menyelesaikan ini believe me tough days will soon pass... bismillah #marapi #erupsimarapisumbar #sumbar #prayforsumbar https://t.co/llh0z8ilzh"
## [6] "alhamdulillah yang viral terkena abu erupsi gunung marapi sdh ditemukan selamat oleh team rescue tadi malam #sumbarberduka https://t.co/omah6s0jh9"
#Mengembalikan Kata yang disingkat Menjadi Kata Aslinya
rev <- replace_contraction(rev)
head(rev)
## [1] "erupsi gunung marapi sumbar https://t.co/4fapr2k9x2"
## [2] "salah satu korban pasca erupsi mt.marapi sumatera barat hari ini.. #marapi #mtmarapi #erupsi https://t.co/n66h5zetmi"
## [3] "proses evakuasi korban erupsi g. marapi. semoga proses evakuasi berjalan lancar. dan para korban yang belum di temukan bisa segera ditemukan. aamiin #erupsimarapi #gunungmarapi https://t.co/7pmpejcivj"
## [4] "video pendaki saat erupsi terjadi di gunung merapi sumbar (3/12/2023) https://t.co/yjz2gapv9n"
## [5] "satu persatu korban di temukan dengan medan yg berat dan masih sering terjadi erupsi menjadi hambatan evakuasi dan itu bukan halangan bagi tim utk menyelesaikan ini believe me tough days will soon pass... bismillah #marapi #erupsimarapisumbar #sumbar #prayforsumbar https://t.co/llh0z8ilzh"
## [6] "alhamdulillah yang viral terkena abu erupsi gunung marapi sdh ditemukan selamat oleh team rescue tadi malam #sumbarberduka https://t.co/omah6s0jh9"
#Mengembalikan Kata yang Mengalami Perpanjangan Menjadi Kata Aslinya
rev <- replace_word_elongation(rev)
head(rev)
## [1] "erupsi gunung marapi sumbar https://t.co/4fapr2k9x2"
## [2] "salah satu korban pasca erupsi mt.marapi sumatera barat hari ini.. #marapi #mtmarapi #erupsi https://t.co/n66h5zetmi"
## [3] "proses evakuasi korban erupsi g. marapi. semoga proses evakuasi berjalan lancar. dan para korban yang belum di temukan bisa segera ditemukan. aamiin #erupsimarapi #gunungmarapi https://t.co/7pmpejcivj"
## [4] "video pendaki saat erupsi terjadi di gunung merapi sumbar (3/12/2023) https://t.co/yjz2gapv9n"
## [5] "satu persatu korban di temukan dengan medan yg berat dan masih sering terjadi erupsi menjadi hambatan evakuasi dan itu bukan halangan bagi tim utk menyelesaikan ini believe me tough days will soon pass... bismillah #marapi #erupsimarapisumbar #sumbar #prayforsumbar https://t.co/llh0z8ilzh"
## [6] "alhamdulillah yang viral terkena abu erupsi gunung marapi sdh ditemukan selamat oleh team rescue tadi malam #sumbarberduka https://t.co/omah6s0jh9"
#Menghapus simbol
rev <- strip(rev)
head(rev)
## [1] "erupsi gunung marapi sumbar httpstco fapr k x"
## [2] "salah satu korban pasca erupsi mtmarapi sumatera barat hari ini marapi mtmarapi erupsi httpstcon h zetmi"
## [3] "proses evakuasi korban erupsi g marapi semoga proses evakuasi berjalan lancar dan para korban yang belum di temukan bisa segera ditemukan aamiin erupsimarapi gunungmarapi httpstco pmpejcivj"
## [4] "video pendaki saat erupsi terjadi di gunung merapi sumbar httpstcoyjz gapv n"
## [5] "satu persatu korban di temukan dengan medan yg berat dan masih sering terjadi erupsi menjadi hambatan evakuasi dan itu bukan halangan bagi tim utk menyelesaikan ini believe me tough days will soon pass bismillah marapi erupsimarapisumbar sumbar prayforsumbar httpstcollh z ilzh"
## [6] "alhamdulillah yang viral terkena abu erupsi gunung marapi sdh ditemukan selamat oleh team rescue tadi malam sumbarberduka httpstcoomah s jh"
#stemming/lemmatizing = kata dasar
stem_strings(rev)
## [1] "erupsi gunung marapi sumbar httpstco fapr k x"
## [2] "salah satu korban pasca erupsi mtmarapi sumatera barat hari ini marapi mtmarapi erupsi httpstcon h zetmi"
## [3] "prose evakuasi korban erupsi g marapi semoga prose evakuasi berjalan lancar dan para korban yang belum di temukan bisa segera ditemukan aamiin erupsimarapi gunungmarapi httpstco pmpejcivj"
## [4] "video pendaki saat erupsi terjadi di gunung merapi sumbar httpstcoyjz gapv n"
## [5] "satu persatu korban di temukan dengan medan yg berat dan masih sere terjadi erupsi menjadi hambatan evakuasi dan itu bukan halangan bagi tim utk menyelesaikan ini believ me tough dai will soon pass bismillah marapi erupsimarapisumbar sumbar prayforsumbar httpstcollh z ilzh"
## [6] "alhamdulillah yang viral terkena abu erupsi gunung marapi sdh ditemukan selamat oleh team rescu tadi malam sumbarberduka httpstcoomah jh"
## [7] "mungkin ini salah satu penyebabnya gunung merapi erupsi 🞧🞧 🮧🞧🞧 httpstcomxw wnh tj"
## [8] "erupsi gunung merapi di daerah agam dan bukittinggi sumatera barat ini beberapa dokumentasi pendaki yang sedang dilokasi dekat erupsi marapi sumbar httpstcovnxqqtzdxf"
## [9] "saat terjadinya erupsi meletusnya merapi marapi marapivolcano indonesiavolcano httpstcou cecrvpyz"
## [10] "teman ini gw bukan sok pale tau soal pendakian saran aja sih jngn buka tenda di tempat yg sangat terbuka kaya gini ya apalagi dekat kawah terlebih statu waspada selain bahaya erupsi jg bahaya badai sulit utk minta pertolongan atau utk menyelamatkan diri area marapi httpstcoh pyadcb"
## [11] "perjuangan uda tomi dan kawankawan pemuda batu palano orang yang pertama sampai di puncak merpati untuk mengevakuasi dengan cara menggendong korban erupsi gunung marapi semoga jasa uda dan temanteman pemuda batu palano mendapat balasan kebaikan berkalikali lipat httpstcoflf b ei"
## [12] "erupsi gunung marapi yang terjadi pada minggu desemb lalu memuntahkan abu setinggi meter ke udara dan memakan puluhan korban diketahui sebelumnya dalam musibah tersebut adan sempat menghubungi ibunya dan mengabarkan kondisinya yang tidak bisa berjalan serta httpstco spcph"
## [13] "prose evakuasi pendaki korban erupsi gn marapi an safira terima kasih bapak tni vt bgmulyadi httpstcohn kg vy"
## [14] "sedih banget liat video pendaki minta tolong terjebak erupsi marapi di sumbar sbnr'y marapi terlarang u didaki sejak tahun lalu gw paham betapa susah'i melawan candu mendaki semoga pendaki yg sakau bisa bijak pilih gunung kecanduan mendaki melebihi narkoba httpstco yp tym tv"
## [15] "tangi haru iringi pemakaman bripda muhammad iqbal korban erupsi gunung marapi httpstcozvpeu vct"
## [16] "tiga jenazah korban erupsi gunung marapi telah dievakuasi ke rumah sakit achmad mochtar rsam bukittinggi sumatera barat korban meningg yang teridentifikasi tersebut adalah muhammad adan asal kota pekanbaru riau dan muhammad teguh amanda asal kota padang httpstcoemzyloytdg"
## [17] "banyak kisah heroik dalam kejadian erupsi marapi beberapa hari lalu salah satunya kisah muhammad adan ini surga untukmu cah bagu 🮹 httpstcolo gj eola"
## [18] "bangsat yg nyolong alat deteksi erupsi dini marapi"
## [19] "momen korban erupsi marapi sempat mengabadikan dirinya di puncak abel novita suami dan anaknya bekum ditemukannampak dalam momen tersebut korban zzfebrina yang sudah ditemukan selamat semoga saudari novita wahlul dan anaknya hayva segera ditemukan aamiin httpstconregqsawrx"
## [20] "nah kan bisa bayangin saat evakuasi terjadi erupsi nyawa taruhannya httpstco tmqgn owh"
## [21] "gunung marapi erupsi minggu diketahui ada sejumlah pendaki yang masih berkemah sebelumnya sudah ada imbauan kepada masyarakat wisatawan maupun pendaki agar tidak mencapai puncak dari petuga salah seorang di antara mereka akhirnya meningg akibat kehabisan httpstco gctqospa"
## [22] "detik detik para pendaki yang terjebak abu vulkanik di gunung marapi sumatera barat orang dilaporkan meningg dan orang lainnya masih dalam pencarian tim sar sebelumnya satu pendaki yang terjebak pada saat erupsi gunung marapi berhasil dievakuasi oleh petuga httpstcoiwi imvjcm"
## [23] "salah satu pendaki gunung marapi di sumatera barat yang terjebak erupsi pada minggu desemb kemarin akhirnya ditemukan tim penyelamat sebelumnya korban sempat mengunggah video sesaat setelah erupsi untuk meminta pertolongan httpstcofihpyfwxcp"
## [24] "kami kira gempa ternyata gunung marapi erupsi httpstcoan djbyfng"
## [25] "salah satu prose evakuasi korban erupsi g marapi data pendaki orang orang selamat orang meningg dunia orang belum ditemukan httpstco z mksbsw"
## [26] "pendaki yg terjebak diata gunung marapi bukittinggi sumatra barat yg lagi erupsi semoga pendaki yg masih terjebak di ata gunung selamat amin gunung gunungmarapi sumatrabarat httpstco qqorxljmi"
## [27] "sebanyak orang dari pendaki gunung marapi berhasil dievakuasi pasca erupsi yang terjadi pada minggu desemb sekitar pukul wib httpstco g p ifzuz"
## [28] "begini kondisi gunung marapi sehari sebelum erupsi tanggal desemb puncak marapi sebelum erupsi didokumentasikan oleh muhammad iqbal muhammadiqbalq mahasiswa mapala asal universita riau unri salah satu korban yang selamat alhamdulillah dua kelompok yang sama sama httpstcoc y cfbk"
## [29] "erupsi merapi kemarin kali bebeng magelang begini kondisinya sekarang wah httpstcojodgwetgom"
## [30] "helow ini erupsi alia meletui loh ya bukan semburan mau buang badan loe ye dalam kondisi waspada dan sehari sebelumnya sdh ada kegempaan ya evakuasi suruh turun semua malih knapa jadi nyembur semua gunung berapi jg ada peringatan radiu kok httpstcooq t vjv"
## [31] "pendaki marapi dinyatakan tewa saat erupsi pihak pengelola gunung marapi abai peringatan dari badan volcanologi pusat httpstcoywpeirbpog"
## [32] "erupsi gunung marapi agam sumatera barat semoga tidak ada korban jiwa httpstco psvtqhc"
## [33] "salah satu korban pendaki yg lansung terkena dampak erupsi marapi httpstcotipsrc iy"
## [34] "sementara itu di selat sunda erupsi anak krakatau desemb pukul wib httpstcovd czgohxc"
## [35] "cukup marapi yang jadi pelajaran yg pale berharga banyak teman pendaki yg jadi korban karna erupsi jangan pernah ada lagi yang mendirikan tenda diata bata vegetasj bahkan sangat dekat dengan kawah selain bahaya erupsi jika ada badai habi semua kegulung 🛵 httpstcorj q n la"
## [36] "heraloebss puspentni bang tomi palawan yg tidak terelspos media mempertaruhkan nyawa menjemput dan menggendong jenazah dekat kawah marapi untuk evakuasi tidak seorangpun orang berani disaat masih erupsi dan kabut tebal berpacu dengan waktu untuk turun httpstcoftzt mwhe"
## [37] "tita cahyani merupakan korban selamat erupsi gunung marapi tita menceritakan bagaimana mencekamnya situasi pada saat erupsi berlangsung httpstcofylilym"
## [38] "ternyata pasca erupsi januarifebruari alat deteksi dipasang lagi kemudian dicuri lagi pada bulan maret setelah bencana terjadi mendaku pula kalau karakt gunung ini lain dari yg lain padah kelakuan manusianya yg sungguh lain dari manusia pada umumnya httpstcoakieotobk"
## [39] "gunung marapi erupsi httpstcoii ttq ij"
## [40] "erupsi gunung marapi sumatera barat httpstcowh ca yrnn"
## [41] "new video of marapi erupt yesterdai marapi gunung erupsi erupt indonesia httpstcodvpmhabvdr"
## [42] "bunyi dentuman erupsi gunung api marapi westsumatera sumatera barat indonesia yang terjadi hari ini pukul waktu lokal desemb httpstcok ucf u"
## [43] "marapi in western sumatra not to be confus with merapi erupt todai sundai at around wib 💡 marapi gunung erupsi volcano eruptionwest httpstcocmfwvc mlh"
## [44] "prose evakuasi jenazah pendaki korban erupsi gunung marapi di kabupaten agam sumatera barat mohon doanya ya semoga berjalan lancar sungguh sangat tidak mudah di bawah bayang erupsi belum lagi medan yang terjal httpstcoclzutgsr l"
## [45] "wahlul ad putra saat mendaki bersama mamanya ibu novita intan sari sebelum erupsi httpstcosmi wjj od"
## [46] "video korban erupsi gunung merapi httpstcomztposc sn"
## [47] "gunung marapi yg erupsi di dom gue memakan korban md org dan ternyata marapi siaga sejak januari semoga kasu ini diusut tunta ya dan semoga korban meningg diterima semua amal ibadahnya dan dihapuskan dosa nya serta yg sedang perawatan segera pulih httpstco eodeexwyl"
## [48] "prose evakuasi puluhan pendaki yg terjebak saat terjadi erupsi di gunung marapi sumatera barat teru dilakukan prose evakuasi sempat terkendala kondisi medan dan cuaca disertai beberapa kali erupsi susulan sebelumnya dilaporkan sebanyak pendaki terjebak saat terjadi eropsi httpstcosgpkodi zf"
## [49] "taufikiswandi infobmkg pada hari sabtu desemb sudah lada level waspadajadi gak mungkin erupsi hari ini secara tibayang jadi pertanyaan kenapa gunung yang berada di level ii waspada penadakian tetap di buka httpstco c dabqfq"
## [50] "sebuah pelajaran pahit bagi dunia pendakian gunung sedih kawan banyak yg jadi korban erupsi marapi ini salah satu jumlah korban terbesar pasca kejadian di gunung lawu cukup sdh tragedi ini jangan sombong mawa diri alam liar memang indah tapi bisa membunuhmu kapan saja httpstcoonojb v eh"
## [51] "emang boleh semest akhir kena erupsi gini httpstcojno qa pf"
## [52] "selalu merind liat video tentang erupsi marapi"
## [53] "daftar gunung api yang sedang aktif berstatu waspada dan siaga di indonesia yang sewaktuwaktu dapat terjadi erupsi informasi ini disampaikan biar ngga gegeran lan gumunan karna sake banyaknya tentu saja secara kebetulan bisa erupsi berbarengan httpstcoosjfj h fu"
## [54] "🚨 merapi just erupt 🚨 🚨 infofpmki merapi gunung erupsi erupt indonesia httpstcojufnoqr ga"
## [55] "erupsi gunung merapi hari ini dilihat dari bukittinggi httpstcozlpwlpi b"
## [56] "gunung meletu cik woilah gunung beritaterkini sumaterabarat erupsi httpstco cvq jcrdj"
## [57] "innalilahi untuk pendaki yang terdampak erupsi gunung marapi httpstco yx njgon"
## [58] "pendakilawa sebagai gambaran bopeng dijalan ini akibat dari erupsi gunung kelud pada radiu kurang dari km bayangin aja kalo materi vulkanik kena badan httpstco v st i y"
lemmatize_strings(rev)
## [1] "erupsi gunung marapi sumbar httpstco fapr k x"
## [2] "salah satu korban pasca erupsi mtmarapi sumatera barat hari ini marapi mtmarapi erupsi httpstcon h zetmi"
## [3] "prose evakuasi korban erupsi g marapi semoga prose evakuasi berjalan lancar dan para korban yang belum di temukan bisa segera ditemukan aamiin erupsimarapi gunungmarapi httpstco pmpejcivj"
## [4] "video pendaki saat erupsi terjadi di gunung merapi sumbar httpstcoyjz gapv n"
## [5] "satu persatu korban di temukan dengan medan yg berat dan masih sering terjadi erupsi menjadi hambatan evakuasi dan itu bukan halangan bagi tim utk menyelesaikan ini believe me tough day will soon pass bismillah marapi erupsimarapisumbar sumbar prayforsumbar httpstcollh z ilzh"
## [6] "alhamdulillah yang viral terkena abu erupsi gunung marapi sdh ditemukan selamat oleh team rescue tadi malam sumbarberduka httpstcoomah s jh"
## [7] "mungkin ini salah satu penyebabnya gunung merapi erupsi 🞧🞧 🮧🞧🞧 httpstcomxw wnh tj"
## [8] "erupsi gunung merapi di daerah agam dan bukittinggi sumatera barat ini beberapa dokumentasi pendaki yang sedang dilokasi dekat erupsi marapi sumbar httpstcovnxqqtzdxf"
## [9] "saat terjadinya erupsi meletusnya merapi marapi marapivolcano indonesiavolcano httpstcou cecrvpyz"
## [10] "teman ini gw bukan sok pale tau soal pendakian saran aja sih jngn buka tenda di tempat yg sangat terbuka kaya gini you apalagi dekat kawah terlebih status waspada selain bahaya erupsi jg bahaya badai sulit utk minta pertolongan atau utk menyelamatkan diri area marapi httpstcoh pyadcb"
## [11] "perjuangan uda tomi dan kawankawan pemuda batu palano orang yang pertama sampai di puncak merpati untuk mengevakuasi dengan cara menggendong korban erupsi gunung marapi semoga jasa uda dan temanteman pemuda batu palano mendapat balasan kebaikan berkalikali lipat httpstcoflf b ei"
## [12] "erupsi gunung marapi yang terjadi pada minggu desember lalu memuntahkan abu setinggi meter ke udara dan memakan puluhan korban diketahui sebelumnya dalam musibah tersebut adan sempat menghubungi ibunya dan mengabarkan kondisinya yang tidak bisa berjalan serta httpstco s spcph"
## [13] "prose evakuasi pendaki korban erupsi gn marapi a safira terima kasih bapak tni vt bgmulyadi httpstcohn kg vy"
## [14] "sedih banget liat video pendaki minta tolong terjebak erupsi marapi di sumbar sbnr'y marapi terlarang u didaki sejak tahun lalu gw paham betapa susah'y melawan candu mendaki semoga pendaki yg sakau bisa bijak pilih gunung kecanduan mendaki melebihi narkoba httpstco yp tym tv"
## [15] "tangis haru iringi pemakaman bripda muhammad iqbal korban erupsi gunung marapi httpstcozvpeu vct"
## [16] "tiga jenazah korban erupsi gunung marapi telah dievakuasi ke rumah sakit achmad mochtar rsam bukittinggi sumatera barat korban meninggal yang teridentifikasi tersebut adalah muhammad adan asal kota pekanbaru riau dan muhammad teguh amanda asal kota padang httpstcoemzyloytdg"
## [17] "banyak kisah heroik dalam kejadian erupsi marapi beberapa hari lalu salah satunya kisah muhammad adan ini surga untukmu cah bagus 🮹 httpstcolo gj eola"
## [18] "bangsat yg nyolong alat deteksi erupsi dini marapi"
## [19] "momen korban erupsi marapi sempat mengabadikan dirinya di puncak abel novita suami dan anaknya bekum ditemukannampak dalam momen tersebut korban zzfebrina yang sudah ditemukan selamat semoga saudari novita wahlul dan anaknya hayva segera ditemukan aamiin httpstconregqsawrx"
## [20] "nah kan bisa bayangin saat evakuasi terjadi erupsi nyawa taruhannya httpstco tmqgn owh"
## [21] "gunung marapi erupsi minggu diketahui ada sejumlah pendaki yang masih berkemah sebelumnya sudah ada imbauan kepada masyarakat wisatawan maupun pendaki agar tidak mencapai puncak dari petugas salah seorang di antara mereka akhirnya meninggal akibat kehabisan httpstco gctqospa"
## [22] "detik detik para pendaki yang terjebak abu vulkanik di gunung marapi sumatera barat orang dilaporkan meninggal dan orang lainnya masih dalam pencarian tim sar sebelumnya satu pendaki yang terjebak pada saat erupsi gunung marapi berhasil dievakuasi oleh petugas httpstcoiwi imvjcm"
## [23] "salah satu pendaki gunung marapi di sumatera barat yang terjebak erupsi pada minggu desember kemarin akhirnya ditemukan tim penyelamat sebelumnya korban sempat mengunggah video sesaat setelah erupsi untuk meminta pertolongan httpstcofihpyfwxcp"
## [24] "kami kira gempa ternyata gunung marapi erupsi httpstcoan djbyfng"
## [25] "salah satu prose evakuasi korban erupsi g marapi datum pendaki orang orang selamat orang meninggal dunia orang belum ditemukan httpstco z mksbsw"
## [26] "pendaki yg terjebak diatas gunung marapi bukittinggi sumatra barat yg lagi erupsi semoga pendaki yg masih terjebak di atas gunung selamat amin gunung gunungmarapi sumatrabarat httpstco qqorxljmy"
## [27] "sebanyak orang dari pendaki gunung marapi berhasil dievakuasi pasca erupsi yang terjadi pada minggu desember sekitar pukul wib httpstco g p ifzuz"
## [28] "begini kondisi gunung marapi sehari sebelum erupsi tanggal desember puncak marapi sebelum erupsi didokumentasikan oleh muhammad iqbal muhammadiqbalq mahasiswa mapala asal universitas riau unri salah satu korban yang selamat alhamdulillah dua kelompok yang sama sama httpstcoc y cfbk"
## [29] "erupsi merapi kemarin kali bebeng magelang begini kondisinya sekarang wah httpstcojodgwetgom"
## [30] "helow ini erupsi alias meletuy loh you bukan semburan mau buang badan loe ye dalam kondisi waspada dan sehari sebelumnya sdh ada kegempaan you evakuasi suruh turun semua malih knapa jadi nyembur semua gunung berapi jg ada peringatan radius kok httpstcooq t vjv"
## [31] "pendaki marapi dinyatakan tewas saat erupsi pihak pengelola gunung marapi abai peringatan dari badan volcanologi pusat httpstcoywpeirbpog"
## [32] "erupsi gunung marapi agam sumatera barat semoga tidak ada korban jiwa httpstco psvtqhc"
## [33] "salah satu korban pendaki yg lansung terkena dampak erupsi marapi httpstcotipsrc iye"
## [34] "sementara itu di selat sunda erupsi anak krakatau desember pukul wib httpstcovd czgohxc"
## [35] "cukup marapi yang jadi pelajaran yg pale berharga banyak teman pendaki yg jadi korban karna erupsi jangan pernah ada lagi yang mendirikan tenda diatas batas vegetasj bahkan sangat dekat dengan kawah selain bahaya erupsi jika ada badai habis semua kegulung 🛵 httpstcorj q n la"
## [36] "heraloebss puspentni bang tomy palawan yg tidak terelspose medium mempertaruhkan nyawa menjemput dan menggendong jenazah dekat kawah marapi untuk evakuasi tidak seorangpun orang berani disaat masih erupsi dan kabut tebal berpacu dengan waktu untuk turun httpstcoftzt mwhe"
## [37] "tita cahyani merupakan korban selamat erupsi gunung marapi tita menceritakan bagaimana mencekamnya situasi pada saat erupsi berlangsung httpstcofylilym"
## [38] "ternyata pasca erupsi januarifebruari alat deteksi dipasang lagi kemudian dicuri lagi pada bulan maret setelah bencana terjadi mendaku pula kalau karakter gunung ini lie dari yg lie padahal kelakuan manusianya yg sungguh lie dari manusia pada umumnya httpstcoakieotobke"
## [39] "gunung marapi erupsi httpstcoii ttq ij"
## [40] "erupsi gunung marapi sumatera barat httpstcowh ca yrnn"
## [41] "new video of marapi erupt yesterday marapi gunung erupsi eruption indonesia httpstcodvpmhabvdr"
## [42] "bunyi dentuman erupsi gunung api marapi westsumatera sumatera barat indonesia yang terjadi hari ini pukul waktu lokal desember httpstcok s ucf us"
## [43] "marapi in western sumatra not to be confuse with merapi erupt today sunday at around wib 💡 marapi gunung erupsi volcano eruptionwest httpstcocmfwvc mlh"
## [44] "prose evakuasi jenazah pendaki korban erupsi gunung marapi di kabupaten agam sumatera barat mohon doanya you semoga berjalan lancar sungguh sangat tidak mudah di bawah bayang erupsi belum lagi medan yang terjal httpstcoclzutgsr l"
## [45] "wahlul ade putra saat mendaki bersama mamanya ibu novita intan sari sebelum erupsi httpstcosmi wjj od"
## [46] "video korban erupsi gunung merapi httpstcomztposc sn"
## [47] "gunung marapi yg erupsi di dom gue memakan korban md org dan ternyata marapi siaga sejak januari semoga kasus ini diusut tuntas you dan semoga korban meninggal diterima semua amal ibadahnya dan dihapuskan dosa nya serta yg sedang perawatan segera pulih httpstco eodeexwyl"
## [48] "prose evakuasi puluhan pendaki yg terjebak saat terjadi erupsi di gunung marapi sumatera barat terus dilakukan prose evakuasi sempat terkendala kondisi medan dan cuaca disertai beberapa kali erupsi susulan sebelumnya dilaporkan sebanyak pendaki terjebak saat terjadi eropsi httpstcosgpkodi zf"
## [49] "taufikiswandi infobmkg pada hari sabtu desember sudah lada level waspadajadi gak mungkin erupsi hari ini secara tibayang jadi pertanyaan kenapa gunung yang berada di level ii waspada penadakian tetap di buka httpstco c dabqfq"
## [50] "sebuah pelajaran pahit bagi dunia pendakian gunung sedih kawan banyak yg jadi korban erupsi marapi ini salah satu jumlah korban terbesar pasca kejadian di gunung lawu cukup sdh tragedi ini jangan sombong mawas diri alam liar memang indah tapi bisa membunuhmu kapan saja httpstcoonojb v eh"
## [51] "emang boleh semester akhir kena erupsi gini httpstcojno qa pf"
## [52] "selalu merinding liat video tentang erupsi marapi"
## [53] "daftar gunung api yang sedang aktif berstatus waspada dan siaga di indonesia yang sewaktuwaktu dapat terjadi erupsi informasi ini disampaikan biar ngga gegeran lan gumunan karna saking banyaknya tentu saja secara kebetulan bisa erupsi berbarengan httpstcoosjfj h fu"
## [54] "🚨 merapi just erupt 🚨 🚨 infofpmki merapi gunung erupsi eruption indonesia httpstcojufnoqr ga"
## [55] "erupsi gunung merapi hari ini dilihat dari bukittinggi httpstcozlpwlpi b"
## [56] "gunung meletus cik woilah gunung beritaterkini sumaterabarat erupsi httpstco cvq jcrdj"
## [57] "innalilahi untuk pendaki yang terdampak erupsi gunung marapi httpstco yx njgon"
## [58] "pendakilawas sebagai gambaran bopeng dijalan ini akibat dari erupsi gunung kelud pada radius kurang dari km bayangin aja kalo material vulkanik kena badan httpstco v st i y"
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] "erupsi gunung marapi sumbar fapr k x"
## [2] "salah satu korban pasca erupsi mtmarapi sumatera barat hari marapi mtmarapi erupsi httpstcon h zetmi"
## [3] "proses evakuasi korban erupsi g marapi semoga proses evakuasi berjalan lancar para korban temukan segera ditemukan aamiin erupsimarapi gunungmarapi pmpejcivj"
## [4] "video pendaki erupsi terjadi gunung merapi sumbar httpstcoyjz gapv n"
## [5] "satu persatu korban temukan medan yg berat masih sering terjadi erupsi menjadi hambatan evakuasi bukan halangan bagi tim utk menyelesaikan believe me tough days will soon pass bismillah marapi erupsimarapisumbar sumbar prayforsumbar httpstcollh z ilzh"
## [6] "alhamdulillah viral terkena abu erupsi gunung marapi sdh ditemukan selamat team rescue tadi malam sumbarberduka httpstcoomah s jh"
write.csv(rev,file = "C:/Users/USER/Downloads/UAS_Sahra Masdar_E0221562/dataerupsi1.csv", row.names = F)
##Membuat Word Cloud #Mengubah Data Frame Menjadi Data Faktor
tdm <- TermDocumentMatrix(rev)
tdm
## <<TermDocumentMatrix (terms: 607, documents: 58)>>
## Non-/sparse entries: 1073/34133
## Sparsity : 97%
## Maximal term length: 18
## Weighting : term frequency (tf)
m <- as.matrix(tdm)
View(m)
v <- sort(rowSums(m),decreasing = TRUE)
head(v)
## erupsi marapi gunung korban pendaki barat
## 67 49 44 25 21 11
#Mengubah Data Faktor Menjadi Data Frame
d <- data.frame(word = names(v), freq = v)
head(d)
## word freq
## erupsi erupsi 67
## marapi marapi 49
## gunung gunung 44
## korban korban 25
## pendaki pendaki 21
## barat barat 11
wordcloud(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: 663, documents: 58)>>
## Non-/sparse entries: 1156/37298
## Sparsity : 97%
## Maximal term length: 18
## Weighting : term frequency (tf)
(freq.terms <- findFreqTerms(tdm, lowfreq = 50))
## [1] "erupsi"
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()
findAssocs(tdm, "erupsi", 0.2)
## $erupsi
## h karna sumatera barat
## 0.44 0.44 0.43 0.40
## medan agam beberapa sedang
## 0.33 0.33 0.33 0.33
## sangat kondisi httpstcon mtmarapi
## 0.33 0.33 0.31 0.31
## zetmi daerah dilokasi dokumentasi
## 0.31 0.31 0.31 0.31
## httpstcovnxqqtzdxf httpstcofihpyfwxcp meminta mengunggah
## 0.31 0.31 0.31 0.31
## penyelamat sesaat cfbk didokumentasikan
## 0.31 0.31 0.31 0.31
## dua httpstcoc kelompok mahasiswa
## 0.31 0.31 0.31 0.31
## mapala muhammadiqbalq sama tanggal
## 0.31 0.31 0.31 0.31
## universitas unri bahkan batas
## 0.31 0.31 0.31 0.31
## berharga habis httpstcorj jika
## 0.31 0.31 0.31 0.31
## kegulung la mendirikan pernah
## 0.31 0.31 0.31 0.31
## q vegetasj 🛵 bagaimana
## 0.31 0.31 0.31 0.31
## berlangsung cahyani httpstcofylilym mencekamnya
## 0.31 0.31 0.31 0.31
## menceritakan merupakan situasi tita
## 0.31 0.31 0.31 0.31
## bawah bayang doanya httpstcoclzutgsr
## 0.31 0.31 0.31 0.31
## kabupaten l mohon mudah
## 0.31 0.31 0.31 0.31
## terjal cuaca dilakukan disertai
## 0.31 0.31 0.31 0.31
## eropsi httpstcosgpkodi susulan terkendala
## 0.31 0.31 0.31 0.31
## terus zf aktif banyaknya
## 0.31 0.31 0.31 0.31
## berbarengan berstatus biar daftar
## 0.31 0.31 0.31 0.31
## dapat disampaikan fu gegeran
## 0.31 0.31 0.31 0.31
## gumunan httpstcoosjfj informasi kebetulan
## 0.31 0.31 0.31 0.31
## lan ngga saking sewaktuwaktu
## 0.31 0.31 0.31 0.31
## tentu dekat sempat sebelum
## 0.31 0.26 0.26 0.25
## proses salah satu pendaki
## 0.22 0.21 0.21 0.21
findAssocs(tdm, "gunung", 0.2)
## $gunung
## amin atas qqorxljmy sumatrabarat terjebak
## 0.48 0.48 0.48 0.48 0.46
## sumatra barat bukittinggi pendaki detik
## 0.38 0.33 0.32 0.31 0.26
## httpstcoiwi imvjcm lainnya pencarian sar
## 0.26 0.26 0.26 0.26 0.26
## alam eh httpstcoonojb indah jumlah
## 0.26 0.26 0.26 0.26 0.26
## kapan kawan lawu liar mawas
## 0.26 0.26 0.26 0.26 0.26
## memang membunuhmu pahit sebuah sombong
## 0.26 0.26 0.26 0.26 0.26
## tapi terbesar tragedi beritaterkini cik
## 0.26 0.26 0.26 0.26 0.26
## cvq jcrdj meletus sumaterabarat woilah
## 0.26 0.26 0.26 0.26 0.26
## gunungmarapi masih sebelumnya sedih petugas
## 0.22 0.22 0.22 0.22 0.22
## berhasil dilaporkan vulkanik diatas saja
## 0.22 0.22 0.22 0.22 0.22
## v abu sdh dievakuasi
## 0.22 0.21 0.21 0.21
tdm2 <- removeSparseTerms(tdm, sparse = 0.95)
m2 <- as.matrix(tdm2)
m2
## Docs
## Terms 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
## erupsi 1 2 1 1 1 1 1 2 1 1 1 1 1 1 1 1 1 1 1 1 1 1 2 1 1
## gunung 1 0 0 1 0 1 1 1 0 0 1 1 0 1 1 1 0 0 0 0 1 2 1 1 0
## marapi 1 1 1 0 1 1 0 1 1 1 1 1 1 2 1 1 1 1 1 0 1 2 1 1 1
## sumbar 1 0 0 1 1 0 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0
## barat 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 1 0 0 0 0 0 1 1 0 0
## hari 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0
## korban 0 1 2 0 1 0 0 0 0 0 1 1 1 0 1 2 0 0 2 0 0 0 1 0 1
## pasca 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## salah 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 1 0 0 0 1 0 1 0 1
## satu 0 1 0 0 1 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 1
## sumatera 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 1 0 0 0 0 0 1 1 0 0
## berjalan 0 0 1 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0
## ditemukan 0 0 1 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 2 0 0 0 1 0 1
## evakuasi 0 0 2 0 1 0 0 0 0 0 0 0 1 0 0 0 0 0 0 1 0 0 0 0 1
## g 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1
## proses 0 0 2 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 1
## segera 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0
## semoga 0 0 1 0 0 0 0 0 0 0 1 0 0 1 0 0 0 0 1 0 0 0 0 0 0
## merapi 0 0 0 1 0 0 1 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## pendaki 0 0 0 1 0 0 0 1 0 0 0 0 1 2 0 0 0 0 0 0 2 2 1 0 1
## terjadi 0 0 0 1 1 0 0 0 0 0 0 1 0 0 0 0 0 0 0 1 0 0 0 0 0
## video 0 0 0 1 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 1 0 0
## bukan 0 0 0 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## masih 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0
## medan 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## tim 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0
## yg 0 0 0 0 1 0 0 0 0 1 0 0 0 1 0 0 0 1 0 0 0 0 0 0 0
## abu 0 0 0 0 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 1 0 0 0
## s 0 0 0 0 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0
## sdh 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## selamat 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 1
## agam 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## beberapa 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0
## bukittinggi 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0
## dekat 0 0 0 0 0 0 0 1 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## sedang 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## kawah 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## sangat 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## waspada 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## ya 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## orang 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 2 0 0 4
## puncak 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 1 0 1 0 0 0 0
## untuk 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 1 0 0
## adan 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 1 1 0 0 0 0 0 0 0 0
## dalam 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 1 0 1 0 0 1 0 0 0
## desember 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 1 0 0
## lalu 0 0 0 0 0 0 0 0 0 0 0 1 0 1 0 0 1 0 0 0 0 0 0 0 0
## minggu 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 1 0 1 0 0
## sebelumnya 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 1 1 1 0 0
## sempat 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 1 0 0 0 1 0 0
## tersebut 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 1 0 0 1 0 0 0 0 0 0
## tidak 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 1 0 0 0 0
## terjebak 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 2 1 0 0
## muhammad 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 2 1 0 0 0 0 0 0 0 0
## dievakuasi 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 1 0 0 0
## jenazah 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0
## meninggal 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 1 1 0 0 1
## banyak 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0
## sudah 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 1 0 0 0 0
## ada 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 2 0 0 0 0
## dari 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0
## ternyata 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0
## lagi 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## pukul 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## wib 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## kondisi 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## badan 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## jadi 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## semua 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## indonesia 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## Docs
## Terms 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47
## erupsi 1 1 2 1 1 1 1 1 1 2 1 2 1 1 1 1 1 1 2 1 1 1
## gunung 3 1 1 0 1 1 1 0 0 0 0 1 1 1 1 1 1 1 1 0 1 1
## marapi 1 1 2 0 0 2 1 1 0 1 1 1 0 1 1 2 1 2 1 0 0 2
## sumbar 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## barat 1 0 0 0 0 0 1 0 0 0 0 0 0 0 1 0 1 0 1 0 0 0
## hari 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0
## korban 0 0 1 0 0 0 1 1 0 1 0 1 0 0 0 0 0 0 1 0 1 2
## pasca 0 1 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0
## salah 0 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## satu 0 0 1 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## sumatera 0 0 0 0 0 0 1 0 0 0 0 0 0 0 1 0 1 0 1 0 0 0
## berjalan 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0
## ditemukan 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## evakuasi 0 0 0 0 1 0 0 0 0 0 1 0 0 0 0 0 0 0 1 0 0 0
## g 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## proses 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0
## segera 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1
## semoga 1 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 1 0 0 2
## merapi 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 1 0
## pendaki 2 1 0 0 0 1 0 1 0 1 0 0 0 0 0 0 0 0 1 0 0 0
## terjadi 0 1 0 0 0 0 0 0 0 0 0 0 1 0 0 0 1 0 0 0 0 0
## video 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 1 0
## bukan 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## masih 1 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0
## medan 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0
## tim 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## yg 3 0 0 0 0 0 0 1 0 2 1 0 2 0 0 0 0 0 0 0 0 2
## abu 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## s 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0
## sdh 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## selamat 1 0 1 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0
## agam 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0
## beberapa 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## bukittinggi 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## dekat 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0 0 0 0 0 0 0
## sedang 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1
## kawah 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0 0 0 0 0 0 0
## sangat 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 1 0 0 0
## waspada 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## ya 0 0 0 0 2 0 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 1
## orang 0 1 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0
## puncak 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## untuk 0 0 0 0 0 0 0 0 0 0 2 0 0 0 0 0 0 0 0 0 0 0
## adan 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## dalam 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## desember 0 1 1 0 0 0 0 0 1 0 0 0 0 0 0 0 1 0 0 0 0 0
## lalu 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## minggu 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## sebelumnya 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## sempat 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## tersebut 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## tidak 0 0 0 0 0 0 1 0 0 0 2 0 0 0 0 0 0 0 1 0 0 0
## terjebak 2 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## muhammad 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## dievakuasi 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## jenazah 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 1 0 0 0
## meninggal 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1
## banyak 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0
## sudah 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## ada 0 0 0 0 2 0 1 0 0 2 0 0 0 0 0 0 0 0 0 0 0 0
## dari 0 1 0 0 0 1 0 0 0 0 0 0 2 0 0 0 0 0 0 0 0 0
## ternyata 0 0 0 0 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 1
## lagi 1 0 0 0 0 0 0 0 0 1 0 0 2 0 0 0 0 0 1 0 0 0
## pukul 0 1 0 0 0 0 0 0 1 0 0 0 0 0 0 0 1 0 0 0 0 0
## wib 0 1 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 1 0 0 0 0
## kondisi 0 0 1 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## badan 0 0 0 0 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
## jadi 0 0 0 0 1 0 0 0 0 2 0 0 0 0 0 0 0 0 0 0 0 0
## semua 0 0 0 0 2 0 0 0 0 1 0 0 0 0 0 0 0 0 0 0 0 1
## indonesia 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 0 0 0 0 0
## Docs
## Terms 48 49 50 51 52 53 54 55 56 57 58
## erupsi 2 1 1 1 1 2 1 1 1 1 1
## gunung 1 1 2 0 0 1 1 1 2 1 1
## marapi 1 0 1 0 1 0 0 0 0 1 0
## sumbar 0 0 0 0 0 0 0 0 0 0 0
## barat 1 0 0 0 0 0 0 0 0 0 0
## hari 0 2 0 0 0 0 0 1 0 0 0
## korban 0 0 2 0 0 0 0 0 0 0 0
## pasca 0 0 1 0 0 0 0 0 0 0 0
## salah 0 0 1 0 0 0 0 0 0 0 0
## satu 0 0 1 0 0 0 0 0 0 0 0
## sumatera 1 0 0 0 0 0 0 0 0 0 0
## berjalan 0 0 0 0 0 0 0 0 0 0 0
## ditemukan 0 0 0 0 0 0 0 0 0 0 0
## evakuasi 2 0 0 0 0 0 0 0 0 0 0
## g 0 0 0 0 0 0 0 0 0 0 0
## proses 2 0 0 0 0 0 0 0 0 0 0
## segera 0 0 0 0 0 0 0 0 0 0 0
## semoga 0 0 0 0 0 0 0 0 0 0 0
## merapi 0 0 0 0 0 0 2 1 0 0 0
## pendaki 2 0 0 0 0 0 0 0 0 1 0
## terjadi 2 0 0 0 0 1 0 0 0 0 0
## video 0 0 0 0 1 0 0 0 0 0 0
## bukan 0 0 0 0 0 0 0 0 0 0 0
## masih 0 0 0 0 0 0 0 0 0 0 0
## medan 1 0 0 0 0 0 0 0 0 0 0
## tim 0 0 0 0 0 0 0 0 0 0 0
## yg 1 0 1 0 0 0 0 0 0 0 0
## abu 0 0 0 0 0 0 0 0 0 0 0
## s 0 0 0 0 0 0 0 0 0 0 0
## sdh 0 0 1 0 0 0 0 0 0 0 0
## selamat 0 0 0 0 0 0 0 0 0 0 0
## agam 0 0 0 0 0 0 0 0 0 0 0
## beberapa 1 0 0 0 0 0 0 0 0 0 0
## bukittinggi 0 0 0 0 0 0 0 1 0 0 0
## dekat 0 0 0 0 0 0 0 0 0 0 0
## sedang 0 0 0 0 0 1 0 0 0 0 0
## kawah 0 0 0 0 0 0 0 0 0 0 0
## sangat 0 0 0 0 0 0 0 0 0 0 0
## waspada 0 1 0 0 0 1 0 0 0 0 0
## ya 0 0 0 0 0 0 0 0 0 0 0
## orang 0 0 0 0 0 0 0 0 0 0 0
## puncak 0 0 0 0 0 0 0 0 0 0 0
## untuk 0 0 0 0 0 0 0 0 0 1 0
## adan 0 0 0 0 0 0 0 0 0 0 0
## dalam 0 0 0 0 0 0 0 0 0 0 0
## desember 0 1 0 0 0 0 0 0 0 0 0
## lalu 0 0 0 0 0 0 0 0 0 0 0
## minggu 0 0 0 0 0 0 0 0 0 0 0
## sebelumnya 1 0 0 0 0 0 0 0 0 0 0
## sempat 1 0 0 0 0 0 0 0 0 0 0
## tersebut 0 0 0 0 0 0 0 0 0 0 0
## tidak 0 0 0 0 0 0 0 0 0 0 0
## terjebak 2 0 0 0 0 0 0 0 0 0 0
## muhammad 0 0 0 0 0 0 0 0 0 0 0
## dievakuasi 0 0 0 0 0 0 0 0 0 0 0
## jenazah 0 0 0 0 0 0 0 0 0 0 0
## meninggal 0 0 0 0 0 0 0 0 0 0 0
## banyak 0 0 1 0 0 0 0 0 0 0 0
## sudah 0 1 0 0 0 0 0 0 0 0 0
## ada 0 0 0 0 0 0 0 0 0 0 0
## dari 0 0 0 0 0 0 0 1 0 0 2
## ternyata 0 0 0 0 0 0 0 0 0 0 0
## lagi 0 0 0 0 0 0 0 0 0 0 0
## pukul 0 0 0 0 0 0 0 0 0 0 0
## wib 0 0 0 0 0 0 0 0 0 0 0
## kondisi 1 0 0 0 0 0 0 0 0 0 0
## badan 0 0 0 0 0 0 0 0 0 0 1
## jadi 0 1 1 0 0 0 0 0 0 0 0
## semua 0 0 0 0 0 0 0 0 0 0 0
## indonesia 0 0 0 0 0 1 1 0 0 0 0
distMatrix <- dist(scale(m2))
distMatrix
## erupsi gunung marapi sumbar barat hari
## gunung 21.509913
## marapi 20.699572 18.820716
## sumbar 28.288239 19.983311 21.786976
## barat 27.352112 19.157432 20.989563 9.939258
## hari 28.449800 20.648816 23.020966 10.551695 9.995804
## korban 25.949777 20.378916 19.926236 15.359858 14.221870 15.980041
## pasca 28.671446 20.334036 22.273942 8.264392 8.471272 8.594028
## salah 27.650543 20.440630 21.633917 10.374372 10.118267 9.853159
## satu 27.696415 20.311339 21.563352 9.550363 9.708421 10.518835
## sumatera 27.395022 19.461585 21.045450 9.820368 1.532717 9.877595
## berjalan 28.886948 20.646093 22.252022 7.761426 8.248970 8.879804
## ditemukan 28.761851 21.044628 22.089381 9.252530 9.665149 10.208845
## evakuasi 27.910889 22.171129 22.478359 10.882983 11.398883 12.285350
## g 29.049735 20.800263 22.268211 7.714853 8.719822 8.839127
## proses 28.607240 21.436303 22.119239 9.641688 9.517250 10.562828
## segera 29.068041 20.907529 22.139409 7.645591 8.658602 8.778739
## semoga 28.463856 20.041920 21.152372 9.390115 9.223835 10.801990
## merapi 26.820608 20.583077 24.133701 13.520192 14.873354 14.443332
## pendaki 26.990154 19.424065 19.986022 12.064405 12.473335 14.707666
## terjadi 27.504711 20.494851 23.042115 9.720409 11.032336 11.575716
## video 27.927882 20.285740 21.539695 9.106405 11.069539 11.547298
## bukan 28.942162 21.068889 22.292319 7.202639 9.070482 9.185234
## masih 28.913793 20.472873 21.963755 7.315689 8.580761 9.274148
## medan 28.799213 20.781093 22.252781 6.806366 7.932009 8.877901
## tim 28.883274 20.640270 22.121328 6.824418 7.916484 8.891748
## yg 27.894340 21.392987 21.047733 12.500845 13.318185 14.094651
## abu 28.968093 20.207369 22.035187 8.015963 8.670926 9.103124
## s 28.887743 20.230573 22.056469 8.300865 8.398586 8.522390
## sdh 28.964075 20.105490 22.320762 8.030468 9.000263 9.115899
## selamat 28.208807 20.093747 21.590693 8.931565 9.570305 9.918873
## agam 28.639918 20.351520 22.167456 7.317208 6.726612 9.088855
## beberapa 28.734445 20.786827 22.208195 7.192616 7.947020 8.043598
## bukittinggi 28.671629 19.947290 22.575634 7.773973 7.969344 8.021480
## dekat 28.599202 21.057637 22.067328 7.613848 8.630586 9.329332
## sedang 28.513665 20.368715 22.403997 7.269207 8.328127 9.050255
## kawah 28.872066 21.181392 22.185451 7.949714 8.928286 9.044841
## sangat 28.727357 20.965815 22.193909 7.926070 8.404068 9.024066
## waspada 28.496566 20.519523 22.799008 8.644377 9.552046 7.934677
## ya 28.840718 20.805471 22.367952 8.805326 9.237940 9.805353
## orang 29.310225 21.326673 22.358474 11.113911 11.351707 11.921837
## puncak 28.711516 20.436874 21.825152 8.342278 9.279543 9.391741
## untuk 28.624767 20.537401 21.910590 9.707774 10.101814 10.623186
## adan 28.969998 20.739700 22.164090 8.009075 8.480538 8.164342
## dalam 28.855545 20.664191 22.053440 8.412108 9.038409 8.560068
## desember 28.016625 20.358499 22.302636 10.015134 9.655270 8.582092
## lalu 28.960025 20.725768 21.926505 7.404423 9.013287 8.199647
## minggu 28.779042 20.290840 22.111760 8.152439 8.617891 9.223527
## sebelumnya 28.640910 20.082195 22.086623 8.324594 8.150009 9.376036
## sempat 28.747767 20.593517 22.186161 7.947733 8.116483 9.043100
## tersebut 29.030524 20.654894 22.243143 7.786832 8.270974 8.902020
## tidak 28.746199 20.706316 22.068997 9.342065 8.887066 10.290062
## terjebak 28.789548 19.812749 21.878139 8.748193 7.967017 10.248884
## muhammad 28.634577 20.500603 21.723838 9.565035 9.514308 9.695416
## dievakuasi 29.046811 20.320054 22.138571 7.725853 7.866131 8.848729
## jenazah 28.894204 20.683841 22.261439 7.734372 7.673604 8.856167
## meninggal 28.972911 20.354015 21.887096 7.998530 8.134106 9.087776
## banyak 28.885014 20.711854 22.202298 7.902540 8.886308 8.059860
## sudah 28.994598 20.604369 22.535783 7.919557 8.901444 7.138152
## ada 28.909665 20.904324 22.706914 9.957447 9.978330 10.851818
## dari 28.736186 20.013565 23.364623 11.715759 12.400618 11.433020
## ternyata 28.824243 20.139796 22.024438 8.518749 9.438507 9.548837
## lagi 28.839376 20.470015 22.739639 8.628265 8.806491 9.646665
## pukul 28.725322 20.892808 22.665418 8.846577 8.938334 9.054760
## wib 28.694404 20.850278 22.215101 8.946355 9.826168 9.932193
## kondisi 28.836640 20.515420 22.269835 7.569543 8.289715 8.712587
## badan 28.890930 20.235124 22.318878 8.289765 9.232363 9.345127
## jadi 28.772163 20.484094 22.705697 8.693024 9.596093 7.987647
## semua 29.047079 20.778138 22.586997 8.227188 9.176217 9.289662
## indonesia 28.373507 19.911223 22.195362 9.040114 9.129926 9.243940
## korban pasca salah satu sumatera berjalan
## gunung
## marapi
## sumbar
## barat
## hari
## korban
## pasca 13.906868
## salah 13.674165 7.790080
## satu 13.060039 7.625385 4.690971
## sumatera 14.139036 8.331460 10.001505 9.586668
## berjalan 13.462705 5.984382 8.668348 8.520646 8.105324
## ditemukan 13.242003 7.821920 9.280641 9.142836 9.542844 6.693397
## evakuasi 14.237252 10.387094 11.897485 11.186241 11.295367 8.630174
## g 13.938673 4.771859 8.291591 8.137053 8.584059 4.325645
## proses 13.312482 8.278602 10.109088 9.982726 9.393020 5.926502
## segera 12.929286 5.833367 8.564789 8.415269 8.521864 4.200871
## semoga 12.203663 8.581661 10.628845 10.508734 9.350313 6.968034
## merapi 18.507007 13.810431 14.153881 14.063908 14.794169 13.515456
## pendaki 16.673893 12.686841 12.626652 12.751766 12.752715 12.510250
## terjadi 16.209479 9.191606 12.048692 11.346929 10.925348 9.330684
## video 15.276543 9.502737 10.996313 10.880259 10.962913 9.068714
## bukan 14.455293 6.428875 8.980972 8.014967 8.940046 5.768014
## masih 14.511954 6.555282 8.593899 7.764918 8.716575 5.908576
## medan 13.953264 5.981558 8.666399 7.660829 7.782516 4.359821
## tim 13.962078 6.002091 8.163453 6.681075 7.766691 5.288161
## yg 15.558282 11.317544 12.789935 12.131129 13.752096 12.147454
## abu 14.512469 6.311004 8.896977 8.427948 8.534385 4.587691
## s 14.671757 6.669143 9.154502 9.014768 8.257544 5.069083
## sdh 14.235283 5.531745 8.362275 8.209067 8.868795 5.656949
## selamat 13.606139 7.439486 8.918692 8.775204 9.692263 6.876446
## agam 14.009391 6.290404 8.882377 8.738293 6.549663 4.774745
## beberapa 14.807625 6.145029 7.809533 8.634232 7.797814 5.449856
## bukittinggi 14.508016 6.816326 9.262275 9.124192 8.115397 6.196923
## dekat 14.794959 6.633124 9.128295 8.988154 8.493397 5.994822
## sedang 14.380751 6.234502 8.842876 8.698138 8.185870 5.550547
## kawah 14.617235 6.226641 8.837335 8.692505 8.795741 5.541716
## sangat 14.303063 6.196425 8.816071 8.670886 8.263119 4.650235
## waspada 15.225070 7.092134 9.467090 9.332039 9.428275 6.499071
## ya 14.571661 7.287446 9.614276 9.481321 9.109902 6.027924
## orang 15.441653 9.315078 10.758415 10.101017 11.247756 9.541052
## puncak 13.400600 6.720618 8.160194 8.514339 9.152087 6.091490
## untuk 14.937604 8.355476 10.021520 9.894039 9.984860 7.858342
## adan 13.893063 6.302253 7.933840 8.746826 8.340882 4.575644
## dalam 14.105380 6.807104 8.340509 8.805578 8.907504 5.249266
## desember 15.115790 7.972113 9.850461 9.720737 9.532839 7.556066
## lalu 14.528561 6.347922 7.970166 8.779789 8.882011 4.638346
## minggu 14.286630 5.451049 8.013001 8.373374 8.480496 4.822188
## sebelumnya 14.385562 6.698654 8.188088 8.207493 8.004588 5.107847
## sempat 13.514958 6.224112 8.328052 8.174203 7.970450 4.467404
## tersebut 13.090026 6.017297 8.691104 8.543796 8.127717 4.174446
## tidak 14.450595 7.927627 9.681459 9.981776 8.753898 5.945995
## terjebak 15.323034 7.874105 9.623846 8.882875 8.397680 7.344460
## muhammad 13.206615 8.189200 8.990501 9.715465 9.390039 7.681312
## dievakuasi 14.116733 4.789623 8.636512 8.152512 7.715361 5.215503
## jenazah 13.809536 5.949253 8.644133 8.496010 7.518975 4.315393
## meninggal 13.576943 6.288847 8.047605 8.067348 7.988396 5.611519
## banyak 13.928141 5.344337 7.196483 8.083967 8.753128 5.473829
## sudah 14.199964 6.188092 8.317202 8.664933 8.768494 5.498366
## ada 15.063347 8.644296 9.857138 10.559945 9.859911 8.164766
## dari 17.156238 9.079522 11.988139 12.231954 12.305532 10.235803
## ternyata 14.699631 6.253456 9.352519 9.215789 9.313227 6.331014
## lagi 14.703809 5.652176 9.452380 9.317115 8.938876 5.766200
## pukul 15.340776 6.443105 9.652070 9.519643 8.805941 6.765691
## wib 15.398531 6.579433 9.743603 9.612437 9.705893 6.895645
## kondisi 14.314823 5.733331 7.920682 7.758760 8.146788 4.981028
## badan 15.026566 6.655322 9.144438 9.004548 9.104247 6.019374
## jadi 14.159792 6.456041 9.000438 8.858275 9.472897 6.563637
## semua 14.303314 6.577213 9.087748 8.946972 9.047305 5.932899
## indonesia 15.453192 7.569463 9.829761 9.699760 9.000351 7.016860
## ditemukan evakuasi g proses segera semoga
## gunung
## marapi
## sumbar
## barat
## hari
## korban
## pasca
## salah
## satu
## sumatera
## berjalan
## ditemukan
## evakuasi 10.143522
## g 6.197724 8.763600
## proses 7.970856 6.273475 6.119166
## segera 4.985881 9.022516 4.114189 6.484544
## semoga 8.029679 10.597735 7.519527 8.541399 5.730011
## merapi 14.423493 15.960778 13.488765 14.676170 13.449271 14.849230
## pendaki 13.274296 13.318418 12.103954 11.748352 12.784063 12.850933
## terjadi 11.097418 9.356454 9.205482 10.494082 9.797879 11.645392
## video 9.944879 12.422579 9.028887 10.722126 8.969777 10.496480
## bukan 7.657648 9.173709 5.705192 8.123571 5.611179 8.432204
## masih 7.764076 9.146013 5.847265 8.223970 5.755573 8.248934
## medan 7.286164 8.186437 5.195943 6.445198 5.092537 7.539238
## tim 6.680096 9.282469 5.219567 7.790190 5.116638 8.111518
## yg 13.150294 13.642179 12.117750 13.041978 11.498198 11.587278
## abu 6.136947 10.190546 5.572034 8.030613 5.475735 8.342686
## s 6.504676 10.416138 5.974635 8.315013 5.884927 8.616792
## sdh 6.155880 9.837039 5.592880 8.045091 5.496946 8.356623
## selamat 5.417785 10.662804 6.394977 8.622002 6.035056 8.446313
## agam 7.541773 9.740487 5.548691 7.451215 5.451980 6.673100
## beberapa 7.420952 9.570264 5.383323 7.227273 5.283585 8.217847
## bukittinggi 7.985703 10.510982 6.138492 8.433520 6.051214 8.457865
## dekat 7.829910 9.927511 5.934402 8.286151 5.844077 8.588944
## sedang 7.495210 10.143346 5.485235 7.970633 4.715952 7.421134
## kawah 7.488672 9.660652 5.476299 7.964486 5.378286 8.279051
## sangat 7.463567 9.680061 5.441918 7.372049 5.343274 7.710821
## waspada 8.222379 10.344282 6.443381 8.657964 6.360288 8.948184
## ya 8.391425 9.684497 6.657752 8.310131 6.039706 7.784634
## orang 9.681178 11.444352 7.437299 10.053757 9.447064 10.458869
## puncak 6.657173 10.449170 6.032039 8.356355 5.122758 6.810549
## untuk 8.855088 10.719599 7.812347 9.719874 7.743957 8.950408
## adan 7.551658 10.185128 5.562120 8.023737 5.465646 8.336067
## dalam 6.744473 10.150984 6.128251 8.426069 5.235706 8.187145
## desember 9.191007 11.827699 7.400903 10.026863 8.125940 10.278504
## lalu 7.589813 10.213451 5.613814 8.059658 5.518244 7.756946
## minggu 7.115755 10.298243 4.575230 8.166844 5.673646 8.473901
## sebelumnya 7.312357 9.559702 6.007558 7.703510 5.918349 8.639652
## sempat 5.401876 9.621234 5.473423 7.294632 4.451462 7.709231
## tersebut 5.946353 10.011309 5.237046 7.801912 4.157380 7.543245
## tidak 8.953012 9.961554 7.352963 8.876863 7.280259 8.234583
## terjebak 8.402388 10.278144 7.295226 8.141484 7.221941 8.513444
## muhammad 9.185431 11.449081 7.634251 9.577315 7.564251 9.840459
## dievakuasi 7.250591 9.963953 3.762881 7.741052 5.041509 8.064338
## jenazah 7.259667 9.013335 5.158721 7.165545 5.054553 7.513634
## meninggal 7.154699 9.894394 5.009927 7.651310 4.787565 7.466847
## banyak 7.438575 10.101569 5.407591 7.917400 5.308309 8.233764
## sudah 6.119128 10.114887 5.432428 7.934384 4.400958 7.680180
## ada 9.593383 11.140782 8.120508 9.969244 8.054735 9.401887
## dari 11.407947 13.298517 9.577550 11.725787 10.148251 11.941681
## ternyata 8.090200 10.590592 6.273833 8.532535 5.613678 8.021621
## lagi 8.205437 10.262941 6.421748 8.122283 6.338371 8.147557
## pukul 8.434701 10.856034 5.721223 8.859853 6.632490 9.143667
## wib 8.539292 10.937496 5.874328 8.959483 6.765003 9.240238
## kondisi 7.083801 8.909939 4.908144 6.880638 4.798539 7.914715
## badan 7.848723 10.049832 5.959203 8.303931 5.869259 8.606099
## jadi 8.273507 10.384969 6.508499 8.706535 6.426249 8.995188
## semua 7.782601 9.625638 5.871841 8.241462 5.160515 7.711287
## indonesia 8.637471 11.014319 6.965311 9.053106 6.888517 9.331045
## merapi pendaki terjadi video bukan masih
## gunung
## marapi
## sumbar
## barat
## hari
## korban
## pasca
## salah
## satu
## sumatera
## berjalan
## ditemukan
## evakuasi
## g
## proses
## segera
## semoga
## merapi
## pendaki 16.963867
## terjadi 15.191889 13.440301
## video 13.620899 13.011368 11.417859
## bukan 13.718059 13.066542 9.456288 9.367986
## masih 13.777752 11.615366 9.542676 9.455181 5.152627
## medan 13.514206 12.094738 8.583712 9.066850 4.399645 4.582376
## tim 13.523306 12.064184 9.171480 8.587390 4.427520 3.956916
## yg 17.391832 13.846334 13.245724 13.861900 11.027389 10.829754
## abu 13.663217 12.572143 9.543459 9.287492 6.106220 5.774095
## s 13.832288 13.186415 8.991211 9.534475 6.475695 6.601206
## sdh 13.671731 13.017895 10.101078 9.300014 5.496001 6.257792
## selamat 14.219728 13.026286 10.831261 10.088344 7.266575 7.053082
## agam 13.265344 12.239615 10.076678 9.273506 6.084927 6.218330
## beberapa 13.197028 12.104588 9.462651 9.175517 5.934520 6.071229
## bukittinggi 12.558114 12.490594 10.413096 9.637999 6.627175 6.392363
## dekat 13.431251 12.503438 10.294105 9.509315 4.884656 5.799609
## sedang 13.238927 12.562586 9.176752 9.235678 6.027120 6.161774
## kawah 13.624455 12.710753 10.036998 9.230374 4.316548 5.329934
## sangat 13.610672 12.348170 10.018280 9.210017 4.272845 6.123245
## waspada 14.041121 13.405314 9.779679 9.834994 4.779879 7.028287
## ya 14.140777 13.183338 10.727401 9.976753 4.282885 7.225324
## orang 15.682692 13.082451 12.195940 12.063202 9.825949 8.806541
## puncak 13.857179 12.557176 10.350698 9.570550 6.528694 5.985072
## untuk 14.719670 12.680080 11.479732 10.369772 8.201898 7.070347
## adan 13.659177 13.004710 9.537674 9.281547 6.097175 6.230316
## dalam 13.899330 12.828354 9.878538 9.631480 6.039965 6.312532
## desember 14.924166 13.573802 9.995948 10.658058 8.563478 8.658779
## lalu 13.680308 12.243575 9.567913 8.765119 6.144369 6.276509
## minggu 13.743729 11.555058 8.997932 8.930484 6.284307 5.717496
## sebelumnya 13.846540 11.283325 9.269894 9.087912 5.917472 5.471682
## sempat 13.623299 12.216514 8.933002 8.744012 6.016371 6.151261
## tersebut 13.530062 12.869030 9.351829 9.090467 5.802156 5.941911
## tidak 14.481091 12.909403 10.681578 10.453517 7.765593 5.880395
## terjebak 14.451860 10.068678 10.178018 9.477456 7.710946 6.366239
## muhammad 14.625926 14.016671 11.359281 10.653250 8.032443 8.133968
## dievakuasi 13.495060 11.881518 9.214703 9.038288 5.720058 5.364076
## jenazah 13.499938 12.493484 9.867313 9.045570 5.731558 5.003073
## meninggal 13.652996 11.628519 10.075706 9.272450 6.083317 4.961546
## banyak 13.596984 12.681302 9.999675 9.189776 5.956543 6.092758
## sudah 13.606881 12.280409 10.013128 9.204413 5.979100 5.380229
## ada 14.885515 12.535067 11.691626 11.006934 7.586549 7.545475
## dari 15.314391 14.014284 12.016987 12.619859 10.501870 10.172831
## ternyata 13.964129 13.324649 10.053654 9.724758 6.752728 6.873182
## lagi 14.031207 12.438038 9.691096 9.820834 6.890371 6.664837
## pukul 14.166501 13.073549 9.412726 10.013179 7.161856 7.275539
## wib 13.565765 13.141272 10.259590 10.101440 7.284745 7.396540
## kondisi 13.406185 12.332287 9.200623 8.905045 4.797457 5.654160
## badan 13.825629 12.532792 10.308422 9.524812 5.868374 6.587242
## jadi 14.071123 12.935302 10.635414 9.877779 6.425440 7.088034
## semua 13.788200 12.886113 10.258167 9.470399 5.107994 6.508316
## indonesia 12.751592 13.663852 9.367822 9.235279 7.399589 7.509674
## medan tim yg abu s sdh
## gunung
## marapi
## sumbar
## barat
## hari
## korban
## pasca
## salah
## satu
## sumatera
## berjalan
## ditemukan
## evakuasi
## g
## proses
## segera
## semoga
## merapi
## pendaki
## terjadi
## video
## bukan
## masih
## medan
## tim 3.748538
## yg 11.338104 11.571240
## abu 5.633341 5.137465 12.311644
## s 6.031851 6.052213 12.499011 3.199334
## sdh 5.653961 5.675679 11.930969 4.067089 4.603250
## selamat 6.873988 6.891863 12.369254 5.641423 6.039399 5.662013
## agam 4.771205 5.632140 12.301097 5.960259 6.338247 5.979752
## beberapa 4.957036 5.469296 12.017248 5.806624 6.193995 5.826630
## bukittinggi 6.194196 6.214025 12.004781 6.512895 6.860502 6.530738
## dekat 5.992003 6.012500 10.745482 6.320905 6.678513 6.339288
## sedang 5.547502 5.569635 11.706811 5.901230 6.282771 5.920917
## kawah 5.538666 5.560834 10.499434 5.892925 6.274971 5.912639
## sangat 4.646600 5.526979 10.923555 5.860988 6.244988 5.880810
## waspada 6.496470 6.515380 12.018758 6.801019 7.134603 6.258911
## ya 6.025120 6.727457 11.562510 7.004453 7.328783 5.888109
## orang 9.539281 8.948175 14.190793 9.158249 9.984804 9.761166
## puncak 6.088716 6.108888 12.526552 6.412659 6.765419 6.430781
## untuk 7.856191 7.297619 12.753006 8.109838 8.391554 8.124175
## adan 5.623535 5.645370 12.307161 4.995244 5.440695 5.992214
## dalam 6.184046 5.735977 12.573165 5.097421 6.018259 5.933992
## desember 8.232968 7.701771 13.697584 7.817294 7.132625 8.489066
## lalu 5.674670 5.696309 11.922516 5.052741 5.493532 6.040229
## minggu 5.825901 5.047438 12.400935 5.222015 5.649614 6.182524
## sebelumnya 5.628746 4.767199 12.309543 4.951666 5.895315 5.809265
## sempat 5.054739 4.709653 12.057879 4.896289 5.349985 5.909975
## tersebut 5.302228 5.325380 12.163703 4.630544 5.107899 5.691758
## tidak 6.785461 7.416137 12.476877 6.934072 7.261546 7.683457
## terjebak 6.611915 5.853948 11.201396 6.839806 7.912378 7.628222
## muhammad 7.679112 7.695116 13.372016 7.938419 8.226007 7.953065
## dievakuasi 5.212262 4.671904 12.124757 5.062644 5.988832 5.608044
## jenazah 4.311475 5.248374 11.733717 5.599027 5.999817 5.619773
## meninggal 5.608507 5.110221 11.735842 5.469739 6.336701 5.978113
## banyak 5.470741 5.493183 11.273239 5.829129 6.215098 4.974955
## sudah 5.495293 5.517635 12.249093 5.852177 6.236720 5.872029
## ada 8.162696 8.177754 12.650060 8.407101 8.679173 7.502454
## dari 10.234152 10.246166 13.727126 10.430130 10.650648 10.441281
## ternyata 6.328345 6.347756 11.324735 6.640609 6.981861 6.658110
## lagi 5.763269 6.493987 9.914776 6.780527 7.115072 6.797669
## pukul 6.763193 6.781360 12.867899 7.056240 6.289259 7.072713
## wib 6.893194 6.911019 12.936699 7.180937 7.497637 7.197125
## kondisi 4.436430 5.002289 11.812026 5.369039 5.785782 4.663334
## badan 6.016566 6.036980 12.491642 6.344195 6.700560 5.759246
## jadi 6.561062 6.579786 11.268568 6.862745 7.193467 5.527754
## semua 5.930050 5.950760 11.323264 6.262206 6.622985 4.982237
## indonesia 7.014451 7.031968 13.001714 7.297415 6.558698 7.313344
## selamat agam beberapa bukittinggi dekat sedang
## gunung
## marapi
## sumbar
## barat
## hari
## korban
## pasca
## salah
## satu
## sumatera
## berjalan
## ditemukan
## evakuasi
## g
## proses
## segera
## semoga
## merapi
## pendaki
## terjadi
## video
## bukan
## masih
## medan
## tim
## yg
## abu
## s
## sdh
## selamat
## agam 7.144359
## beberapa 7.016699 4.796118
## bukittinggi 7.296337 5.630601 5.467710
## dekat 7.447887 5.407375 5.237547 6.011058
## sedang 7.095188 4.910232 4.722560 5.568078 5.342240
## kawah 7.088282 5.870858 5.714820 6.431181 2.286323 5.810921
## sangat 7.061754 5.037960 5.681882 6.401930 3.783280 5.778531
## waspada 7.859456 6.781908 6.647290 7.272372 5.729555 5.354213
## ya 8.036140 6.331842 6.855288 7.462968 5.969614 6.427978
## orang 9.374899 9.735914 9.642625 10.083706 9.473957 9.699889
## puncak 6.172449 6.392387 6.249384 6.910551 6.729915 6.337384
## untuk 9.015912 8.093818 7.981358 8.508995 7.142578 8.050449
## adan 7.154794 5.950991 4.184076 5.793559 6.312167 5.891870
## dalam 6.980716 6.483253 4.911697 6.994690 6.816284 6.429028
## desember 8.825382 8.460019 8.352491 8.858049 8.717859 8.418536
## lalu 7.195054 5.999336 4.252555 6.548675 6.357765 5.940695
## minggu 7.314919 6.142579 5.993619 6.680149 6.493106 6.085319
## sebelumnya 7.506307 6.369291 5.802166 6.889193 6.707982 6.314088
## sempat 6.413525 5.868175 5.247164 6.428731 6.234150 5.808210
## tersebut 6.213018 5.648342 5.485979 5.482226 6.027680 5.586019
## tidak 8.620902 5.807980 7.532289 8.089271 6.636996 7.605460
## terjebak 8.004831 7.595883 6.760160 7.429244 7.882042 7.549654
## muhammad 8.311099 7.922052 6.697096 7.222732 8.196832 7.877737
## dievakuasi 6.836271 5.563976 5.399076 5.395262 5.948695 5.500696
## jenazah 6.845896 4.730642 5.411258 5.407453 5.104641 5.512654
## meninggal 6.734483 5.936792 5.782533 5.778973 6.298782 5.268930
## banyak 7.035334 5.806820 3.976349 6.372776 5.615728 5.746215
## sudah 6.378575 5.829956 5.672793 6.393864 6.198188 5.769595
## ada 9.284209 7.370194 8.283233 8.792774 7.850165 8.349826
## dari 11.149206 10.417678 10.330548 9.500783 10.628131 10.384019
## ternyata 7.721067 6.621034 6.483077 7.122585 6.947463 6.029446
## lagi 7.536199 6.083208 6.626323 6.921751 6.597970 6.709381
## pukul 8.081318 7.037822 6.908193 7.511594 7.345753 6.987901
## wib 8.190424 7.162840 7.035515 7.628852 7.465616 7.113797
## kondisi 5.906137 5.344810 4.654487 5.954839 5.744227 5.278904
## badan 7.467663 6.323703 6.179111 6.847067 6.664711 6.268098
## jadi 7.912930 6.843806 6.710430 7.330129 6.167902 6.792460
## semua 7.398136 6.241445 6.094902 6.771171 6.064065 5.609970
## indonesia 8.292734 7.279607 7.154360 7.738591 7.577719 5.972102
## kawah sangat waspada ya orang puncak
## gunung
## marapi
## sumbar
## barat
## hari
## korban
## pasca
## salah
## satu
## sumatera
## berjalan
## ditemukan
## evakuasi
## g
## proses
## segera
## semoga
## merapi
## pendaki
## terjadi
## video
## bukan
## masih
## medan
## tim
## yg
## abu
## s
## sdh
## selamat
## agam
## beberapa
## bukittinggi
## dekat
## sedang
## kawah
## sangat 3.014288
## waspada 5.253620 5.217772
## ya 5.514438 4.617693 5.225997
## orang 9.193943 9.675460 10.272157 10.407963
## puncak 6.329651 6.299929 7.182742 7.375655 8.994984
## untuk 6.766767 8.020997 8.731499 8.890870 9.307759 7.185513
## adan 5.883551 5.851563 6.792899 6.996569 9.743574 6.404047
## dalam 6.421406 6.392110 6.741596 6.398826 9.506914 6.208957
## desember 8.412716 8.390376 8.192217 9.225486 10.898322 8.228494
## lalu 5.932445 5.900722 6.835291 7.037735 9.773175 6.448995
## minggu 6.077265 6.046302 6.961354 7.160234 9.215898 5.906330
## sebelumnya 6.306326 6.276493 6.632074 6.283333 9.429566 6.141769
## sempat 5.799772 5.767319 6.720465 6.926266 9.693214 5.563636
## tersebut 5.577244 5.543489 6.529391 6.741028 9.561731 5.331260
## tidak 6.230765 6.975610 8.323002 7.960547 9.957082 7.463018
## terjebak 7.543164 7.518240 8.272039 8.440090 9.740236 7.955813
## muhammad 7.871517 7.847637 8.572519 8.734792 11.058112 7.674315
## dievakuasi 5.491785 5.457501 6.456547 6.670495 8.184451 6.046101
## jenazah 4.563999 4.604939 6.466738 5.993050 9.008392 6.056982
## meninggal 5.869189 5.837122 6.780463 6.480700 7.805016 5.692008
## banyak 5.129242 5.092519 6.666959 6.874361 9.656194 6.270301
## sudah 5.761099 5.728428 5.434049 6.893915 9.670125 4.697116
## ada 7.509848 7.484814 8.156204 7.396410 11.399241 7.689549
## dari 10.379301 10.361202 10.920495 11.048335 12.479163 10.280150
## ternyata 6.560486 6.531814 7.386967 7.112810 10.166662 7.031046
## lagi 6.189179 5.405553 7.512998 7.109367 10.258601 7.163343
## pukul 6.980889 6.953951 7.762739 7.941575 9.835265 7.424853
## wib 7.106909 7.080450 7.876259 8.052574 9.925108 7.543460
## kondisi 5.269618 5.233879 5.655398 5.242079 9.385623 4.970231
## badan 6.260279 6.230226 6.588305 6.237116 9.975577 6.751795
## jadi 5.728503 5.695644 5.921617 6.763880 10.313128 7.241215
## semua 5.616548 5.583030 5.921109 4.056975 9.923637 6.674815
## indonesia 7.224580 7.198553 6.862605 8.156614 10.607337 7.654423
## untuk adan dalam desember lalu minggu
## gunung
## marapi
## sumbar
## barat
## hari
## korban
## pasca
## salah
## satu
## sumatera
## berjalan
## ditemukan
## evakuasi
## g
## proses
## segera
## semoga
## merapi
## pendaki
## terjadi
## video
## bukan
## masih
## medan
## tim
## yg
## abu
## s
## sdh
## selamat
## agam
## beberapa
## bukittinggi
## dekat
## sedang
## kawah
## sangat
## waspada
## ya
## orang
## puncak
## untuk
## adan 8.103030
## dalam 8.501610 3.919229
## desember 9.649153 7.810230 8.223015
## lalu 8.138601 3.052837 3.992253 7.847129
## minggu 7.698410 5.211435 5.811827 6.502668 5.266573
## sebelumnya 7.880490 5.476829 4.869727 7.579098 5.529320 3.893331
## sempat 7.481291 4.885003 4.626293 7.163123 4.943783 4.179675
## tersebut 7.883436 3.548165 4.344063 7.582161 4.680736 4.862976
## tidak 7.137418 6.926108 7.388453 9.172164 6.967690 6.468685
## terjebak 8.901218 7.605698 7.300057 9.235460 6.966121 7.173080
## muhammad 9.643843 5.415159 7.309335 9.465961 6.883737 8.076205
## dievakuasi 7.823210 4.729159 5.669062 7.412369 5.628922 4.593754
## jenazah 6.512426 4.743062 6.152804 8.209527 5.640607 5.792728
## meninggal 8.092607 5.162618 6.035390 8.458860 5.997702 5.409956
## banyak 7.997747 4.215254 4.938283 8.368153 4.283234 6.015425
## sudah 8.014561 5.842738 5.628225 7.423377 5.891971 5.292496
## ada 10.033173 8.400534 7.909612 10.330856 8.434850 7.483170
## dari 11.780187 10.424837 10.737574 11.511447 10.452509 9.498880
## ternyata 8.607142 6.632292 7.113760 8.952369 6.675705 6.804725
## lagi 8.715547 6.772383 7.244546 9.056643 6.814903 6.941336
## pukul 8.931726 7.048414 7.503227 4.694782 7.089278 6.298864
## wib 9.030563 7.173247 7.620614 6.220993 7.213405 6.438247
## kondisi 7.668884 5.358750 5.293565 7.443957 5.412386 5.570743
## badan 8.380574 6.335489 6.280450 8.734760 6.380921 6.515781
## jadi 8.779663 6.854698 6.803861 8.243532 6.896711 7.021671
## semua 8.318680 6.253387 5.576543 8.675394 6.299411 6.435979
## indonesia 9.123457 7.289848 7.730469 8.626416 7.329366 7.447070
## sebelumnya sempat tersebut tidak terjebak muhammad
## gunung
## marapi
## sumbar
## barat
## hari
## korban
## pasca
## salah
## satu
## sumatera
## berjalan
## ditemukan
## evakuasi
## g
## proses
## segera
## semoga
## merapi
## pendaki
## terjadi
## video
## bukan
## masih
## medan
## tim
## yg
## abu
## s
## sdh
## selamat
## agam
## beberapa
## bukittinggi
## dekat
## sedang
## kawah
## sangat
## waspada
## ya
## orang
## puncak
## untuk
## adan
## dalam
## desember
## lalu
## minggu
## sebelumnya
## sempat 3.900172
## tersebut 5.146370 3.357646
## tidak 6.684346 6.855082 6.667866
## terjebak 5.738093 6.161769 7.371304 8.998641
## muhammad 8.249950 7.869516 6.474057 9.275613 9.229911
## dievakuasi 5.538371 5.488917 4.342168 7.364504 6.497391 6.400584
## jenazah 6.032603 5.500900 4.357306 5.170535 7.315864 6.410863
## meninggal 5.149483 5.866505 4.810623 7.076689 6.819366 6.727195
## banyak 6.246754 5.734940 5.509795 7.549652 7.493431 6.716619
## sudah 5.554017 4.907119 4.641995 6.987304 7.511374 7.841059
## ada 6.648996 8.342071 8.188922 7.791646 9.635980 9.895129
## dari 10.265804 10.377784 10.255082 11.106847 11.443792 11.662840
## ternyata 7.010055 6.558085 6.362136 8.192447 8.140666 8.445822
## lagi 7.142741 6.699727 6.508044 7.764245 7.664948 8.556271
## pukul 7.404979 6.978633 6.794822 8.532821 8.483118 8.776374
## wib 7.523899 7.104692 6.924229 8.636224 8.587119 8.876941
## kondisi 4.632730 4.758407 5.020525 7.200353 6.388229 6.826382
## badan 6.162739 6.257763 6.052098 7.954075 7.900732 8.214805
## jadi 6.695358 6.782924 6.593661 8.373516 8.322862 8.621571
## semua 5.443632 6.174627 5.966097 7.888836 7.835049 8.151653
## indonesia 7.635146 7.222399 7.044952 8.733313 8.684758 8.971426
## dievakuasi jenazah meninggal banyak sudah ada
## gunung
## marapi
## sumbar
## barat
## hari
## korban
## pasca
## salah
## satu
## sumatera
## berjalan
## ditemukan
## evakuasi
## g
## proses
## segera
## semoga
## merapi
## pendaki
## terjadi
## video
## bukan
## masih
## medan
## tim
## yg
## abu
## s
## sdh
## selamat
## agam
## beberapa
## bukittinggi
## dekat
## sedang
## kawah
## sangat
## waspada
## ya
## orang
## puncak
## untuk
## adan
## dalam
## desember
## lalu
## minggu
## sebelumnya
## sempat
## tersebut
## tidak
## terjebak
## muhammad
## dievakuasi
## jenazah 4.247372
## meninggal 4.075427 4.725235
## banyak 5.423273 5.435401 5.805132
## sudah 5.448038 5.460111 5.052201 5.695828
## ada 8.130959 8.139053 7.315193 7.459893 7.228758
## dari 9.586413 10.215304 10.003218 10.343214 9.940184 11.260310
## ternyata 6.287355 6.297819 6.085622 6.503242 6.523909 8.887787
## lagi 6.434959 5.729733 6.759909 6.128468 6.666278 8.224768
## pukul 5.736047 6.734639 7.036429 6.927121 6.946526 9.202478
## wib 5.888767 6.865180 7.161472 7.054101 7.073158 9.298438
## kondisi 4.925416 4.938767 5.342976 5.198178 5.224011 7.006881
## badan 5.973437 5.984450 6.322153 6.200265 6.221938 7.779370
## jadi 6.521535 6.531624 6.842374 4.754641 5.511107 6.396830
## semua 5.886287 5.897463 5.670303 5.549576 6.138317 5.624582
## indonesia 6.977493 6.986923 7.278261 7.172638 7.191381 9.388682
## dari ternyata lagi pukul wib kondisi
## gunung
## marapi
## sumbar
## barat
## hari
## korban
## pasca
## salah
## satu
## sumatera
## berjalan
## ditemukan
## evakuasi
## g
## proses
## segera
## semoga
## merapi
## pendaki
## terjadi
## video
## bukan
## masih
## medan
## tim
## yg
## abu
## s
## sdh
## selamat
## agam
## beberapa
## bukittinggi
## dekat
## sedang
## kawah
## sangat
## waspada
## ya
## orang
## puncak
## untuk
## adan
## dalam
## desember
## lalu
## minggu
## sebelumnya
## sempat
## tersebut
## tidak
## terjebak
## muhammad
## dievakuasi
## jenazah
## meninggal
## banyak
## sudah
## ada
## dari
## ternyata 9.951284
## lagi 9.101261 6.017973
## pukul 10.510587 7.622594 7.744792
## wib 10.594705 7.738170 7.858571 4.081639
## kondisi 10.091081 6.094259 6.246428 6.544680 6.678935
## badan 7.421405 6.968660 7.102119 7.365803 7.485345 5.096908
## jadi 10.959042 7.443835 6.638127 7.816874 7.929619 5.729480
## semua 10.593326 6.383176 6.541758 7.295305 7.415984 4.199078
## indonesia 11.236352 7.846380 7.965146 7.236994 8.308661 6.804011
## badan jadi semua
## gunung
## marapi
## sumbar
## barat
## hari
## korban
## pasca
## salah
## satu
## sumatera
## berjalan
## ditemukan
## evakuasi
## g
## proses
## segera
## semoga
## merapi
## pendaki
## terjadi
## video
## bukan
## masih
## medan
## tim
## yg
## abu
## s
## sdh
## selamat
## agam
## beberapa
## bukittinggi
## dekat
## sedang
## kawah
## sangat
## waspada
## ya
## orang
## puncak
## untuk
## adan
## dalam
## desember
## lalu
## minggu
## sebelumnya
## sempat
## tersebut
## tidak
## terjebak
## muhammad
## dievakuasi
## jenazah
## meninggal
## banyak
## sudah
## ada
## dari
## ternyata
## lagi
## pukul
## wib
## kondisi
## badan
## jadi 6.652005
## semua 5.390221 4.762261
## indonesia 7.597157 8.035251 7.528826
fit <- hclust(distMatrix, method = "ward.D")
fit
##
## Call:
## hclust(d = distMatrix, method = "ward.D")
##
## Cluster method : ward.D
## Distance : euclidean
## Number of objects: 70
plot(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
## erupsi gunung marapi sumbar barat hari korban pasca salah satu sumatera
## 1 1.286 1.286 1.286 0.143 0.571 0.000 0.286 0.000 0.429 0.429 0.429
## 2 1.137 0.686 0.784 0.078 0.137 0.118 0.451 0.078 0.118 0.118 0.137
## berjalan ditemukan evakuasi g proses segera semoga merapi pendaki terjadi
## 1 0.000 0.286 0.429 0.143 0.429 0.000 0.286 0.000 1.714 0.286
## 2 0.059 0.078 0.157 0.039 0.078 0.059 0.137 0.196 0.176 0.157
## video bukan masih medan tim yg abu s sdh selamat agam beberapa
## 1 0.286 0.000 0.429 0.143 0.286 0.714 0.143 0.000 0.000 0.286 0.000 0.143
## 2 0.078 0.059 0.039 0.039 0.020 0.235 0.039 0.059 0.059 0.078 0.059 0.039
## bukittinggi dekat sedang kawah sangat waspada ya orang puncak untuk adan
## 1 0.143 0.000 0.000 0.000 0.000 0.000 0.000 0.857 0.143 0.143 0.000
## 2 0.059 0.078 0.059 0.059 0.059 0.078 0.098 0.059 0.059 0.078 0.059
## dalam desember lalu minggu sebelumnya sempat tersebut tidak terjebak
## 1 0.143 0.143 0.143 0.286 0.571 0.286 0.000 0.143 1.143
## 2 0.078 0.118 0.039 0.039 0.039 0.039 0.059 0.098 0.000
## muhammad dievakuasi jenazah meninggal banyak sudah ada dari ternyata lagi
## 1 0.000 0.143 0.000 0.429 0.000 0.143 0.286 0.143 0.000 0.143
## 2 0.098 0.039 0.059 0.039 0.059 0.039 0.098 0.137 0.059 0.078
## pukul wib kondisi badan jadi semua indonesia
## 1 0.000 0.000 0.143 0.000 0.000 0.000 0.000
## 2 0.059 0.059 0.039 0.059 0.098 0.078 0.078
for (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: pendaki erupsi gunung marapi terjebak
## cluster 2: erupsi marapi gunung korban yg
##Analisis Sentiment
setwd("C:/Users/USER/Downloads/UAS_Sahra Masdar_E0221562")
diabet.df<- read_xlsx("Erupsi1.xlsx")
head(diabet.df)
## # A tibble: 6 × 2
## x komen
## <chr> <chr>
## 1 erupsi gunung marapi sumbar fapr k x neut…
## 2 salah satu korban pasca erupsi mtmarapi sumatera barat hari marapi mtm… neut…
## 3 proses evakuasi korban erupsi g marapi semoga proses evakuasi berjalan … posi…
## 4 video pendaki erupsi terjadi gunung merapi sumbar httpstcoyjz gapv n neut…
## 5 satu persatu korban temukan medan yg berat masih sering terjadi erup… posi…
## 6 alhamdulillah viral terkena abu erupsi gunung marapi sdh ditemukan sel… posi…
str(diabet.df)
## tibble [58 × 2] (S3: tbl_df/tbl/data.frame)
## $ x : chr [1:58] "erupsi gunung marapi sumbar fapr k x" "salah satu korban pasca erupsi mtmarapi sumatera barat hari marapi mtmarapi erupsi httpstcon h zetmi" "proses evakuasi korban erupsi g marapi semoga proses evakuasi berjalan lancar para korban temukan segera d"| __truncated__ "video pendaki erupsi terjadi gunung merapi sumbar httpstcoyjz gapv n" ...
## $ komen: chr [1:58] "neutral" "neutral" "positive" "neutral" ...
diabet.data = diabet.df
diabet.data = as.data.frame(unclass(diabet.data),
stringsAsFactors = TRUE)
komentar_positif <- diabet.df %>%
filter(komen == "positive")
komentar_positif <-komentar_positif$x
komentar_positif
## [1] "proses evakuasi korban erupsi g marapi semoga proses evakuasi berjalan lancar para korban temukan segera ditemukan aamiin erupsimarapi gunungmarapi pmpejcivj"
## [2] "satu persatu korban temukan medan yg berat masih sering terjadi erupsi menjadi hambatan evakuasi bukan halangan bagi tim utk menyelesaikan believe me tough days will soon pass bismillah marapi erupsimarapisumbar sumbar prayforsumbar httpstcollh z ilzh"
## [3] "alhamdulillah viral terkena abu erupsi gunung marapi sdh ditemukan selamat team rescue tadi malam sumbarberduka httpstcoomah s jh"
## [4] "teman gw bukan sok paling tau soal pendakian saran aja jngn buka tenda tempat yg sangat terbuka kaya gini ya apalagi dekat kawah terlebih status waspada selain bahaya erupsi jg bahaya badai sulit utk minta pertolongan atau utk menyelamatkan diri area marapi httpstcoh pyadcb"
## [5] "perjuangan uda tomi kawankawan pemuda batu palano orang pertama sampai puncak merpati untuk mengevakuasi cara menggendong korban erupsi gunung marapi semoga jasa uda temanteman pemuda batu palano mendapat balasan kebaikan berkalikali lipat httpstcoflf b ei"
## [6] "proses evakuasi pendaki korban erupsi gn marapi an safira terima kasih bapak tni 🟳🟳 vt bgmulyadi httpstcohn kg vy"
## [7] "banyak kisah heroik dalam kejadian erupsi marapi beberapa hari lalu salah satunya kisah muhammad adan surga untukmu cah bagus 🮹 httpstcolo gj eola"
## [8] "momen korban erupsi marapi sempat mengabadikan dirinya puncak abel novita suami anaknya bekum ditemukannampak dalam momen tersebut korban zzfebrina sudah ditemukan selamat semoga saudari novita wahlul anaknya hayva segera ditemukan aamiin httpstconregqsawrx"
## [9] "pendaki yg terjebak diatas gunung marapi bukittinggi sumatra barat yg lagi erupsi semoga pendaki yg masih terjebak atas gunung selamat amin gunung gunungmarapi sumatrabarat qqorxljmy"
## [10] "sebanyak orang dari pendaki gunung marapi berhasil dievakuasi pasca erupsi terjadi minggu desember sekitar pukul wib g p ifzuz"
## [11] "erupsi gunung marapi agam sumatera barat semoga tidak ada korban jiwa psvtqhc"
## [12] "heraloebss puspentni bang tomy palawan yg tidak terelspose media mempertaruhkan nyawa menjemput menggendong jenazah dekat kawah marapi untuk evakuasi tidak seorangpun orang berani disaat masih erupsi kabut tebal berpacu waktu untuk turun httpstcoftzt mwhe"
## [13] "proses evakuasi jenazah pendaki korban erupsi gunung marapi kabupaten agam sumatera barat mohon doanya ya semoga berjalan lancar sungguh sangat tidak mudah bawah bayang erupsi lagi medan terjal httpstcoclzutgsr l"
## [14] "gunung marapi yg erupsi dom gue memakan korban md org ternyata marapi siaga sejak januari semoga kasus diusut tuntas ya semoga korban meninggal diterima semua amal ibadahnya dihapuskan dosa serta yg sedang perawatan segera pulih eodeexwyl"
## [15] "daftar gunung api sedang aktif berstatus waspada siaga indonesia sewaktuwaktu dapat terjadi erupsi informasi disampaikan biar ngga gegeran lan gumunan karna saking banyaknya tentu saja secara kebetulan erupsi berbarengan httpstcoosjfj h fu"
## [16] "innalilahi untuk pendaki terdampak erupsi gunung marapi yx njgon"
## [17] "pendakilawas sebagai gambaran bopeng dijalan akibat dari erupsi gunung kelud radius kurang dari km bayangin aja kalo material vulkanik kena badan v st i y"
##Membuat Word Cloud komentar Positif #Mengubah Data Frame Menjadi Data Faktor
tdm_pos <- TermDocumentMatrix(komentar_positif)
tdm_pos
## <<TermDocumentMatrix (terms: 280, documents: 17)>>
## Non-/sparse entries: 383/4377
## Sparsity : 92%
## Maximal term length: 18
## Weighting : term frequency (tf)
m_pos <- as.matrix(tdm_pos)
View(m_pos)
v_pos <- sort(rowSums(m_pos),decreasing = TRUE)
head(v_pos)
## erupsi marapi gunung korban semoga evakuasi
## 19 16 12 11 8 6
#Mengubah Data Faktor Menjadi Data Frame
d_pos <- data.frame(word = names(v_pos), freq = v_pos)
head(d_pos)
## word freq
## erupsi erupsi 19
## marapi marapi 16
## gunung gunung 12
## korban korban 11
## semoga semoga 8
## evakuasi evakuasi 6
wordcloud(d_pos$word, d_pos$freq,
random.order = FALSE,
max.words = 500,
colors = brewer.pal(name = "Dark2",8 ))
komentar_negatif <- diabet.df %>%
filter(komen == "negative")
komentar_negatif<-komentar_negatif$x
komentar_negatif
## [1] "mungkin salah satu penyebabnya gunung merapi erupsi 🞧🞧 🮧🞧🞧 httpstcomxw wnh tj"
## [2] "sedih banget liat video pendaki minta tolong terjebak erupsi marapi sumbar sbnr'y marapi terlarang u didaki sejak tahun lalu gw paham betapa susah'y melawan candu mendaki semoga pendaki yg sakau bijak pilih gunung kecanduan mendaki melebihi narkoba yp tym tv"
## [3] "bangsat yg nyolong alat deteksi erupsi dini marapi"
## [4] "nah kan bayangin evakuasi terjadi erupsi nyawa taruhannya tmqgn owh"
## [5] "gunung marapi erupsi minggu diketahui ada sejumlah pendaki masih berkemah sebelumnya sudah ada imbauan kepada masyarakat wisatawan maupun pendaki tidak mencapai puncak dari petugas salah seorang antara mereka akhirnya meninggal akibat kehabisan gctqospa"
## [6] "helow erupsi alias meletuy loh ya bukan semburan mau buang badan loe ye dalam kondisi waspada sehari sebelumnya sdh ada kegempaan ya evakuasi suruh turun semua malih knapa jadi nyembur semua gunung berapi jg ada peringatan radius kok httpstcooq t vjv"
## [7] "pendaki marapi dinyatakan tewas erupsi pihak pengelola gunung marapi abai peringatan dari badan volcanologi pusat httpstcoywpeirbpog"
## [8] "cukup marapi jadi pelajaran yg paling berharga banyak teman pendaki yg jadi korban karna erupsi jangan pernah ada lagi mendirikan tenda diatas batas vegetasj bahkan sangat dekat kawah selain bahaya erupsi jika ada badai habis semua kegulung 🛵 httpstcorj q n la"
## [9] "ternyata pasca erupsi januarifebruari alat deteksi dipasang lagi kemudian dicuri lagi bulan maret setelah bencana terjadi mendaku pula karakter gunung lain dari yg lain padahal kelakuan manusianya yg sungguh lain dari manusia umumnya httpstcoakieotobke"
## [10] "taufikiswandi infobmkg hari sabtu desember sudah lada level waspadajadi gak mungkin erupsi hari secara tibayang jadi pertanyaan kenapa gunung berada level ii waspada penadakian tetap buka c dabqfq"
## [11] "sebuah pelajaran pahit bagi dunia pendakian gunung sedih kawan banyak yg jadi korban erupsi marapi salah satu jumlah korban terbesar pasca kejadian gunung lawu cukup sdh tragedi jangan sombong mawas diri alam liar memang indah tapi membunuhmu kapan saja httpstcoonojb v eh"
## [12] "emang boleh semester akhir kena erupsi gini httpstcojno qa pfs"
##Membuat Word Cloud komentar Negatif #Mengubah Data Frame Menjadi Data Faktor
tdm_neg <- TermDocumentMatrix(komentar_negatif)
tdm_neg
## <<TermDocumentMatrix (terms: 216, documents: 12)>>
## Non-/sparse entries: 272/2320
## Sparsity : 90%
## Maximal term length: 18
## Weighting : term frequency (tf)
m_neg <- as.matrix(tdm_neg)
View(m_neg)
v_neg <- sort(rowSums(m_neg),decreasing = TRUE)
head(v_neg)
## erupsi gunung marapi pendaki ada jadi
## 13 9 8 6 6 5
#Mengubah Data Faktor Menjadi Data Frame
d_neg <- data.frame(word = names(v_neg), freq = v_neg)
head(d_neg)
## word freq
## erupsi erupsi 13
## gunung gunung 9
## marapi marapi 8
## pendaki pendaki 6
## ada ada 6
## jadi jadi 5
wordcloud(d_neg$word, d_neg$freq,
random.order = FALSE,
max.words = 500,
colors = brewer.pal(name = "Dark2",8 ))
komentar_neutral <- diabet.df %>%
filter(komen == "neutral")
komentar_neutral<-komentar_neutral$x
komentar_neutral
## [1] "erupsi gunung marapi sumbar fapr k x"
## [2] "salah satu korban pasca erupsi mtmarapi sumatera barat hari marapi mtmarapi erupsi httpstcon h zetmi"
## [3] "video pendaki erupsi terjadi gunung merapi sumbar httpstcoyjz gapv n"
## [4] "erupsi gunung merapi daerah agam bukittinggi sumatera barat beberapa dokumentasi pendaki sedang dilokasi dekat erupsi marapi sumbar httpstcovnxqqtzdxf"
## [5] "terjadinya erupsi meletusnya merapi marapi marapivolcano indonesiavolcano httpstcou cecrvpyz"
## [6] "erupsi gunung marapi terjadi minggu desember lalu memuntahkan abu setinggi meter ke udara memakan puluhan korban diketahui sebelumnya dalam musibah tersebut adan sempat menghubungi ibunya mengabarkan kondisinya tidak berjalan serta s spcph"
## [7] "tangis haru iringi pemakaman bripda muhammad iqbal korban erupsi gunung marapi httpstcozvpeu vct"
## [8] "tiga jenazah korban erupsi gunung marapi telah dievakuasi ke rumah sakit achmad mochtar rsam bukittinggi sumatera barat korban meninggal teridentifikasi tersebut adalah muhammad adan asal pekanbaru riau muhammad teguh amanda asal padang httpstcoemzyloytdg"
## [9] "detik detik para pendaki terjebak abu vulkanik gunung marapi sumatera barat orang dilaporkan meninggal orang lainnya masih dalam pencarian tim sar sebelumnya satu pendaki terjebak erupsi gunung marapi berhasil dievakuasi petugas httpstcoiwi imvjcm"
## [10] "salah satu pendaki gunung marapi sumatera barat terjebak erupsi minggu desember kemarin akhirnya ditemukan tim penyelamat sebelumnya korban sempat mengunggah video sesaat setelah erupsi untuk meminta pertolongan httpstcofihpyfwxcp"
## [11] "kira gempa ternyata gunung marapi erupsi httpstcoan djbyfng"
## [12] "salah satu proses evakuasi korban erupsi g marapi data pendaki orang orang selamat orang meninggal dunia orang ditemukan z mksbsw"
## [13] "begini kondisi gunung marapi sehari sebelum erupsi tanggal desember puncak marapi sebelum erupsi didokumentasikan muhammad iqbal muhammadiqbalq mahasiswa mapala asal universitas riau unri salah satu korban selamat alhamdulillah dua kelompok sama sama httpstcoc y cfbk"
## [14] "erupsi merapi kemarin kali bebeng magelang begini kondisinya sekarang wah httpstcojodgwetgom"
## [15] "salah satu korban pendaki yg lansung terkena dampak erupsi marapi httpstcotipsrc iye"
## [16] "sementara selat sunda erupsi anak krakatau desember pukul wib httpstcovd czgohxc"
## [17] "tita cahyani merupakan korban selamat erupsi gunung marapi tita menceritakan bagaimana mencekamnya situasi erupsi berlangsung httpstcofylilym"
## [18] "gunung marapi erupsi httpstcoii ttq ij"
## [19] "erupsi gunung marapi sumatera barat httpstcowh ca yrnn"
## [20] "new video of marapi erupting yesterday marapi gunung erupsi eruption indonesia httpstcodvpmhabvdr"
## [21] "bunyi dentuman erupsi gunung api marapi westsumatera sumatera barat indonesia terjadi hari pukul waktu lokal desember httpstcok s ucf us"
## [22] "marapi in western sumatra not to be confused with merapi erupted today sunday at around wib 💡 marapi gunung erupsi volcano eruptionwest httpstcocmfwvc mlh"
## [23] "wahlul ade putra mendaki bersama mamanya ibu novita intan sari sebelum erupsi httpstcosmi wjj od"
## [24] "video korban erupsi gunung merapi httpstcomztposc sn"
## [25] "proses evakuasi puluhan pendaki yg terjebak terjadi erupsi gunung marapi sumatera barat terus dilakukan proses evakuasi sempat terkendala kondisi medan cuaca disertai beberapa kali erupsi susulan sebelumnya dilaporkan sebanyak pendaki terjebak terjadi eropsi httpstcosgpkodi zf"
## [26] "selalu merinding liat video tentang erupsi marapi"
## [27] "🚨 merapi just erupted 🚨 🚨 infofpmki merapi gunung erupsi eruption indonesia httpstcojufnoqr ga"
## [28] "erupsi gunung merapi hari dilihat dari bukittinggi httpstcozlpwlpi b"
## [29] "gunung meletus cik woilah gunung beritaterkini sumaterabarat erupsi cvq jcrdj"
##Membuat Word Cloud komentar netral #Mengubah Data Frame Menjadi Data Faktor
tdm_neutral <- TermDocumentMatrix(komentar_neutral)
tdm_neutral
## <<TermDocumentMatrix (terms: 246, documents: 29)>>
## Non-/sparse entries: 418/6716
## Sparsity : 94%
## Maximal term length: 18
## Weighting : term frequency (tf)
m_neutral <- as.matrix(tdm_neutral)
View(m_neutral)
v_neutral <- sort(rowSums(m_neutral),decreasing = TRUE)
head(v_neutral)
## erupsi marapi gunung korban merapi pendaki
## 35 25 23 11 9 9
#Mengubah Data Faktor Menjadi Data Frame
d_neutral <- data.frame(word = names(v_neutral), freq = v_neutral)
head(d_neutral)
## word freq
## erupsi erupsi 35
## marapi marapi 25
## gunung gunung 23
## korban korban 11
## merapi merapi 9
## pendaki pendaki 9
wordcloud(d_neutral$word, d_neutral$freq,
random.order = FALSE,
max.words = 500,
colors = brewer.pal(name = "Dark2",8 ))
set.seed(1234)
library(caret)
## Loading required package: lattice
library(Matrix)
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 salah satu korban pasca erupsi mtmarapi sumatera barat hari marapi mtm… neut…
## 2 proses evakuasi korban erupsi g marapi semoga proses evakuasi berjalan … posi…
## 3 video pendaki erupsi terjadi gunung merapi sumbar httpstcoyjz gapv n neut…
## 4 satu persatu korban temukan medan yg berat masih sering terjadi erup… posi…
## 5 alhamdulillah viral terkena abu erupsi gunung marapi sdh ditemukan sel… posi…
## 6 mungkin salah satu penyebabnya gunung merapi erupsi 🞧🞧 🮧🞧ð… nega…
testing<- diabet.df[-bagi,]
View(testing)
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: 0x00000212a4b18258>
## <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] TRUE
modelNB<-naiveBayes(komen~.,data = training)
head(modelNB)
## $apriori
## Y
## negative neutral positive
## 10 24 14
##
## $tables
## $tables$x
## x
## Y alhamdulillah viral terkena abu erupsi gunung marapi sdh ditemukan selamat team rescue tadi malam sumbarberduka httpstcoomah s jh
## negative 0.00000000
## neutral 0.00000000
## positive 0.07142857
## x
## Y banyak kisah heroik dalam kejadian erupsi marapi beberapa hari lalu salah satunya kisah muhammad adan surga untukmu cah bagus 🮹 httpstcolo gj eola
## negative 0.00000000
## neutral 0.00000000
## positive 0.07142857
## x
## Y begini kondisi gunung marapi sehari sebelum erupsi tanggal desember puncak marapi sebelum erupsi didokumentasikan muhammad iqbal muhammadiqbalq mahasiswa mapala asal universitas riau unri salah satu korban selamat alhamdulillah dua kelompok sama sama httpstcoc y cfbk
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y bunyi dentuman erupsi gunung api marapi westsumatera sumatera barat indonesia terjadi hari pukul waktu lokal desember httpstcok s ucf us
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y cukup marapi jadi pelajaran yg paling berharga banyak teman pendaki yg jadi korban karna erupsi jangan pernah ada lagi mendirikan tenda diatas batas vegetasj bahkan sangat dekat kawah selain bahaya erupsi jika ada badai habis semua kegulung 🛵 httpstcorj q n la
## negative 0.10000000
## neutral 0.00000000
## positive 0.00000000
## x
## Y daftar gunung api sedang aktif berstatus waspada siaga indonesia sewaktuwaktu dapat terjadi erupsi informasi disampaikan biar ngga gegeran lan gumunan karna saking banyaknya tentu saja secara kebetulan erupsi berbarengan httpstcoosjfj h fu
## negative 0.00000000
## neutral 0.00000000
## positive 0.07142857
## x
## Y detik detik para pendaki terjebak abu vulkanik gunung marapi sumatera barat orang dilaporkan meninggal orang lainnya masih dalam pencarian tim sar sebelumnya satu pendaki terjebak erupsi gunung marapi berhasil dievakuasi petugas httpstcoiwi imvjcm
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y emang boleh semester akhir kena erupsi gini httpstcojno qa pfs
## negative 0.10000000
## neutral 0.00000000
## positive 0.00000000
## x
## Y erupsi gunung marapi terjadi minggu desember lalu memuntahkan abu setinggi meter ke udara memakan puluhan korban diketahui sebelumnya dalam musibah tersebut adan sempat menghubungi ibunya mengabarkan kondisinya tidak berjalan serta s spcph
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y erupsi gunung marapi agam sumatera barat semoga tidak ada korban jiwa psvtqhc
## negative 0.00000000
## neutral 0.00000000
## positive 0.07142857
## x
## Y erupsi gunung marapi sumatera barat httpstcowh ca yrnn
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y erupsi gunung merapi daerah agam bukittinggi sumatera barat beberapa dokumentasi pendaki sedang dilokasi dekat erupsi marapi sumbar httpstcovnxqqtzdxf
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y erupsi gunung merapi hari dilihat dari bukittinggi httpstcozlpwlpi b
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y erupsi merapi kemarin kali bebeng magelang begini kondisinya sekarang wah httpstcojodgwetgom
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y gunung marapi erupsi httpstcoii ttq ij
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y gunung marapi erupsi minggu diketahui ada sejumlah pendaki masih berkemah sebelumnya sudah ada imbauan kepada masyarakat wisatawan maupun pendaki tidak mencapai puncak dari petugas salah seorang antara mereka akhirnya meninggal akibat kehabisan gctqospa
## negative 0.10000000
## neutral 0.00000000
## positive 0.00000000
## x
## Y helow erupsi alias meletuy loh ya bukan semburan mau buang badan loe ye dalam kondisi waspada sehari sebelumnya sdh ada kegempaan ya evakuasi suruh turun semua malih knapa jadi nyembur semua gunung berapi jg ada peringatan radius kok httpstcooq t vjv
## negative 0.10000000
## neutral 0.00000000
## positive 0.00000000
## x
## Y heraloebss puspentni bang tomy palawan yg tidak terelspose media mempertaruhkan nyawa menjemput menggendong jenazah dekat kawah marapi untuk evakuasi tidak seorangpun orang berani disaat masih erupsi kabut tebal berpacu waktu untuk turun httpstcoftzt mwhe
## negative 0.00000000
## neutral 0.00000000
## positive 0.07142857
## x
## Y innalilahi untuk pendaki terdampak erupsi gunung marapi yx njgon
## negative 0.00000000
## neutral 0.00000000
## positive 0.07142857
## x
## Y marapi in western sumatra not to be confused with merapi erupted today sunday at around wib 💡 marapi gunung erupsi volcano eruptionwest httpstcocmfwvc mlh
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y momen korban erupsi marapi sempat mengabadikan dirinya puncak abel novita suami anaknya bekum ditemukannampak dalam momen tersebut korban zzfebrina sudah ditemukan selamat semoga saudari novita wahlul anaknya hayva segera ditemukan aamiin httpstconregqsawrx
## negative 0.00000000
## neutral 0.00000000
## positive 0.07142857
## x
## Y mungkin salah satu penyebabnya gunung merapi erupsi 🞧🞧 🮧🞧🞧 httpstcomxw wnh tj
## negative 0.10000000
## neutral 0.00000000
## positive 0.00000000
## x
## Y nah kan bayangin evakuasi terjadi erupsi nyawa taruhannya tmqgn owh
## negative 0.10000000
## neutral 0.00000000
## positive 0.00000000
## x
## Y new video of marapi erupting yesterday marapi gunung erupsi eruption indonesia httpstcodvpmhabvdr
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y pendaki marapi dinyatakan tewas erupsi pihak pengelola gunung marapi abai peringatan dari badan volcanologi pusat httpstcoywpeirbpog
## negative 0.10000000
## neutral 0.00000000
## positive 0.00000000
## x
## Y pendaki yg terjebak diatas gunung marapi bukittinggi sumatra barat yg lagi erupsi semoga pendaki yg masih terjebak atas gunung selamat amin gunung gunungmarapi sumatrabarat qqorxljmy
## negative 0.00000000
## neutral 0.00000000
## positive 0.07142857
## x
## Y perjuangan uda tomi kawankawan pemuda batu palano orang pertama sampai puncak merpati untuk mengevakuasi cara menggendong korban erupsi gunung marapi semoga jasa uda temanteman pemuda batu palano mendapat balasan kebaikan berkalikali lipat httpstcoflf b ei
## negative 0.00000000
## neutral 0.00000000
## positive 0.07142857
## x
## Y proses evakuasi korban erupsi g marapi semoga proses evakuasi berjalan lancar para korban temukan segera ditemukan aamiin erupsimarapi gunungmarapi pmpejcivj
## negative 0.00000000
## neutral 0.00000000
## positive 0.07142857
## x
## Y proses evakuasi pendaki korban erupsi gn marapi an safira terima kasih bapak tni 🟳🟳 vt bgmulyadi httpstcohn kg vy
## negative 0.00000000
## neutral 0.00000000
## positive 0.07142857
## x
## Y proses evakuasi puluhan pendaki yg terjebak terjadi erupsi gunung marapi sumatera barat terus dilakukan proses evakuasi sempat terkendala kondisi medan cuaca disertai beberapa kali erupsi susulan sebelumnya dilaporkan sebanyak pendaki terjebak terjadi eropsi httpstcosgpkodi zf
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y salah satu korban pasca erupsi mtmarapi sumatera barat hari marapi mtmarapi erupsi httpstcon h zetmi
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y salah satu korban pendaki yg lansung terkena dampak erupsi marapi httpstcotipsrc iye
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y salah satu pendaki gunung marapi sumatera barat terjebak erupsi minggu desember kemarin akhirnya ditemukan tim penyelamat sebelumnya korban sempat mengunggah video sesaat setelah erupsi untuk meminta pertolongan httpstcofihpyfwxcp
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y satu persatu korban temukan medan yg berat masih sering terjadi erupsi menjadi hambatan evakuasi bukan halangan bagi tim utk menyelesaikan believe me tough days will soon pass bismillah marapi erupsimarapisumbar sumbar prayforsumbar httpstcollh z ilzh
## negative 0.00000000
## neutral 0.00000000
## positive 0.07142857
## x
## Y sebanyak orang dari pendaki gunung marapi berhasil dievakuasi pasca erupsi terjadi minggu desember sekitar pukul wib g p ifzuz
## negative 0.00000000
## neutral 0.00000000
## positive 0.07142857
## x
## Y sedih banget liat video pendaki minta tolong terjebak erupsi marapi sumbar sbnr'y marapi terlarang u didaki sejak tahun lalu gw paham betapa susah'y melawan candu mendaki semoga pendaki yg sakau bijak pilih gunung kecanduan mendaki melebihi narkoba yp tym tv
## negative 0.10000000
## neutral 0.00000000
## positive 0.00000000
## x
## Y selalu merinding liat video tentang erupsi marapi
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y sementara selat sunda erupsi anak krakatau desember pukul wib httpstcovd czgohxc
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y tangis haru iringi pemakaman bripda muhammad iqbal korban erupsi gunung marapi httpstcozvpeu vct
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y taufikiswandi infobmkg hari sabtu desember sudah lada level waspadajadi gak mungkin erupsi hari secara tibayang jadi pertanyaan kenapa gunung berada level ii waspada penadakian tetap buka c dabqfq
## negative 0.10000000
## neutral 0.00000000
## positive 0.00000000
## x
## Y teman gw bukan sok paling tau soal pendakian saran aja jngn buka tenda tempat yg sangat terbuka kaya gini ya apalagi dekat kawah terlebih status waspada selain bahaya erupsi jg bahaya badai sulit utk minta pertolongan atau utk menyelamatkan diri area marapi httpstcoh pyadcb
## negative 0.00000000
## neutral 0.00000000
## positive 0.07142857
## x
## Y terjadinya erupsi meletusnya merapi marapi marapivolcano indonesiavolcano httpstcou cecrvpyz
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y ternyata pasca erupsi januarifebruari alat deteksi dipasang lagi kemudian dicuri lagi bulan maret setelah bencana terjadi mendaku pula karakter gunung lain dari yg lain padahal kelakuan manusianya yg sungguh lain dari manusia umumnya httpstcoakieotobke
## negative 0.10000000
## neutral 0.00000000
## positive 0.00000000
## x
## Y tiga jenazah korban erupsi gunung marapi telah dievakuasi ke rumah sakit achmad mochtar rsam bukittinggi sumatera barat korban meninggal teridentifikasi tersebut adalah muhammad adan asal pekanbaru riau muhammad teguh amanda asal padang httpstcoemzyloytdg
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y tita cahyani merupakan korban selamat erupsi gunung marapi tita menceritakan bagaimana mencekamnya situasi erupsi berlangsung httpstcofylilym
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y video korban erupsi gunung merapi httpstcomztposc sn
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y video pendaki erupsi terjadi gunung merapi sumbar httpstcoyjz gapv n
## negative 0.00000000
## neutral 0.04166667
## positive 0.00000000
## x
## Y wahlul ade putra mendaki bersama mamanya ibu novita intan sari sebelum erupsi httpstcosmi wjj od
## negative 0.00000000
## neutral 0.04166667
## 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 2 5 3
## positive 0 0 0
##
## Overall Statistics
##
## Accuracy : 0.5
## 95% CI : (0.1871, 0.8129)
## No Information Rate : 0.5
## P-Value [Acc > NIR] : 0.623
##
## Kappa : 0
##
## Mcnemar's Test P-Value : NA
##
## Statistics by Class:
##
## Class: negative Class: neutral Class: positive
## Sensitivity 0.0 1.0 0.0
## Specificity 1.0 0.0 1.0
## Pos Pred Value NaN 0.5 NaN
## Neg Pred Value 0.8 NaN 0.7
## Prevalence 0.2 0.5 0.3
## Detection Rate 0.0 0.5 0.0
## Detection Prevalence 0.0 1.0 0.0
## Balanced Accuracy 0.5 0.5 0.5