发布网友
共1个回答
热心网友
1、并不是所有用户都有相似用户,在执行语句中会报错——这里我需要一个语句能识别报错并跳过继续执行;
2、如何把所有执行的结果放入一个矩阵,并且识别是哪一个用户——这里需要一个空矩阵将用户ID和结果装入。
最终代码编写如下:
#组建初始化空矩阵
R<-matrix(0,9,1)
#循环运行推荐程序并将结果并入到空矩阵
for (i in 1:nrow(S))
#循环执行推荐程序
try({
#将ID放到结果之前
R1=cbind(c(rep(i,3),UserBasedRecommender(i,RECOMMENDER_NUM,M,S,N)))
#将ID和结果一起并入空矩阵
R<-cbind(R,R1)
}
,silent = T)
#删除结果矩阵1,2行以及第一列
c<-R[-1,-1][-1,]
write.csv(c,file = 'hnjbtj1.csv')
结果如下: