如何测试R中是否存在系统可执行文件

Question

假设我需要在R中运行系统可执行文件（myexecutable）。我想打印一条消息“如果没有安装，请安装myexecutable来运行此proprogram”。我怎么在R？

Answer 1

使用Sys.which()。

工作示例

R> testForMyProg <- function(prg) { if (Sys.which(prg) == "") message("Please install ", prg) }
R> testForMyProg("lalalalaNope")
Please install lalalalaNope
R> testForMyProg("gcc")
R> 
R>