btwExtra
基于{btw}包构建的额外MCP工具和助手 将R会话与LLM连接。
安装（开发）
来自GitHub：
remotes::install_github("brianmsm/btwExtra")当前工具
btwExtra_tool_env_run_r_code：escape舱口运行任意R代码
在连接的会话中。模拟R控制台（打印可见 值，跳过赋值）并将输出截断为20行 违约；集 max_output_lines = -1 禁用截断。更喜欢 更具体 btw_tool_*/btwExtra_tool_* 工具可用时。
示例用法
通过ellmer聊天注册btw+btwExtra工具：
library(ellmer)
ch % filter(cyl == 6) %>% summarise(value = mean(hp))")
res##
## @ value : chr " value\n1 122.2857"
## @ error : NULL
## @ extra :List of 1
## .. $ data:List of 5
## .. ..$ status : chr "ok"
## .. ..$ console : chr [1:2] " value" "1 122.2857"
## .. ..$ result_class : chr NA
## .. ..$ n_output_lines : int 2
## .. ..$ max_output_lines: int 20
## @ request: NULL截断通知：默认情况下，“长输出截断”指导为 每个会话显示一次。要始终显示它：
options(btwExtra.show_truncation_notice_once = FALSE)MCP配置
使用btw+btwExtra组合工具：
[mcp_servers.r-btw]
command = "Rscript"
args = [
"-e",
"btwExtra::btwExtra_mcp_server()" # btw::btw_tools() + btwExtra::btwExtra_tools()
]如果需要，您可以传递一组自定义工具，例如仅来自btw的文档 加上btwExtra的所有内容：
args = [
"-e",
"btwExtra::btwExtra_mcp_server(tools = c(btw::btw_tools('docs'), btwExtra::btwExtra_tools()))"
]或者，您可以致电 btw::btw_mcp_server() 直接通过 组合工具：
args = [
"-e",
"btw::btw_mcp_server(tools = c(btw::btw_tools('docs'), btwExtra::btwExtra_tools()))"
]Claude代码或游标的MCP配置
Claude CLI：
claude mcp add -s "user" r-btw -- Rscript -e "btwExtra::btwExtra_mcp_server()"游标/VS代码风格JSON：
{
"r-btw": {
"command": "Rscript",
"args": ["-e", "btwExtra::btwExtra_mcp_server()"]
}
}非常重要：注册R会话
您想与MCP一起使用的任何R会话都必须调用 mcptools::mcp_session() 因此MCP服务器可以发现并连接到 最简单的方法是将此呼叫添加到您的 .Rprofile （用户-或 项目级别），因此它在会话开始时自动运行。
项目级别 .Rprofile （放置在项目根目录中），或用户级别 .Rprofile:
- 窗户：
C:/Users//Documents/.Rprofile - macOS/Linux：
~/.Rprofile
示例内容：
if (interactive() && requireNamespace("mcptools", quietly = TRUE)) {
mcptools::mcp_session()
}这将自动注册任何交互式R会话 mcptools，使其可供MCP客户端使用（例如Codex、ChatGPT、， 等等）。