R's try() ตรวจไม่พบข้อผิดพลาดที่เกิดจาก file.remove()

ฟังก์ชัน try หรือ tryCatch ไม่พบข้อผิดพลาดใดๆ เนื่องจากฟังก์ชัน remove.file ทำงานอย่างถูกต้อง (ตามที่ @Bhas กล่าว) และจะส่งค่า FALSE ที่สามารถใช้เพื่อจัดการกับข้อผิดพลาดดังที่แสดงด้านล่าง:

write.csv2(x = data.frame(V1 = 1:10, V2 = letters[1:10]),
           file = 'file.csv')

shell('start excel file.csv') # opens excel to throw the error

rem <- try(file.remove('file.csv'))
rem # [1] FALSE

if (rem == FALSE) {
  shell('taskkill /F /IM excel.exe') # handle the error you pointed us
  rem_2 <- file.remove('file.csv')
  if(rem_2 == FALSE) { # if this was not the case, warn the user
    warning(warnings())
    class(rem) <- c(class(rem), "try-error") # and add try-error class to 'rem'
  }
}

หลังจากนั้นคุณจะสามารถจัดการเรื่องนี้ได้ตามที่คุณวางแผนไว้

OBS: รันโค้ดนี้ทีละบรรทัด ไม่เช่นนั้น R จะเร็วกว่า Excel และคุณจะไม่เห็นข้อผิดพลาดใดๆ ในคอนโซล