web-dev-qa-db-ja.com

ラベルをプロットに追加する方法

プロットの各ポイントにラベルを追加する方法はありますか？アイデアを伝えるためだけに、イメージエディターでこれを行いました： 1 。

オリジナルは以下で生成されました：

qplot(pcomments, gcomments , data = topbtw, colour = username)

Manually added fake labels to qplot

rggplot2
24
amh

Andrieの優れた回答をフォローアップするために、特定のデータを強調表示する必要がある場合は、プロット上の点のサブセットにラベルを追加する2つの方法を頻繁に使用します。以下に両方を示します。

dat <- data.frame(x = rnorm(10), y = rnorm(10), label = letters[1:10])

#Create a subset of data that you want to label. Here we label points a - e
labeled.dat <- dat[dat$label %in% letters[1:5] ,]

ggplot(dat, aes(x,y)) + geom_point() +
  geom_text(data = labeled.dat, aes(x,y, label = label), hjust = 2)

#Or add a separate layer for each point you want to label.
ggplot(dat, aes(x,y)) + geom_point() +
  geom_text(data = dat[dat$label == "c" ,], aes(x,y, label = label), hjust = 2) + 
  geom_text(data = dat[dat$label == "g" ,], aes(x,y, label = label), hjust = 2)
27
Chase

はい、geom_text（）を使用してテキストをプロットに追加します。次に例を示します。

library(ggplot2)

qplot(mtcars$wt, mtcars$mpg, label=rownames(mtcars), geom="text")

ggplot(mtcars, aes(x=wt, y=mpg, label=rownames(mtcars))) + geom_text(size=3)

詳細については、オンラインドキュメントを参照してください： http://had.co.nz/ggplot2/geom_text.html

enter image description here

14
Andrie