R 创建不带线连接的气泡图

具有如下数据帧：

data.frame(month = c("03-2012","04-2012","05-2012","06-2012","07-2012", "08-2012","09-2012","10-2012","11-2012","12-2012","02-2013","03-2013"), frqp = c("12.3", "11.4","44.1","11.3", "1.2","15.1","35.1","12","14.1","15.1","15.1","42.1")

---

如何能够在x轴上绘制月份列和y轴上绘制frqp列（它是百分比分数），并在没有直线连接的点/气泡上绘制？

我猜您正在寻找散点图？如果这是您打算绘制的，则可以进一步改进

ddft=data.frame(month = c("03-2012","04-2012","05-2012","06-2012","07-2012", "08-2012","09-2012","10-2012","11-2012","12-2012","02-2013","03-2013"), frqp = c("12.3", "11.4","44.1","11.3", "1.2","15.1","35.1","12","14.1","15.1","15.1","42.1"))
ddft$month <- factor(ddft$month, levels = ddft$month) #maintain X-axis order
ggplot(ddft, aes(x=month, y=frqp)) + geom_point()

仅保留年份值：

函数保留字符串中的最后n个字符

lastfew <- function(x, n){
  x=as.character(x)
  substr(x, nchar(x)-n+1, nchar(x))
}

创建绘图

 ggplot(ddft, aes(x=month, y=frqp)) + geom_point(aes(size=frqp))+ theme(legend.position="none") + scale_x_discrete(labels= yearlabels)

有关比例x离散的详细信息：

进一步聚合为x轴上的两个值：

 ggplot(ddft, aes(x=yearlabels, y=frqp)) + geom_point(aes(size=frqp))+ theme(legend.position="none")

---

希望提供的解决方案是您想要绘制的？已编辑以保持数据框中可用的x轴顺序。谢谢。是否有可能在x轴上仅显示两年？2012年和2013年这两个值添加了相同的值，希望您觉得有用。

 ggplot(ddft, aes(x=month, y=frqp)) + geom_point(aes(size=frqp))+ theme(legend.position="none") + scale_x_discrete(labels= yearlabels)

 ggplot(ddft, aes(x=yearlabels, y=frqp)) + geom_point(aes(size=frqp))+ theme(legend.position="none")