我真的不知道你在做什麼,但假設這接近它我可以重現錯誤:
qn <- 1:11
div_1 <- function(x) { x <- x + 1 }
div_2 <- function(x) { x <- x + 2 }
div<- function(x) c(div_1(x)[1],div_2(x),div_1(x)[2:10])
x <- 1
names(div(x))<- paste("q=", qn, sep="")
# Error in names(div(x)) <- paste("q=", qn, sep = "") :
# could not find function "div<-"
我可以修復它(將其分成兩步):
qn <- 1:11
div_1 <- function(x) { x <- x + 1 }
div_2 <- function(x) { x <- x + 2 }
div<- function(x) c(div_1(x)[1],div_2(x),div_1(x)[2:10])
x <- 1
v <- div(x)
names(v)<- paste("q=", qn, sep="")
# q=1 q=2 q=3 q=4 q=5 q=6 q=7 q=8 q=9 q=10 q=11
# 2 3 NA NA NA NA NA NA NA NA NA
這可能是一個錯誤,或者將名稱分配給一個臨時變量的一個限制(注意結果在您的版本中被拋出)。出於好奇,你在用div做什麼?
請提供可重現的示例和所需的輸出。 –
也許嘗試在設置名稱之前實際將'div(x)'的結果存儲在變量中...? – joran
也許標記正確,關閉它並從未得到答覆的列表中取消它?或者你還需要幫助嗎? –