R可以知道它是否在Windows上运行吗？

Question

我想知道是否可能在R中进行逻辑测试以评估R是否在＆＃34; Windows＆＃34; （win）操作系统与否？

这是为了什么：

if("OS is windows") { ## Here is the logical test I need !!!

  setwd("~/../Desktop")  

  } else {

  setwd("~") }          


x <- paste0(getwd(),"/", "Animation")
dir.create(x)

Answer 1

这是一个可能有用的功能：

https://github.com/hadley/rappdirs/blob/master/R/utils.r#L1

    get_os <- function() {
  if (.Platform$OS.type == "windows") { 
    "win"
  } else if (Sys.info()["sysname"] == "Darwin") {
    "mac" 
  } else if (.Platform$OS.type == "unix") { 
    "unix"
  } else {
    stop("Unknown OS")
  }
}