從 ggplot 中刪除尺寸標簽

Question

我使用庫ggplot2在R中創建了以下圖

p_cd = c(0.01,0.15,0.5,0.7,0.9)
p_cr = c(0.01,0.15,0.5,0.7,0.9)

data = as.data.frame(expand.grid(p_cd,p_cr))
data = cbind(data,rep(NA,dim(data)[1]))
colnames(data) = c('p_cd','p_cr','weights')
weights = runif(sum(seq(1,4,by=1)),0,5)
u = 1
for(i in 1:dim(data)[1]){
  if(data[i,1]>data[i,2]){
    data[i,3] = weights[u]
    u = u + 1
  }
}

library(ggplot2)
ggplot(data[!is.na(data[,3]),], aes(x=p_cd, y=p_cr, color=weights, size = 3)) +
  geom_point()

但是，我想做的是從圖中刪除標簽大小，我該怎么做？

Answer 1

添加scale_size_continuous(guide = "none") 。

ggplot(data[!is.na(data[,3]),], aes(x=p_cd, y=p_cr, color=weights, size = 3)) +
  geom_point() +
  scale_size_continuous(guide = "none")

或者......如果你想要圖例而不是標題，那么

ggplot(data[!is.na(data[,3]),], aes(x=p_cd, y=p_cr, color=weights, size = 3)) +
  geom_point() +
  scale_size_continuous(name = NULL)

Answer 2

你應該把size放在aes之外：

ggplot(data[!is.na(data[,3]),]) +
  geom_point(aes(x=p_cd, y=p_cr, color=weights), size = 3)