感谢droplevels建议,我使用它但是当我运行下面的脚本(使用droplevels)时,我无法将参数“blue”变为ert [3],当我运行ert时,我得到了以下内容NA NA“Blue”
[1] NA NA 1
感谢您的任何建议。
setup <- data.frame(c("red","blue","green","blue"))
colnames(setup) <- "tester"
red <- data.frame(unique(setup[,"tester"]))
run <- red[2,1]
run <- droplevels(run)
ert <- vector()
ert[3] <- run
ert