snp9 <- matrix(c(+ "AA", "AA", "AA", "BB", "AA", "AA", "AA", "AA", NA,+ "AA", "AA", "BB", "BB", "AA", "AA", "BB", "AA", NA,+ "AA", "AA", "AB", "BB", "AB", "AA", "AA", "BB", NA,+ "AA", "AA", "BB", "BB", "AA", "AA", "AA", "AA", NA,+ "AA", "AA", "BB", "AB", "AA", "BB", "BB", "BB", "AB",+ "AA", "AA", "BB", "BB", "AA", NA, "BB", "AA", NA,+ "AB", "AA", "BB", "BB", "BB", "AA", "BB", "BB", NA,+ "AA", "AA", NA, "BB", NA, "AA", "AA", "AA", "AA",+ "AA", NA, NA, "BB", "BB", "BB", "BB", "BB", "AA",+ "AA", NA, "AA", "BB", "BB", "BB", "AA", "AA", NA+ ),+ ncol = 9, byrow = TRUE+ )>
colnames(snp9) <- paste("SNP", 1:9, sep = "")
rownames(snp9) <- paste("ID", 1:10 + 100, sep = "")
gp <- create.gpData(geno = snp9)
gp.coded <- codeGeno(gp, impute = TRUE, impute.type = "random")Error in[.data.frame(df.allele, hetPos == 1, 3:2) : undefined columns selectedIn addition: Warning messages:1: In lapply(X, FUN, ...) : NAs introduced by coercion
请问一下这个代码报错说选择了未定义的列是什么意思？
这是新版本synbreed包的错误，现在示例都跑不了。看了源码一大堆也不想改了。要转用plink转吧，别用这个R包转了。
我也出现了一样的错误
请问，你的问题解决了吗？我也遇到了这个问题。
你好，我是有问必答小助手，非常抱歉，本次您提出的有问必答问题，技术专家团超时未为您做出解答
本次提问扣除的有问必答次数，将会以问答VIP体验卡（1次有问必答机会、商城购买实体图书享受95折优惠）的形式为您补发到账户。
因为有问必答VIP体验卡有效期仅有1天，您在需要使用的时候【私信】联系我，我会为您补发。