Pour du SQL %like% %..% (left & right)
## Warning: package 'magrittr' was built under R version 4.0.2
li <- c('QEFA003', 'QEFA005', 'QEFA010', 'QEFA013', 'QEFA015', 'QEFA019', 'QEFA020')
enrobeur(li, robe="\'%", interstice="\n", symetrique = T) %>% cat()
## '%QEFA003%'
## '%QEFA005%'
## '%QEFA010%'
## '%QEFA013%'
## '%QEFA015%'
## '%QEFA019%'
## '%QEFA020%'
Pour du grepl
li <- c('QEFA003', 'QEFA005', 'QEFA010', 'QEFA013', 'QEFA015', 'QEFA019', 'QEFA020')
enrobeur(li, robe="", interstice="|") %>% cat()
## QEFA003|QEFA005|QEFA010|QEFA013|QEFA015|QEFA019|QEFA020
Pour du listing
li <- c('QEFA003', 'QEFA005', 'QEFA010', 'QEFA013', 'QEFA015', 'QEFA019', 'QEFA020')
enrobeur(li, robe="\'", interstice=", ") %>% cat()
## 'QEFA003', 'QEFA005', 'QEFA010', 'QEFA013', 'QEFA015', 'QEFA019', 'QEFA020'