我有这个例子EditText dynamically
:
data.frame
我希望有效地汇总其set.seed(1)
df <- data.frame(id = letters[1:10], a = sample(100,10), b = sample(100,10),
aggregate_with = c(rep(NA,6),"y","b","b","e"), aggregate_order = c(rep(NA,6),"a,b","a,b","b,a","a,b"))
> df
id a b aggregate_with aggregate_order
1 a 27 21 <NA> <NA>
2 b 37 18 <NA> <NA>
3 c 57 68 <NA> <NA>
4 d 89 38 <NA> <NA>
5 e 20 74 <NA> <NA>
6 f 86 48 <NA> <NA>
7 g 97 98 y a,b
8 h 62 93 b a,b
9 i 58 35 b b,a
10 j 6 71 e a,b
值与其他行的aggregate_with
值相匹配的行(行的id
值与其不匹配&#39 ; s自己的aggregate_with
值)我想要应用的功能是根据id
列中的分配对其a
和b
值求和。聚合行的aggregate_order
,id
和aggregate_with
应保留aggregate_order
列指示的行的值。
以下是aggregate_with
的结果:
data.frame
如您所见,> aggregated.df
id a b aggregate_with aggregate_order
1 a 27 21 <NA> <NA>
2 b 134 169 <NA> <NA>
3 c 57 68 <NA> <NA>
4 d 89 38 <NA> <NA>
5 e 26 145 <NA> <NA>
6 f 86 48 <NA> <NA>
7 g 97 98 y a,b
中第2行的a
列是第2行的aggregated.df
,a
和a
列的总和, 8,分别为b
中的9,反之为df
。 b
的第{5}行和a
的{{1}}和b
列aggregated.df
和a
的第{5}行b
和df
。虽然df
中的第7行的值为aggregate_with
,但它df
中不存在,因此未汇总。
答案 0 :(得分:2)
我正在使用fun ViewManager.myFrameLayout
库。
data.table