我用R和ggplot绘制一些数据的散点图,除了y轴上的数字是计算机风格的指数格式,即4e+05、5e+05等.这对我来说是不可接受的,所以我想让它显示为500000、400000等等.获得适当的指数符号也是可以接受的.

绘图代码如下所示:

p <- ggplot(valids, aes(x=Test, y=Values)) +
  geom_point(position="jitter") +
  facet_grid(. ~ Facet) +
  scale_y_continuous(name="Fluorescent intensity/arbitrary units") +
  scale_x_discrete(name="Test repeat") +
  stat_summary(fun.ymin=median, fun.ymax=median, fun.y=median, geom="crossbar")

非常感谢您的帮助.

推荐答案

我还发现了另一种方法,可以在轴上给出适当的"x10(上标)5"符号.我把它贴在这里,希望对一些人有用.我从here中得到了代码,所以我不认为这是我的功劳,这应该归功于布莱恩·迪格斯.

fancy_scientific <- function(l) {
     # turn in to character string in scientific notation
     l <- format(l, scientific = TRUE)
     # quote the part before the exponent to keep all the digits
     l <- gsub("^(.*)e", "'\\1'e", l)
     # turn the 'e+' into plotmath format
     l <- gsub("e", "%*%10^", l)
     # return this as an expression
     parse(text=l)
}

然后你可以用它作为

ggplot(data=df, aes(x=x, y=y)) +
   geom_point() +
   scale_y_continuous(labels=fancy_scientific) 

R相关问答推荐

如果R上的不同时期之间的值发生了变化,则创建假人

在Julia中调用R函数

使用gggplot 2在R中重新调整面板和y轴文本大小

具有多个依赖变量/LHS的逻辑模型

更新合适的R mgcv::bam模型报告无效类型(关闭).'';错误

咕噜中的元素列表:map

多重RHS固定估计

如何在xyplot中 for each 面板打印R^2

ggplot2中的X轴显示数值,单位为百,而不是十

为什么横向页面会导致officeverse中的页码/节头/页脚出现问题?

如何自定义3D散点图的图例顺序?

如何在观测缺失的地方添加零

如何使用列表中多个列表中的第一条记录创建数据框

在嵌套列表中查找元素路径的最佳方法

根据列表中项目的名称合并数据框和列表

在多页PDF中以特定布局排列的绘图列表不起作用

在R中使用列表(作为tibble列)进行向量化?

如何为混合模型输出绘制不同的线型?

Ggplot2如何找到存储在对象中的残差和拟合值?

在ggplot2图表中通过端点连接点