geno$snp21: $ operator is invalid for atomic vectors

在R语言中，遇到"`$`操作符无效于原子向量"这样的错误通常是由于你试图在一个非列表、数据框或集合对象上使用它来访问元素。`$`操作符主要用于检索数据结构（如list或data.frame）中的变量或子项。

如果你有一个名为`geno`的原子向量（可能是数值型、字符型或其他不是结构化的数据类型），直接尝试使用`$`来访问`snp21`可能会导致错误，因为原子向量不支持这种分组索引。

例如，如果你的`geno`是一个数值向量，你应该这样做来获取`snp21`的值（假设`snp21`是索引）：

if (is.atomic(geno)) {
  if (exists("snp21", where = parent.frame())) {  # 检查`snp21`是否存在于上一级环境
    snp21_value <- geno[snp21]
  } else {
    stop("snp21 not found in the current environment.")
  }
} else if (is.list(geno) || is.data.frame(geno)) {  # 对于list或data.frame，可以正常使用$
    snp21_value <- geno$snp21
  } else {
    stop("geno is neither an atomic vector nor a list/data frame.")
  }

这里的关键是检查`geno`的类型，并相应地处理它。如果`geno`是非原子的，再检查是否存在`snp21`的引用。