Deep Lerarning Twitter "Rasis"

Kami akan membuat program sentiment analisis dengan menggunakan R programing, dalam pembuatan program ini dibutuhkan twitter API, cara membuatnya yaitu dengan membuka halaman http://apps.twitter.com lalu login kemudian create new

Kemudian buka R programing, lalu install packages dibawah terlebih dahulu

install.packages('twitteR')

install.packages('ROAuth')

install.packages('plyr')

install.packages('RCurl')

install.packages('wordcloud')

install.packages('corpus')

install.packages('tm')

setelah semua packages yang diperlukan telah diinstal, selanjutnya gunakan perintah require untuk mengaktifkan packages tersebut yang telah terinstal  dan yang akan digunakan

require(twitteR)

require(ROAuth)

require(plyr)

require(RCurl)

require(wordcloud)

require(corpus)

require(tm)

selanjutnya memasukan kode consumer_key, consumer_secret, access_token, dan access_secret pada halaman twitter API.

consumer_key <- "erk5JABemlC9qR3XxcHnq3Ykp"

consumer_secret <- "OkkZqAcKPxvvv9C5vH0EPdtf9EL6kzUkRCXJsYpjMVGUYX4BcP"

access_token <- "390644116-1tHCDwGMkdQBTNzXWhWfDObWT81zIK8NrbksvBrx"

access_secret <- "qetFOsb98yrQLg5ZbE86Wm8RhLJpLSywGXNebP51ChQTe"

setup_twitter_oauth(consumer_key,consumer_secret,access_token,access_secret)

perintah setup_twitter_oath diatas digunakan untuk mengakses token dan kode yang telah kita masukan tadi apakah benar atau salah.

miningtweets <-searchTwitter('kulit+agama',lang="id", n=500, resultType="recent")

kode diatas digunakan untuk mencari tweet yang berhubungan dengan kulit dan agama sebanyak 500 tweets.

miningtweets <-sapply(miningtweets,function(x)x$getText())

str(miningtweets)

kode diatas digunakan untuk menkonversi tweet ke dalam text dan menampilkan semua tweet yang telah kita mining

rasis <-Corpus(VectorSource(miningtweets))

inspect(rasis)

rasis_clear<-tm_map(rasis,removePunctuation)

rasis_clear<-tm_map(rasis,removeNumbers)

rasis_clear<-tm_map(rasis_clear,stripWhitespace)

rasis_clear<-tm_map(rasis_clear,removeWords,c("kulit","agama"))

wordcloud(rasis_clear)

kode diatas digunakan untuk membersihkan tanda baca, angka, spasi dan kata kunci yang kita gunakan dari sebuah kalimat untuk mendapatkan kata-kata yang telah kita mining, kemudian memunculkan kata kata dari kalimat tadi yang telah kita bersihkan

kemudian hasilnya seperti berikut

Nama kelompok
Nur Taufik Hidayat
Ray Cevaz Rizqie
Wafidin Naufal
Ridho Ilaham
Kiki Faisal