Split a column into 2 in R

后端 未结 4 1776
灰色年华
灰色年华 2020-12-22 03:07
 I have this dataframe 

      CC.Number       Date Time Accident.Type              Location.1
    1 12T008826 07/01/2012 1630            PD  (39.26699, -76.560642)
    2          


        
4条回答
  •  清酒与你
    2020-12-22 03:29

    We can use extract from tidyr by capturing as two groups with only the numeric elements with dots and discard the rest in 'Location.1'

    library(tidyr)
    df1 %>% 
      extract(Location.1, into = c('alt', 'lng'), "\\(([0-9.]+),\\s+(-*[0-9.]+).")
    # CC.Number       Date Time Accident.Type       alt        lng
    #1 12T008826 07/01/2012 1630            PD  39.26699 -76.560642
    #2 12L005385 07/02/2012 1229            PD 39.000549 -76.399312
    #3 12L005388 07/02/2012 1229            PD  39.00058 -76.399267
    #4 12T008851 07/02/2012  445            PI  39.26367  -76.56648
    #5 12T008858 07/02/2012  802            PD 39.240862 -76.599017
    #6 12T008860 07/02/2012  832            PD  39.27022  -76.63926
    

提交回复
热议问题