我已经加载了图片load.image()函数的列表，当我想从列表作为参数传递给一个函数调用添加索引grayscale()我有以下错误：
误差在如果（谱（IM）== 1）{：参数是长度为零的
可能有人请帮助我在这个问题？
filenames <- list.files("~/Downloads/project", pattern="*.jpg", full.names = T)
if(!is.null(filenames)){
for(idx in filenames) {
im <- idx
print(im)
load.image(im)
im1=grayscale(im);
现在的问题是解决了：
load.image（IM）应保存到一个变量，而这一次应添加作为灰度参数（）函数
filenames <- list.files("~/Downloads/project", pattern="*.jpg", full.names = T)
if(!is.null(filenames)){
for(idx in filenames) {
im <- idx
print(im)
loaded_image <- load.image(im)
im1=grayscale(loaded_image);
