复制R中的字符数组

我搜索了一下，找不到答案

我试图复制一个包含字符的数组，当我复制它时，我会得到与级别顺序相对应的数字

我从一个凌乱的电子表格中复制，所以有一些笔记，一些单元格是空的。因此，我通过查看带有干净向量的单元格中是否存在适当的值来选择所需的值

clean <- c( "o", "f", "g", "s") #cleans


x <- character() #makes two empty vectors
y <- character()
for(i in 1:length(Data$Top.Hit.percentage)) {
  if(any(clean == Data$Agreement.Level)) {
    x[i] <- Data$Top.Hit.percentage[i]
    y[i] <- unique(Data$Agreement.Level[i]) #does not copy value
  }
}

y

---

clean这可以使用命名向量将字符值查找/转换为数字：

z <- 1:4
names(z) <-  c( "o", "f", "g", "s")
y <- z[y]

z数据类$Agreement.level为因子（将向量名称从数据更改为数据）

>c

当数据$Agreement.Level分配给c时，它将成为类型/模式系数

问题可以这样解决：

> c <- as.character(data$Agreement.Level)

>c请展示一个可复制的示例。i、 e.显示几行“数据”
> c <- character()
> c <- data$Agreement.Level
> c

> c <- as.character(data$Agreement.Level)

inRem <- which(!(c %in% clean)) #gets index of b that do not contain clean
c <- c[-inRem] #removes indexes which return True from !(c %in% clean)