ecce v3.0.1 已发布到 CRAN

chuxinyuan · 2024年5月17日

功能介绍

ecce 包主要包括以下 3 个简单的功能：

可以实现英汉句子互译（其实通过函数里的 from 和 to 参数设置可以支持多语言），结果输出到控制台。
可以自动打开包含翻译结果的网页，控制台不输出任何结果。
可以给汉语词句标注拼音。

用法示例

library(ecce)
translate("I like R language")
#> [1] "我喜欢R语言"
translate("我喜欢R语言")
#> [1] "I like R"

translate_view("I like R language")
translate_view("我喜欢R语言")

pinyin("时间序列模型")
#> shí jiān xù liè mó xíng 
#>  时  间  序  列  模  型

安装配置

安装

# 推荐从 CRAN 官方安装（国内镜像暂时还没同步过来）
install.packages("ecce", repos = "https://cran.r-project.org/") 

# 从 GitLab 仓库安装
remotes::install_gitlab("chuxinyuan/ecce")

配置

需要首先去有道智云注册用户 -> 有道智云控制台应用总览里创建应用 -> 开通服务。

应用创建好后，把应用ID和应用密钥复制到如下代码里并运行一次即可。

if (!file.exists("~/.Renviron")) {
  file.create("~/.Renviron")
} 

file_path = "~/.Renviron"
file = file(file_path, open = "a")

comment = "# ID and PASSWORD of Youdao Translation"
writeLines(comment, file)

code_lines = c(
  "app_key = \"Your Youdao API ID\"",
  "app_secret = \"Your Youdao API PASSWORD\""
)

for (code in code_lines) {
  writeLines(code, file)
}

close(file)