坐标ggplot2中的平方变换

Question

我有数据，我认为y ^ 2〜x。 因此，我想将y绘制为x的函数，并对y进行缩放。

library(XML)
html <- read_html("https://www.sec.gov/Archives/edgar/data/1011290/000114036105007405/body.htm")
doc.html = htmlTreeParse(html, useInternal = TRUE)
doc.text = unlist(xpathApply(doc.html, '//div', xmlValue))

N <- 100 ggplot(data_frame(x = runif(N), y = 20 * sqrt(x) + rnorm(N)), aes(x, y)) + geom_point() ??

Answer 1

您需要使用+ scale_y_square进行新的转换，并将其与scales::trans_new一起使用：

coord_trans