6

不同的 IDE 各有特点，因此了解您使用什么 IDE 运行 R 有时会很有用。

您可以通过测试RSTUDIO环境变量来测试您是否正在运行 RStudio。

is_rstudio <- function()
{
  env <- Sys.getenv("RSTUDIO")
  !is.null(env) && env == "1"
}

（或者，正如哈德利评论的那样，gui <- .Platform$GUI; !is.null(gui) && gui == "RStudio"。）

您可以通过检查Revo.version基础环境中命名的列表来测试 Revolution R。

is_revo_r <- function()
{
  exists("Revo.version", "package:base", inherits = FALSE) && is.list(Revo.version)
}

是否可以进行类似的检查以查看您运行的是 Architect 还是 StatET？

我发现的最接近的事情是，默认情况下，Architect 将其嵌入的 Rtools 副本的路径添加到PATH环境变量中。

strsplit(Sys.getenv("PATH"), ";")[[1]][1]
## [1] "D:\\Program Files\\Architect\\plugins\\eu.openanalytics.architect.rtools.win32.win32_0.9.3.201307232256\\rtools\\bin"

我不清楚如何从中进行可靠的跨平台测试。你能找到更好的测试吗？

4

1 回答 1

4

我还没有找到任何非常好的测试，但是 Architect 有更多的调整迹象。

首先，它加载一个名为rj. 我们可以使用

"package:rj" %in% search()

其次，它覆盖了默认的图形设备（看看getOption("device")）。这是一个匿名函数，因此我们无法通过名称进行测试，但我认为name参数的值应该将其与其他设备（如windowsor ）区分开来png。

device_name <- formals(getOption("device"))$name
!is.null(device_name) && device_name == "rj.gd"

结合这两个测试来检查您是否正在运行 Architect 应该是相当准确的。

is_architect <- function()
{
  "package:rj" %in% search() &&
  !is.null(device_name <- formals(getOption("device"))$name) &&
  device_name == "rj.gd"
}
于 2014-12-01T10:41:44.073 回答