用文本在R中绘制MDS

我有一个简单的PLINK MDS“Cauc71.MDS”：

以下代码将生成R中的绘图：

d <- read.table("Cauc71.mds", header=TRUE)
plot(d$C1, d$C2, pch=20, cex=2, col = d$SOL+1)

---

d您不能在
绘图中定义此项。您只能打印点、线等，但可以在之后添加文本，例如

text(d$C1, d$C2, labels=d$IID, col = d$SOL+1)

此外，您可能需要使用参数
pos
或
adj
正确定位文本

如果您还想去掉这些点，可以将参数
type=“n”
添加到绘图函数中。
尝试以下操作：

d <- read.table("Cauc71.mds", header=TRUE)
plot(d$C1, d$C2, pch=20, cex=0, col = d$SOL+1)
text(d$C1, d$C2, labels=d$IID)

欢迎使用SO：请正确设置代码格式，并提供一个可复制的示例：@Ali Yes，根据现在的评论，它是；（见）对不起，第一篇文章太草率了；非常迅速和有用的反应
d <- read.table("Cauc71.mds", header=TRUE)
plot(d$C1, d$C2, pch=20, cex=0, col = d$SOL+1)
text(d$C1, d$C2, labels=d$IID)

library(ggplot2)
ggplot(d, aes(x=C1, y=C2, label=IID))+geom_text()