Minus log-10 transformation

Minus log-10 transformation

mlog10_trans()

Examples

require(ggplot2)
#> Loading required package: ggplot2
df <- data.frame(y = runif(1000))

ggplot(df, aes(sample = y)) +
  stat_qq(distribution = stats::qunif) +
  scale_y_continuous(trans = "mlog10") +
  scale_x_continuous(trans = "mlog10") +
  geom_abline(intercept = 0, slope = 1)