Question

我有一些多变量数据。

我想为这些数据画一个dotplot，所以我写了下面的代码：

a.data <- read.table("C:/Users/OGR001/Documents/veri2.csv", sep=",", header=TRUE)
library(lattice)
library(latticeExtra)


useOuterStrips(dotplot(reliability ~ factor(madde.sayisi) |  
                                    as.factor(orneklem)*as.factor(yontem),
                       groups=as.factor(formul),  
                       data=a.data, as.table=TRUE, 
                       horizontal=FALSE, 
                       jitter.x=TRUE))

点图是好的，但我想在这里命名点。

我该怎么做？

Answer 1

没有可重复的例子，真的很难帮助你！我的回答只是因为它对格子图的自定义面板有点挑战。基本上你需要添加这一行：

            panel=function(x,y,...){
                 panel.dotplot(x,y,...)
                 labs <- dat[list(...)$subscripts,]$labs ## labs is your factor column!
                 panel.text(x,y,labs,adj=c(1.2,0.5))
               }))

例如，这里使用格子包中的barley。

dat <- barley
dat$labs <- sample(c('SB','R','F'),nrow(dat),rep=T)

useOuterStrips(dotplot(variety ~ yield | site*year, 
                       data = dat,
                       groups = year,
                       horizontal=TRUE, 
                       jitter.x=TRUE,  ylab=NULL,
               panel=function(x,y,...){
                 panel.dotplot(x,y,...)
                 labs <- dat[list(...)$subscripts,]$labs
                 panel.text(x,y,labs,adj=c(1.2,0.5))
               }))

enter image description here

Answer 2

汽车包装允许在散点图中轻松标记点。我们可以使用虹膜数据集进行说明。

library(car)
scatterplot(Sepal.Length ~ Sepal.Width, data=iris,labels=iris$Species,id.method=T)

enter image description here

Answer 3

编辑：agstudy是正确的，你不能在格子窗口上使用基本图形。幸运的是，ltext命令执行的操作基本相同，因此请按照下面描述的方式对基本图形“ltext使用text。

Dunno什么是最简单的，但base::text当然可以做到这一点。我假设您可以在数据框中使用因子或列来分别选择sb，r和f坐标集。这样：

text(sb_x_coords, sb_y_coords, labels='sb',...)

您可以在其中修改字体大小，颜色等。重复其他两个类别。

无法标记点图中的点

3 个答案: