Pengantar Algoritma Deep Learning

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