当前在R语言中实现文本翻译的最佳CRAN包方案咨询

针对translateR已从CRAN下架的情况，以下是几个当前稳定在CRAN仓库的文本翻译方案，基于你提供的示例数据演示：

方案1：使用googleLanguageR包（Google Cloud翻译API） #

该包基于Google Cloud翻译服务，支持批量翻译，语言覆盖广、翻译质量稳定，需提前在Google Cloud平台创建项目并获取API密钥（个人用户有免费额度）。

• 安装与加载：

install.packages("googleLanguageR")
library(googleLanguageR)

• 配置API密钥：

# 替换为你的Google Cloud翻译API密钥文件路径
gl_auth("your_api_key.json")

• 批量翻译示例：

translate <- data.frame(sentences = c("This needs to be translated to Dutch",
               "This also needs to be translated to Dutch",
               "Just as this one has to"))

# 翻译为荷兰语（目标语言代码：nl）
translate$dutch_translation <- gl_translate(translate$sentences, target = "nl")$translatedText

print(translate)

方案2：使用translate包（多翻译服务整合） #

translate包整合了Google、DeepL、Bing等多个翻译服务，部分服务提供免费调用额度，无需复杂配置即可快速试用。

• 安装与加载：

install.packages("translate")
library(translate)

• 免费试用（Google免费接口，有调用频率限制）：

options(translate.service = "google")

# 翻译为荷兰语
translate$dutch_translation <- translate(translate$sentences, target = "nl", source = "en")

print(translate)

注意：免费接口调用量有限，大量翻译需配置对应服务的正式API密钥。

方案3：使用deepr包（DeepL API） #

DeepL翻译质量在多数场景下表现更优，deepr包封装了DeepL的API，需提前申请DeepL API密钥（个人用户有免费额度）。

• 安装与加载：

install.packages("deepr")
library(deepr)

• 配置API密钥：

# 替换为你的DeepL API密钥
Sys.setenv(DEEPL_API_KEY = "your_deepl_api_key")

• 翻译示例：

# 翻译为荷兰语（目标语言代码：NL）
translate$dutch_translation <- deepl_translate(translate$sentences, target_lang = "NL", source_lang = "EN")

print(translate)

内容的提问来源于stack exchange，提问作者Tom