ivida o vetor de strings e cole o subconjunto dos elementos resultantes em um novo vet
Defini
z<- as.character(c("1_xx xx xxx_xxxx_12_sep.xls","2_xx xx xxx_xxxx_15_aug.xls"))
de tal modo qu
> z
[1] "1_xx xx xxx_xxxx_12_sep.xls" "2_xx xx xxx_xxxx_15_aug.xls"
Quero criar um vetorw de tal modo qu
> w
[1] "1_12_sep" "2_15_aug"
Ou seja, divida cada elemento dez de_ e, em seguida, junte os elementos 1,4,5, com o .xls removido do último.
Eu posso gerenciar a parte dividida, mas não tenho certeza de qual função fornecer, por exemplo, algo como "
w <- as.character(lapply(strsplit(z,"_"), function(x) ???))