2

我有一些多元数据。

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

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))

点图没问题，但我想在这里命名这些点。

我怎样才能做到这一点？

4

3 回答 3

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来自 lattice 包。

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))
               }))

在此处输入图像描述

于 2013-03-01T13:53:52.957 回答
1

car 包允许在散点图中轻松标记点。我们可以使用 iris 数据集进行说明。

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

在此处输入图像描述

于 2013-03-01T14:19:17.930 回答
0

编辑：agstudy 是正确的，您不能在格子窗口上使用基本图形。幸运的是，有一个ltext命令可以完成基本相同的操作，因此ltext请按照下面描述的方式使用基本图形' text.

不知道什么是最简单的，但base::text肯定可以做到这一点。我将假设您可以使用数据框中的因子或列来分别选择sb、r和f坐标集。所以：

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

您可以在其中修改字体大小、颜色等。对其他两个类别重复此操作。

于 2013-03-01T13:51:43.020 回答