Split a string vector at whitespace

后端 未结 9 1969
独厮守ぢ
独厮守ぢ 2020-12-08 09:35

I have the following vector:

tmp3 <- c(\"1500 2\", \"1500 1\", \"1510 2\", \"1510 1\", \"1520 2\", \"1520 1\", \"1530 2\", 
\"1530 1\", \"1540 2\", \"1540         


        
9条回答
  •  温柔的废话
    2020-12-08 10:41

    An easier way to split 1 column into 2 columns via data.table

    require(data.table)  
    data_ex = data.table( a = paste( sample(1:3, size=10, replace=TRUE),"-separate", sep="" ))  
    data_ex[, number:=  unlist( strsplit(x=a, split="-") )[[1]], by=a]  
    data_ex[, word:= unlist( strsplit(x=a, split="-") )[[2]], by=a ]
    

提交回复
热议问题