R 如何删除部分比例以在ggplot2中显示更多内容

R 如何删除部分比例以在ggplot2中显示更多内容,r,ggplot2,scale,R,Ggplot2,Scale,我正在处理ggplot2,这是我的示例数据 type <- c("A", "B", "C", "D", "E","F") point <- c(3,5,8,6,100,9) data <- data.frame(type, point) ggplot(data, aes(x=type, y=point, fill="type")) + geom_bar(stat="identity") + geom_text(data=data, aes(label=paste(t

我正在处理ggplot2,这是我的示例数据

type <- c("A", "B", "C", "D", "E","F")
point <- c(3,5,8,6,100,9)
data <- data.frame(type, point)

ggplot(data, aes(x=type, y=point, fill="type")) +
  geom_bar(stat="identity") + 
  geom_text(data=data, aes(label=paste(type,"-",point)))

键入编辑以添加格式

这对你有用吗

library(scales)
ggplot(data, aes(x=type, y=point, fill="type")) +
geom_bar(stat="identity") + 
geom_text(data=data, aes(label=paste(type,"-",point))) + 
scale_y_log10(labels = comma) 
编辑2

如果你不想要逗号

ggplot(data, aes(x=type, y=point, fill="type")) +
geom_bar(stat="identity") + 
geom_text(data=data, aes(label=paste(type,"-",point))) + 
scale_y_log10(labels =  format_format(scientific = FALSE)) 

编辑以添加格式设置

这对你有用吗

library(scales)
ggplot(data, aes(x=type, y=point, fill="type")) +
geom_bar(stat="identity") + 
geom_text(data=data, aes(label=paste(type,"-",point))) + 
scale_y_log10(labels = comma) 
编辑2

如果你不想要逗号

ggplot(data, aes(x=type, y=point, fill="type")) +
geom_bar(stat="identity") + 
geom_text(data=data, aes(label=paste(type,"-",point))) + 
scale_y_log10(labels =  format_format(scientific = FALSE)) 

编辑以添加格式设置

这对你有用吗

library(scales)
ggplot(data, aes(x=type, y=point, fill="type")) +
geom_bar(stat="identity") + 
geom_text(data=data, aes(label=paste(type,"-",point))) + 
scale_y_log10(labels = comma) 
编辑2

如果你不想要逗号

ggplot(data, aes(x=type, y=point, fill="type")) +
geom_bar(stat="identity") + 
geom_text(data=data, aes(label=paste(type,"-",point))) + 
scale_y_log10(labels =  format_format(scientific = FALSE)) 

编辑以添加格式设置

这对你有用吗

library(scales)
ggplot(data, aes(x=type, y=point, fill="type")) +
geom_bar(stat="identity") + 
geom_text(data=data, aes(label=paste(type,"-",point))) + 
scale_y_log10(labels = comma) 
编辑2

如果你不想要逗号

ggplot(data, aes(x=type, y=point, fill="type")) +
geom_bar(stat="identity") + 
geom_text(data=data, aes(label=paste(type,"-",point))) + 
scale_y_log10(labels =  format_format(scientific = FALSE)) 

这很有效,很好,但在我的真实数据中,y轴变成了类似1e+07、1e+15的东西,如何将其更改为10000、50000等?有一个名为“scales”的库将提供帮助。我已经编辑了我的回答。有没有办法不改变y轴来做到这一点?改变y轴的比例就是我在图中看到的方式。我想你可以把数据本身的日志放在图例中。这很有效,很好,但在我的真实数据中,y轴变成了1e+07、1e+15,如何将它们更改为10000、50000等?有一个名为“scales”的库会有所帮助。我已经编辑了我的回答。有没有办法不改变y轴来做到这一点?改变y轴的比例就是我在图中看到的方式。我想你可以把数据本身的日志放在图例中。这很有效,很好,但在我的真实数据中,y轴变成了1e+07、1e+15,如何将它们更改为10000、50000等?有一个名为“scales”的库会有所帮助。我已经编辑了我的回答。有没有办法不改变y轴来做到这一点?改变y轴的比例就是我在图中看到的方式。我想你可以把数据本身的日志放在图例中。这很有效,很好,但在我的真实数据中,y轴变成了1e+07、1e+15,如何将它们更改为10000、50000等?有一个名为“scales”的库会有所帮助。我已经编辑了我的回答。有没有办法不改变y轴来做到这一点?改变y轴的比例就是我在图中看到的方式。我想你可以把数据的日志放在图例中。有没有办法不改变y轴?有没有办法不改变y轴?有没有办法不改变y轴?有没有办法不改变y轴?有没有办法不改变y轴?