相关疑难解决方法(0)

我绘制以下内容:

library(ggplot2)    

carrots <- data.frame(length = rnorm(500000, 10000, 10000))
cukes <- data.frame(length = rnorm(50000, 10000, 20000))
carrots$veg <- 'carrot'
cukes$veg <- 'cuke'
vegLengths <- rbind(carrots, cukes)

ggplot(vegLengths, aes(length, fill = veg)) +
 geom_density(alpha = 0.2)

现在说我只是想绘制之间的区域x=-5000来5000,而不是整个范围.

我怎样才能做到这一点？

在ggplot图表中，我想在副轴上重新缩放y，以使最小y值等于0，最大y值等于100。

mydata <- data.frame(x = c(0, 1, 2, 3, 4, 5), 
                     y = c(20, 55, 69, 72, 73, 72))
break2 <- seq(0, 100, 10)

library(ggplot2)

ggplot(data = mydata, aes(x = x, y = y)) +
  ylim(20, 73) +
  geom_point(shape = 21, size = 5, color = "black", fill = "orange", stroke = 1) +
  scale_x_continuous(name = 'Number of Contacts') +
  scale_y_continuous(name = "Remembered (%)", 
                     sec.axis = sec_axis(trans = ~ (.-min(.)) * 100 / (max(.) - min(.)),
                                         name = "Remembered (Index)", …