计算3个变量data.frame的2个变量的平均值

Question

我有一个颜色，质量和价格的数据框，我想比较颜色如何改变对质量的感知 我需要得到一张表格，其中包含每种颜色和质量组合的平均价格 我目前正在尝试聚合，但我似乎找不到合适的组合。

aggregate(price ~ color, list(Quality = D$quality), data=D, FUN=mean);

输入：
Quality | Color | Price Good | Red | 4500 Excellent | Green | 5000 Bad | Blue | 420 ...... 输出：平均价格表
. Red . Blue . Green Excellent . 4520 . 4200 . 3500 Good . 3950 . 3722 . 3021 Bad . 1523 . 1232 . 900

Answer 1

Yuo可以尝试：

library(tidyverse)
mtcars %>% 
  group_by(cyl, gear) %>% 
  summarise(M_mpg=mean(mpg)) %>% 
  spread(cyl, M_mpg)