r语言 - 有特殊条件的和

Question

我想知道一些信息，有这个特殊的条件可以组成一个组:

• 列萼片。长度取第一个值;
• 对以"花瓣"开头的列求和
• 不选择萼片。

我已经试过了，但是我不工作:

m <- iris

m %>% 
group_by(Species) %>% 
summarise(across(starts_with("Petal"), sum)) %>% 
summarise(F = first(Sepal.length))  # first for each Species

Answer 1

使用data.table:

M = data.table(iris)
M[, 
.(Petal.sum = sum(.SD), F = first(Sepal.Length)), 
by = Species,
.SDcols = patterns('^Petal')]
#       Species Petal.sum     F
#        <fctr>     <num> <num>
# 1:     setosa      85.4   5.1
# 2: versicolor     279.3   7.0
# 3:  virginica     378.9   6.3