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

Question

我在想R是否可能有一个逻辑测试来评估R是否在“Windows”（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") 
    } 
}