是否有R代码来测试变量是否为函数

我试图编写一个函数，其中一个变量

fun

本身就是一个函数。一个简单但可笑的例子是：

myfun <- function(fun){
              return(fun(1))
             }

---

myfun您可以使用
is.function
检查某个对象是否是函数，例如：

is.function（mean）
或
is.function（`[`）
将返回TRUE，另外还有一个函数is.primitive，用于测试内置和特殊功能，但在您的情况下，您可能需要
is.function

就你而言：

myfun <- function(fun){
              if(is.function(fun)){
                 return(fun(1))
              } else {
                 warning("You are not passing fun as function")
              }
          }

myfun您能否显示该函数将如何运行的一些输入和相应输出？
is。函数
maybe@PKumar如果你把这句话作为回答，我会接受的。非常感谢！
fun <- function(x)x+2