データフレーム内のリストの計算を行う

Question

私は、列g$zが列f$zからすべてのグループごとの値のリストが含まれているように、新しいデータフレームgにデータフレームfを集約したいと思います。一見、これは動作しているようだ：

f = data.frame(x=c(1, 1, 1, 2), y=c(4, 4, 5, 6), z=c(11, 12, 13, 14)) 
g = aggregate(z ~ x + y, f, c) 

    x y  z 
1 1 4 11, 12 
2 1 5  13 
3 2 6  14 

今私は、データフレーム内のすべての行の列cにリストに異なる計算を行うと、同じデータフレームに新しい列に結果を入れたいです。しかし、これは動作しません！

g$m = sum(g$z) 
g$n = g$z + 1 

Error in sum(g$z) : invalid 'type' (list) of argument 

上記のようなデータフレームセル内でリストを操作するにはどうすればよいですか？それともこれは単にRのような/不可能なのでしょうか？もしそうなら、正しいアプローチは何ですか？

UPDATE

私の基本的な目標は、元のデータセットにXとYのすべての組み合わせでグループ単位の演算の多くを行うことです。 Rの一般的な選択肢は何ですか？

1. applyを使用してください。プロ：1つのテーブルにすべて。 Con：複雑なテーブル構造。sumなどを使用できません。
2. （y）、for（x）、サブセット。プロ：直接sumなどできます。 Con：たくさんのコードがあり、遅くなる可能性があります。
3. 元のテーブルと集計テーブルで並行して作業します。プロ：できますsum等コン：データの複製。
4. 他のオプションはありますか？

Answer 1

合計とベクトル化は、あなたは、単にタスクのためsapplyとlapplyを使用することができ、リストには適用されません。

g$m <- sapply(g$z, sum) 
g$n <- lapply(g$z, `+`, 1) 

g 
# x y  z m  n 
#1 1 4 11, 12 23 12, 13 
#2 1 5  13 13  14 
#3 2 6  14 14  15 

それともtidyverseを使用する場合は、あなたが使用することができますmap + mutate ：

g %>% mutate(m = map_dbl(z, sum), n = map(z, ~.x + 1)) 

# x y  z m  n 
#1 1 4 11, 12 23 12, 13 
#2 1 5  13 13  14 
#3 2 6  14 14  15