我不完全理解R中的switch((,我见过这样的例子:
newCat <- switch(EXPR = category,
cat1 = catX,
cat2 = catX,
cat3 = catY,
cat4 = catY,
cat5 = catZ,
cat6 = catZ,
"not available")
但是,我需要的是,给定一个参数,做一些不同的事情。。。
我正试图将其改写为一个案例:
sample<-function(M,meth)
{
if (meth=="sin_low" || meth=="sin_high")
{
d<-samplesin(M)
}
if (meth=="GP" || meth ="GP_high")
{
d<-sampleGP(M)
}
return(d)
}
您可能正在CRAN上的kit
包中寻找类似vswitch
或nif
的函数。查看文档。如果没有帮助,请告诉我。