在switch()中分配一个与R中传递的参数不同的值。

Question

我不完全理解R中的switch()，我看到过这样的例子。

newCat <- switch(EXPR = category,
       cat1   = catX,
       cat2   = catX,
       cat3   = catY,
       cat4   = catY,
       cat5   = catZ,
       cat6   = catZ,
       "not available")

但是，我需要的是，给定一个参数，做一些不同的事情... ...

我正试图将其改写成一个案例，我不完全理解R中的switch()，我看到的例子是：但是，我需要的是，给定一个参数，做一些不同的事情。

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)
}

Answer 1

你可能正在寻找一个函数，比如 vswitch 或 nif 在 kit 包在CRAN上。检查文档。如果没有帮助，请告诉我。