创建列时出错：替换有0行，数据有1行

Question

我正在尝试创建一个组织数据的函数。我需要创建新列，以将样本（即每一行）分类为“重叠”，“ non_over”或“较低”。 但是，当它读取列创建代码时，我收到以下信息：

"Error in `$<-.data.frame`(`*tmp*`, "overlap", value = logical(0)) : 
  replacement has 0 rows, data has 1"

遵循我的代码：

org <-function(bpoint){
bp <- data.frame(bpoint)
colnames(bp)<-gsub(x=colnames(bp)," ","_")
colnames(bp)<-gsub(x=colnames(bp),"(","",fixed=T)
colnames(bp)<-gsub(x=colnames(bp),")","",fixed=T)

bp$overlap <- (bp$"Low_Freq_Hz"<=2000&bp$"High_Freq_Hz">2000)
bp$non_over <- (bp$"Low_Freq_Hz">2000)
bp$lower <- (bp$"High_Freq_Hz"<=2000)
bp$time <- 'before'
}

我认为这肯定是一个愚蠢的错误，但是在其他相关问题中我找不到任何有用的解决方案...为什么我不能创建此列以及如何解决呢？

谢谢，