在虹膜数据集上的R中实现Sumif功能

Question

给定的一行为我提供了R中具有三种虹膜数据集的向量。我想动态地找到与每个物种“ setosa”，“ versicolor”和“ virginica”相对应的sepal.length的总和。对其进行编码，并将三个和值表示为矢量。 请帮忙。

emp = unique(iris$Species)

Answer 1

dplyr应该能够完成此任务。 见下文：

library(tidyverse)

emp <- iris %>% 
  group_by(Species) %>% 
  summarise(Sepal.Length = sum(Sepal.Length))

Answer 2

使用dplyr为一列或所有列生成聚合应该很简单。

iris %>% 
 group_by(Species) %>% 
 summarise_all(sum)


 Species    Sepal.Length Sepal.Width Petal.Length Petal.Width
   <fctr>        <dbl>       <dbl>        <dbl>       <dbl>
  setosa        250.3       171.4         73.1        12.3
versicolor        296.8       138.5        213.0        66.3
virginica        329.4       148.7        277.6       101.3