Question

R软件 R语言问题

brand <- as.character(brand.data$name)
mydata <- data.frame(name=as.vector(name.data$name),stringsAsFactors=F)
mydata$brand <- '

for(i in 1:100){
result <- data.frame(brand=character(),loc= numeric(),len=numeric())
parLapply(cl,1:length(brand),function(j){
infor <- regexpr(brand[j],mydata$name[i])
if( infor> 0 ){
result <- rbind(result,data.frame(brand=brand[j],loc= infor,len=nchar(brand[j])))
}
if(nrow(result)>=1){
result <- result[order(result$loc,-result$len),]
mydata$brand[i] <- as.character(result$brand[1])
}
}
)
}

function{}里面有个叫mydata的数据框（data.frame)，已经加载到工作空间，为什么执行上面语句总提示：
Error in checkForRemoteErrors(val) :
2 nodes produced errors; first error: object 'mydata' not found

Answer 1

clusterExport(cl, 'mydata') 在parLapply前面加上这个

Answer 2

没有说明软件环境? 代码贴全一点啊
这样可以么？

追问

WIndows XP 32bit 代码已经全贴出来了

Answer 3

mydata$brand <- '

赋值了么 ？？

追问

mydata$brand <- ''开始不赋值，在循环里赋值

mydata$brand[i] <- as.character(result$brand[1])

Answer 4

你截图吧，全部的