Rでデータフレームの行を足し算したい

Question

問題は題の通りです

自分が思いつく手法は以下です。

コード
df <- as.data.frame( matrix(1:15, nrow = 5, ncol = 3))#データフレームの作成
sumCol<-list()#行の合計を入れる

for(i in 1:3){
 sumCol[i]<-0
 for(j in 1:5){
   sumCol[i] <- sumCol[i] + df[i,j]
 }
}

もっと簡単な方法を知っているかたお願いいたします。

Comments

[KojiDoi]

表題は「データフレーム」、コードはマトリックス。どちらを処理したいんですか?

[oika77]

あ、ごめんなさい。コードをミスりました。データフレームです。

[KojiDoi]

ミスったと気がついたのなら修正してください。読んでる方はどれを信じたらいいのか分かりません。

[oika77]

わかりました。

Answer 1

apply系の関数を使うのが常道でしょう。

> df <- as.data.frame( matrix(1:15, nrow = 5, ncol = 3))
> sumCol <- lapply(df, sum)
> sumCol
$V1
[1] 15

$V2
[1] 40

$V3
[1] 65

Comments

[oika77]

ありがとうございます、ただ質問内容がよくなかったかもしれないです。すみません。
列ごとで足すのではなく、各行ごとで足したいのですが、

[KojiDoi]

lapply(as.data.frame(t(df)), sum)

[oika77]

ありがとうございます。