Split eine Spalte in zwei in r

Question

Mein df sieht wie folgt aus:

Time 
Week End 07-01-10 
Week End 07-02-10 

ich will es als

Column  Time 
Week End 07-01-10 
Week End 07-02-10 

I-Paket gegoogelt stringr nützlich sein würde, aber ich bin nicht in der Lage, es zu benutzen richtig da Es gibt zwei Räume.

Answer 1

Sie können extract von tidyr Paket verwenden, wo Sie reguläre Ausdrücke angeben können, um die Spalte zu spalten:

library(tidyr) 
extract(df, Time, into = c("Column", "Time"), "(.*)\\s(\\S+)") 
#  Column  Time 
# 1 Week End 07-01-10 
# 2 Week End 07-02-10 

Verwenden (.*)\\s(\\S+) zwei Gruppen und Split auf den Raum zu erfassen, die von einer Gruppe anschließt, die keine Leerzeichen enthält \\S+.

Wenn Sie stringr Paket verwenden möchten, können Sie str_match Funktion mit ähnlicher Funktionalität verwenden:

stringr::str_match(df$Time, "(.*)\\s(\\S+)")[, 2:3] 
#  [,1]  [,2]  
# [1,] "Week End" "07-01-10" 
# [2,] "Week End" "07-02-10" 

strsplit funktioniert auch, wenn Sie den Raum angeben, die eine vor der Stelle zu sein, hier ?= steht für Vorgriffs \\d und ist eine Abkürzung für Ziffern und entspricht [0-9]:

do.call(rbind, strsplit(df$Time, "\\s(?=\\d)", perl = T)) 
#  [,1]  [,2]  
# [1,] "Week End" "07-01-10" 
# [2,] "Week End" "07-02-10" 

Answer 2

Hier ist eine Basis-R-Lösung.

df <- data.frame(c("Week End 07-01-10", "Week End 07-02-10"), 
       stringsAsFactors=FALSE) 
names(df) <- "Time" 

# Assuming all columns end with (time?) in the same format. 
df$Column <- substring(df$Time, 0, nchar(df$Time)-9) 
df$Time <- substring(df$Time, nchar(df$Time)-8, nchar(df$Time)) 
df <- df[, c(2,1)]; df # Changing column order 

Answer 3

Wir read.table von base R verwenden. Keine Pakete benötigt

read.table(text=sub("\\s+(\\S+)$", ",\\1", df1$Time), header=FALSE, 
    col.names = c("Column", "Time"), stringsAsFactors=FALSE, sep=",") 
# Column  Time 
#1 Week End 07-01-10 
#2 Week End 07-02-10