如何使用R語言實現翻譯、讀文本及分析功能

你有沒有感覺從網上爬下數據後，很多時候不是自己想要的格式或語言，很多時候想要電腦實現自己讀文章的功能，甚至，想要分析一篇文章的情緒，那麼R語言中的 “AWS”數據包，就是最好的朋友之一。

當需要電腦讀出文本時 “aws polly”

首先安裝新版本的數據包

install.packages(“aws.polly”, repos = c(getOption(“repos”), “http://cloudyr.github.io/drat"))

然後，聲音的數據包

install.packages(“tuneR”)

設置路徑

keyTable

AWS_ACCESS_KEY_ID

AWS_SECRET_ACCESS_KEY

激活

Sys.setenv(“AWS_ACCESS_KEY_ID” = AWS_ACCESS_KEY_ID,

“AWS_SECRET_ACCESS_KEY” = AWS_SECRET_ACCESS_KEY,

“AWS_DEFAULT_REGION” = „your“ region)

調用數據包library(“aws.polly”)

Listed all available voices by using following code:

list_voices()

最後，我們就可以用joey的聲音讀起來啦

vec

是不是，英文讀起來聽不太懂？那麼，讓我們來使用翻譯的功能

數據包安裝

install.packages(“aws.translate”, repos = c(getOption(“repos”), “http://cloudyr.github.io/drat"))

設置路徑

keyTable

AWS_ACCESS_KEY_ID

AWS_SECRET_ACCESS_KEY

激活

Sys.setenv(“AWS_ACCESS_KEY_ID” = AWS_ACCESS_KEY_ID,

“AWS_SECRET_ACCESS_KEY” = AWS_SECRET_ACCESS_KEY,

“AWS_DEFAULT_REGION” = „your“ region)

調用數據包 library(“aws.translate”), 然後就可以將德語轉換成英文啦！

translate(“guten tag!”, from = “de”, to = “en”)

分析文章

安裝數據包

install.packages(“aws.comprehend”, repos = c(cloudyr = “http://cloudyr.github.io/drat", getOption(“repos”)))

設置路徑

keyTable

AWS_ACCESS_KEY_ID

AWS_SECRET_ACCESS_KEY

激活

Sys.setenv(“AWS_ACCESS_KEY_ID” = AWS_ACCESS_KEY_ID,

“AWS_SECRET_ACCESS_KEY” = AWS_SECRET_ACCESS_KEY,

“AWS_DEFAULT_REGION” = „your“ region)

調用分析數據包library(“aws.comprehend”)

detect_language(“This is a test sentence in English”)

檢查這是什麼語言

其他語言也是支持的，比如中文

detect_language(“你是誰?”)

對文字的情緒進行分析（太晚了是負面情緒嗎？？？）

detect_sentiment(“Hey, It is so late!”)

句子也一樣分析哦

detect_sentiment(“Chronicles the experiences of a formerly successful banker as a prisoner in the gloomy jailhouse of Shawshank after being found guilty of a crime he did not commit. The film portrays the man’s unique way of dealing with his new, torturous life; along the way he befriends a number of fellow prisoners, most notably a wise long-term inmate named Red.”)

自從開始學碼代碼，就愛上了，這是人類目前擁有的最強大的工具之一，因為科技，工作效率已然大大提高，連心情，都因科技而變的美好，這是來自未來的驚喜～