get_image_files providing error message

[Mike-Monash]

I am working through the case study provided here" https://medium.com/appsilon-data-science/fastai-in-r-how-to-train-deep-learning-models-with-fastai-d86f1f8a9ba2". I couldn't get the URLs_PETS() code to work, but separately downloaded the image files as .jpg files.

But I can't get the function get_image_files(path_img) to work - it says Error in vision()$all : $ operator is invalid for atomic vectors

The command fnames <- list.files(path_img) works - the instruction fnames[1] will then return "Abyssinian_1.jpg".

This matters as the next command

dls = ImageDataLoaders_from_name_re(
path = path,
fnames = fnames,
pat = "(.+)_\d+.jpg$",
item_tfms = Resize(size = 460),
bs = 10,
batch_tfms = list(Normalize_from_stats(imagenet_stats()))
)

Will also produce the same error. What am I missing?