複製功能產生的一大因素

Question

我有一個數據幀像這樣的一列：

col1 
line1 
line1 
line2 

我嘗試使用這個刪除重複：

df2 <- df[!duplicated(df), ] 

，但它產生的一大因素，而不是刪除重複。的結構類似，結果是這樣的：

str(df2) 
Factor w/ 7472 levels 

Answer 1

當你只有一列，你需要使用drop = FALSE得到一個數據幀回：

df2 <- df[!duplicated(df), , drop = FALSE] 

另一種選擇是使用unique功能：

df2 <- unique(df) 

兩種方法的結果是相同的：

> df2 
    col1 
1 line1 
3 line2 

Answer 2

col1 <- c("line1", 
      "line1", 
      "line2") 

df <- data.frame(col1=col1, x=c(1,2,3)) 

df1 <- df[!duplicated(df$col1),] 
df1 

col1 x 
1 line1 1 
3 line2 3 

class(df1) 

[1] 「data.frame」