摘要: 1、方式1 test <- matrix(1:12, byrow = T, nrow = 3, ncol = 4) test c1 <- rep(1:nrow(test), times = ncol(test)) c2 <- rep(1:ncol(test), each = nrow(test)) 阅读全文
posted @ 2021-11-03 18:18 小鲨鱼2018 阅读(1338) 评论(0) 推荐(0) 编辑
摘要: 1、 a <- c("b", "a", "b") b <- c("c", "b", "a") c <- c("x", "a", "d") d <- data.frame(a, b, c) d e <- unlist(d) e sum(e == "b") ## 统计b出现的次数 sum(e == "d 阅读全文
posted @ 2021-11-03 18:00 小鲨鱼2018 阅读(6190) 评论(0) 推荐(0) 编辑
摘要: 1、测试数据 root@PC1:/home/test# ls outcome.map outcome.ped root@PC1:/home/test# cat outcome.map 1 snp1 0 55910 1 snp2 0 85204 1 snp3 0 122948 1 snp4 0 203 阅读全文
posted @ 2021-11-03 16:45 小鲨鱼2018 阅读(472) 评论(0) 推荐(0) 编辑