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 kedalam 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.
Kelompok :
- Nur Taufik Hidayat
- Ray Cevaz Rizqie
- Rido Ilham
- Kiki Firdaus
- Wafiddin Naufal
