检查R是否在RStudio中运行-CheckifRisrunninginRStudio

8  

There is no "running inside RStudio". RStudio is merely an IDE layer that wraps around R; at the end of the day it just launches the normal R executable you need to have on your $PATH anyway to operate RStudio.

没有“在RStudio内部运行”。 RStudio只是一个环绕R的IDE层;在一天结束时，它只是启动您需要在$ PATH上运行RStudio的正常R可执行文件。

As a proxy, and as R Studio You could test available.packages() for the 'manipulate' package though, or as a shorter version see if RStudio added itself to the .libPath() content:

作为代理，作为R Studio您可以测试'manipulate'包的available.packages（），或者作为更短的版本，看看RStudio是否将自己添加到.libPath（）内容中：

R> any(grepl("RStudio", .libPaths()))
[1] TRUE
R> 
R> 

31  

This is from ?rstudio:

这是来自？rstudio：

# Test whether running under RStudio 
isRStudio <- Sys.getenv("RSTUDIO") == "1"

There is also rstudioapi::isAvailable(), but checking this is not as reliable because RStudio doesn't seem to really need the rstudioapi package to work correctly.

还有rstudioapi :: isAvailable（），但检查这个并不可靠，因为RStudio似乎并不真正需要rstudioapi包才能正常工作。

6  

When I start RStudio it seems to have tools:rstudio in position 2 on the search path. This has a function "RStudio.version" which is undocumented but seems to return the RStudio version string:

当我启动RStudio时，似乎有工具：rstudio在搜索路径的第2位。这有一个函数“RStudio.version”，它没有文档但似乎返回RStudio版本字符串：

> RStudio.version()
[1] "0.96.316"

So you can define:

所以你可以定义：

is.RStudio <- function(){
  if(!exists("RStudio.version"))return(FALSE)
  if(!is.function(RStudio.version))return(FALSE)
  return(TRUE)
}

and maybe use that.

也许使用它。

6  

Check the .Platform$GUI option for "RStudio"

检查“RStudio”的.Platform $ GUI选项

is.rstudio = function(){
  .Platform$GUI == "RStudio"
}

See:

看到：

http://thecoatlessprofessor.com/programming/detecting-if-r-is-in-rstudio-and-changing-rstudios-default-graphing-device/

http://thecoatlessprofessor.com/programming/detecting-if-r-is-in-rstudio-and-changing-rstudios-default-graphing-device/

3  

To add to the number of nice guesses, here is a message from 2011 (Ice Age)

为了增加猜测的数量，这里有一条来自2011年（冰河世纪）的消息

http://support.rstudio.org/help/discussions/problems/413-location-of-installed-packages

http://support.rstudio.org/help/discussions/problems/413-location-of-installed-packages

if (Sys.getenv("RSTUDIO_USER_IDENTITY")!= ""){
.libPaths(.Library) # Avoid additional libraries } else { # not rstudio ...

2  

I find the following works for me

我发现以下作品适合我

checkRstudio <- function () {
  return ("tools:rstudio" %in% search())
}

I am sort of new to R myself, but I believe Rstudio necessarily loads the package "tools:rstudio" in order to run.

我对R本人有点新意，但我相信Rstudio必须加载“tools：rstudio”软件包才能运行。

2  

As of today, there are a few packages which include functions to check whether RStudio is running:

截至今天，有一些软件包包含检查RStudio是否正在运行的函数：

rstudioapi::isAvailable()
assertive::is_rstudio()

(list is non-exhaustive)

（清单不详尽）

The assertive and assertive.reflections packages, resp., do include additional functions to check for other IDEs, desktop/server versions of RStudio, and various R releases (e.g., alpha, beta, devel, release, patched, etc.)

assertive和assertive.reflections包，包括其他功能，以检查其他IDE，桌面/服务器版本的RStudio和各种R版本（例如，alpha，beta，devel，release，patched等）

0  

On a Mac only the Sys.getenv answer works

在Mac上只有Sys.getenv的答案有效

platform x86_64-apple-darwin10.8.0
version.string R version 3.1.0 (2014-04-10)

平台x86_64-apple-darwin10.8.0 version.string R版本3.1.0（2014-04-10）

Sys.getenv("RSTUDIO")=="1" [1] TRUE

Sys.getenv（“RSTUDIO”）==“1”[1] TRUE

RStudio.version() Error: could not find function "RStudio.version"

RStudio.version（）错误：找不到函数“RStudio.version”

any(grepl("RStudio", .libPaths())) [1] FALSE

any（grepl（“RStudio”，。libibss（）））[1] FALSE

.libPaths() [1] "/Library/Frameworks/R.framework/Versions/3.1/Resources/library"

.libPaths（）[1]“/ Library / Frameworks / R.framework / Version / 3.1 / Resources / library”

0  

Neat solution is now available through the startup package via the is_rstudio_console function:

现在可以通过is_rstudio_console函数通过启动包获得整洁的解决方案：

startup:::is_rstudio_console()
[1] TRUE