Matching всех расширений файлов

Question

У меня есть вектор расширений файлов, как (.txt,.TXT,.csv,.xls), я попытался "\\.(TXT|txt|csv|xls)$" согласно this которые возвращают TRUE, если какие-либо из расширений присутствуют, однако я заинтересован, чтобы вернуть TRUE если все расширения присутствуют в векторе иначе FALSE. Благодаря

Answer 1

Попробуйте

v1 <- c('a1.txt', 'a2.TXT', 'a3.csv', 'a22.txt', 'a13.TXT', 'a23.txt') 
ext <- c('txt', 'TXT', 'csv', 'xls') 
all(ext %in% sub('.*\\.', '', v1)) 
#[1] FALSE