2017-10-12 102 views

回答

1

這是一個解決方案。

# the data 
dat <- data.frame(X = c("Program Manager", "Program Coordinator", 
         "Senior Manager", "Senior Associate", 
         "Senior Researcher"), 
        stringsAsFactors = FALSE) 

# count words 
table(unlist(strsplit(dat$X, " +"))) 

其結果是:

Associate Coordinator  Manager  Program Researcher  Senior 
      1   1   2   2   1   3 

隨着as.data.frame結果可以被轉換成一個數據幀。

tab <- table(unlist(strsplit(dat$X, " +"))) 
as.data.frame(tab) 

結果:

  Var1 Freq 
1 Associate 1 
2 Coordinator 1 
3  Manager 2 
4  Program 2 
5 Researcher 1 
6  Senior 3 
+0

非常感謝。這對我有效。 –