将数据帧转换为R中的因子

我有一个像这样的数据框

>df1
df1
barcode                     cell.subset$Cluster
N106.LPB.AAACCTGAGCAGACTG        CD4+ Activated
N106.LPB.AAAGATGTCAGATAAG                 Tregs
N106.LPB.AAAGTAGGTCTAAAGA        CD4+ Activated
N106.LPB.AACCATGGTACATGTC        CD4+ Activated

>factor1
N106.LPB.AAACCTGAGCAGACTG N106.LPB.AAAGATGTCAGATAAG N106.LPB.AAAGTAGGTCTAAAGA  N106.LPB.AACCATGGTACATGTC  
          CD4+ Activated                     Tregs              CD4+ Activated           CD4+ Activated                

使用as.factordf1不起作用-我希望它的格式为factor1。这看起来很简单，但不确定如何做

factor(setNames(df$cell.subset.Cluster, df$barcode))

可复制数据：

df <- data.frame(
  barcode = c(
    "N106.LPB.AAACCTGAGCAGACTG", "N106.LPB.AAAGATGTCAGATAAG", 
    "N106.LPB.AAAGTAGGTCTAAAGA", "N106.LPB.AACCATGGTACATGTC"
  ),
  `cell.subset.Cluster` = c("CD4+ Activated", "Tregs", "CD4+ Activated", "CD4+ Activated")
)

---

谢谢，很抱歉没有输入可复制的数据。我会接受你的回答。