R中的ave函數的替換長度為零

Question

我正在更改幾張圖片的名稱，實際上length（filename）= length（name）兩者都是大約140萬個條目，name_idx大約有350,000個條目

filename <- c("1.jpg", "2.jpg" "3.jpg", ...., )
name <- c("a", "b", "c", "c", "a", "b",....,)
name_idx <- c("a", "b", "c", "d", ..., )

我想創建另一個包含圖片新名稱的列表，第一個條目是a.1.jpg，第五個條目是a.2.jpg，第四個條目是c.2.jpg，依此類推

stackoverflow中的某人給我這個解決方案

paste0(name, ".", ave(name, name, FUN = seq_along), ".jpg")

但我收到此錯誤

Error in x[...] <- m : replacement has length zero

我希望您能幫助我知道這是為什么以及如何解決？

Answer 1

我終於在python中完成了工作，其中的glob和os庫= 3