~ req : mise en forme d'une liste de codes
enrobeur(a, robe = "'", colonne = F, interstice = ", ", symetrique = F)
Examples
if (FALSE) {
li <- c('QEFA003', 'QEFA005', 'QEFA010', 'QEFA013', 'QEFA015', 'QEFA019', 'QEFA020')
enrobeur(li, robe="", interstice="|") %>% cat()
enrobeur(li, robe="\'", interstice=",") %>% cat()
enrobeur(li, robe="\'%", interstice="\n", symetrique = T) %>% cat()
}