我使用下面的代码在r：
中生成数据帧set.seed(456)
data_5 <- data.frame(id=factor(rep(c("A","B","c"),each=214)),
people=c(floor(runif(214,min=10,max=800)),
floor(runif(214,min=20,max=810)),
floor(runif(214,min=30,max=820))))
Q1：我想添加一个新列，其中显示来自列中每个值的结果＆＃34; people＆＃34;除以它所属的总值（也就是说，A类中的每个值除以A类的总值，B类相同）
Q2：想要添加一个新列，它应该显示每个步骤的类别A，B，C的平均值（总计214步），我知道它将生成一个包含214个值的列3次....但它可能不会影响我的猜测。
问题3：我想分别计算A类，B类，C类的累积值
尝试通过生成每个列并集成它来获得这些结果，但只是寻找更好的方法来优化它..
干杯