1 回答

TA貢獻(xiàn)1794條經(jīng)驗(yàn) 獲得超7個(gè)贊
setwd("E://xuexi//bishe//datasets")
options(stringsAsFactors=F)
data <- read.table("ant-1.7.csv",header=FALSE,sep=",")
#####################################################################
# CE: model evaluation criteria for cost-effectiveness ( 5%, 10%, 15%, 20%, ..., 100%)
#####################################################################
#建一個(gè)列REL,對(duì)于列bug中>0的則REL為1,這么寫報(bào)錯(cuò) 參數(shù)長(zhǎng)度為0
#data
data$REL <- data$bug
for(i in 1:length(data$REL)){
if(data$bug[i] > 0)
data$REl[i] <- 1#參數(shù)長(zhǎng)度為0
- 1 回答
- 0 關(guān)注
- 1579 瀏覽
添加回答
舉報(bào)