# split by space, put in columns
::str_split_fixed('Metronidazol Injection', '\\s+',2) stringr
[,1] [,2]
[1,] "Metronidazol" "Injection"
# a vector
<- c('Metronidazol Injection', 'Gentamicin Injection')
v ::str_split_fixed(v, '\\s+',2) stringr
[,1] [,2]
[1,] "Metronidazol" "Injection"
[2,] "Gentamicin" "Injection"