设置/问题:
我使用RStudio中的ggplot2
库和qplot()
函数创建了一个简单的散点图。
问题:
问题是当我创建这个图时,标签会重叠。
问题:
- 是否有一种简单的方法来扩展图表以防止图表标签重叠?
- 是否有一种简单的方法可以防止标签被图表边缘裁剪?
我不想删除标签。我的想法是扩展表格大小,但我似乎找不到这样做的方法。非常感谢您的任何帮助。
研究成果
- 我已经调查了
wordcloud
库作为替代方案,但遇到了同样的问题。 - 我已经调查使用
scale_x_continuous(expand = c(.3, .3))
命令,它确实允许我扩展表格以解决边缘问题,但我正在寻找更好的解决方案。 - 我已经阅读了
ggplot2
手册页,但未能找到干净的解决方案。我感觉现在是向别人寻求帮助和指针的时候了。如果我找到解决方案,我会发布它。
示例输出(数据文件如下)
代码
library(ggplot2)
library(grid)
td3 <- read.csv("td3.csv")
p <-qplot(X,Y, xaxs = "i", yaxs = "r", las = 1, data=td3, shape=as.factor(Type), label=Identifier, asp = 1)
p <- p + scale_x_continuous(expand = c(.3, .3))
p + geom_text(aes(colour=factor(Type)), angle = 30, size=4, hjust=-0.1, panel.margin = unit(50, "lines"))
测试数据
Identifier,X,Y,,Type
1st Reference Long Title,5,280,,Super fit
2nd Reference Long Title,1,60,,fit
3rd Reference Long Title,1,60,,fit
4th Reference Long Title,3,100,,fit
5th Reference Long Title,1,14,,unfit
6th Reference Long Title,1,48,,fit
7th Reference Long Title,1,48,,fit
8th Reference Long Title,10,80,,fit
9th Reference Long Title,1,24,,unfit
10th Reference Long Title,1,80,,fit
11th Reference Long Title,1,36,,unfit
12th Reference Long Title,1,10,,unfit
13th Reference Long Title,3,60,,fit
14th Reference Long Title,3,120,,fit
15th Reference Long Title,3,80,,fit
16th Reference Long Title,10,400,,Super fit
17th Reference Long Title,5,360,,Super fit
18th Reference Long Title,2,5,,unfit