我想将数据框的分辨率从非常不规则的 x 比例更改为具有规则距离的比例。这是我尝试过的:library(tidyverse)x <- sort(round(runif(20, 0, 10), 2))y &...
我想将数据框的分辨率从非常不规则的 x 比例更改为具有规则距离的比例。这是我尝试过的:
library(tidyverse)
x <- sort(round(runif(20, 0, 10), 2))
y <- round(runif(20, 0, 1), 2)
df <- data.frame(x = x, y = y)
newx <- seq(round(min(x), 1), round(max(x), 1), step = 1)
dfnew <- df %>%
mutate(group = cut(x, breaks = newx, labels = FALSE)) %>%
group_by(group) %>%
reframe(x = newx, yMean = mean(y)) %>%
ungroup() %>%
select(-group)
我得到的结果是 90,而不是预期的 ~10 个观察值(步长为 1)。有什么想法吗?