我想基于维度限制一个函数

Question

如果y变量的维度大于1，我想创建一个报告错误的函数。这是我做的代码：

my.ecdf<- function(x,y) {
  if(dim(y)<-NULL)
    stop("y has more than one dimension")
  n<-length(x)
  i<-1:n 
  p<-if(x[i]<y) 1 else {
    0
  }
  p/n
}

我想使用带有单个整数的函数作为y的输入，但是我得到y的长度为0的错误。我不明白。此外，如果我的代码中有任何其他错误，请随时指出它们，我是这个程序的新手。

Answer 1

R中的赋值运算符：

x <- NULL
NULL -> x
x <<- NULL
NULL ->> x
x = NULL

测试平等：

x == NULL