摘要: 1、 plot(0:10, 0:10, pch = 16, col = "red", xaxs = "i", yaxs = "i") abline(h = 5, lwd = 5) ## 高度 2、 plot(0:10, 0:10, pch = 16, col = "red", xaxs = "i", 阅读全文
posted @ 2022-05-17 23:54 小鲨鱼2018 阅读(636) 评论(0) 推荐(0) 编辑
摘要: 001 完整代码 dat <- read.table("result.fst", header = T) head(dat) chrlen <- vector() for (i in unique(dat$CHR)) { temp <- dat[dat$CHR == i, ] temp <- tem 阅读全文
posted @ 2022-05-17 13:59 小鲨鱼2018 阅读(263) 评论(0) 推荐(0) 编辑
摘要: 1、 win + i 打开设置, 点击轻松使用 2、点击左下角键盘 3、将屏幕截图快捷方式点为开 阅读全文
posted @ 2022-05-17 12:47 小鲨鱼2018 阅读(1084) 评论(0) 推荐(0) 编辑
摘要: 1、 > plot(1:5, 1:5, xlim = c(0,6), ylim = c (0,6), type = "n") > arrows(x0 = 1, y0 = 1, x1 = 4, y1 = 4) 2、 同时画两个箭头 > plot(1:5, 1:5, xlim = c(0,6), yli 阅读全文
posted @ 2022-05-17 11:20 小鲨鱼2018 阅读(512) 评论(0) 推荐(0) 编辑
摘要: 1、 > plot(1:10) > segments(1,1, 6, 4, lwd = 5, col = "red") 阅读全文
posted @ 2022-05-17 11:06 小鲨鱼2018 阅读(395) 评论(0) 推荐(0) 编辑
摘要: 1、 完整代码: dat <- read.table("result.fst", header = T) head(dat) chrlen <- vector() for (i in unique(dat$CHR)) { temp <- dat[dat$CHR == i,] temp <- temp 阅读全文
posted @ 2022-05-17 01:23 小鲨鱼2018 阅读(474) 评论(0) 推荐(0) 编辑