在循环R

时间:2019-09-02 13:09:30

标签: r function loops

快速摘要:我正在尝试在R的循环或函数内应用dim(x)<-NULL

我正在R中使用包colordistance。我正在尝试为这样的函数创建循环的函数,用于个别情况:

image_folders <- dir(path='./photos/', full.names = T)
image_1 <- sapply(image_folders[1], colordistance::getImagePaths)
dim(image_1) <- NULL

当前,我尝试按以下方式创建函数:

list_images <- function(folder,index){
  require(colordistance)
  sapply(folder[index],colordistance::getImagePaths)
}

然后在循环中调用它:

for (i in 1:length(image_folders)){
  name <- paste("image", basename(image_folders[i]), sep="_" )
  assign(name, list_images(image_folders, i))
}

但是,这将为每个图像列表生成一个矩阵。我需要包含dim(image_1)<-NULL才能将它们放入字符变量中,以便进行后续分析。

我尝试将其放置在函数中和循环中,但这要么导致值全部为NULL,要么似乎什么也没做。

我的预期结果是在我的全局环境“值”部分中包含字符,并提供给循环的每个文件夹中的所有图像的名称。我不希望这些出现在我的全局环境的“数据”部分中。

我是否使这个复杂化了? 我如何实现我的目标? -预先感谢!

0 个答案:

没有答案