代码如下：
<br />
for(n in 2:length(label[,3]))<br />
{<br />
imgRGB=try(readImage(file=paste(dir,as.character(label[n,3]),sep="")), silent=TRUE)<br />
if (class(imgRGB)!="try-error")<br />
{<br />
imgR=imgRGB[,,1]<br />
imgG=imgRGB[,,2]<br />
imgB=imgRGB[,,3]<br />
dim(imgR)=c(1,w*h)<br />
dim(imgG)=c(1,w*h)<br />
dim(imgB)=c(1,w*h)<br />
img=t(c(as.character(label[n,3]), as.character(label[n,2]),<br />
round(as.single(imgR), di),<br />
round(as.single(imgG), di),<br />
round(as.single(imgB), di)))<br />
write.table(img, file="set.csv", append=T, sep=",", col.names=F, row.names=F)<br />
}<br />
}<br />
</p>
label[,3]文件名，但是因为预处理，文件可能不存在，所以加上了try
但是运行到一定时候，就会all connections are in use
我查了一下readImage函数的代码，貌似是应为文件没有正常的打开，所以就没执行里边的close
我想在外边close(imaRGB)，但是close方法显示
<br />
> close(imgRGB)<br />
Error in UseMethod("close") :<br />
no applicable method for 'close' applied to an object of class "c('Image', 'array', 'structure', 'vector')"<br />
</p>
求解决的方法
