对特定列的行求和然后除以总和
summing rows of specific columns then dividing by the sum
我只是想对一行中的某些列求和，然后将行内的单元格除以该总和。我想在每一行都这样做。例如，如果我们采用数据集：
lose
draw
win
goals
7
2
5
12
1
2
13
21
我们将忽略进球数，并对行的赢、输和绘制列求和，然后将每个单元格除以我们获得的总和值：
lose
draw
win
goals
7/14
2/14
5/14
12
1/16
2 /16
13/16
21
我尝试使用的代码是：
Df_new <-t(apply(Df, select = c(lose, draw, win), function(x) x/sum(x)))
但是，我收到错误消息：
match.fun(FUN) 中的错误：缺少参数“FUN”，没有默认值
google 搜索显示我缺少边距。但是我认为我已经通过选择列来指定了这一点。
谢谢
尝试这种方式来指定列（通过sub-setting Df），然后将边距表示为1
Df_new = t(apply(Df[,c(1:3)], 1, \(x) x/sum(x)))
lose draw win
[1,] 0.5000 0.1428571 0.3571429
[2,] 0.0625 0.1250000 0.8125000
我只是想对一行中的某些列求和，然后将行内的单元格除以该总和。我想在每一行都这样做。例如，如果我们采用数据集：
| lose | draw | win | goals |
|---|---|---|---|
| 7 | 2 | 5 | 12 |
| 1 | 2 | 13 | 21 |
我们将忽略进球数，并对行的赢、输和绘制列求和，然后将每个单元格除以我们获得的总和值：
| lose | draw | win | goals |
|---|---|---|---|
| 7/14 | 2/14 | 5/14 | 12 |
| 1/16 | 2 /16 | 13/16 | 21 |
我尝试使用的代码是：
Df_new <-t(apply(Df, select = c(lose, draw, win), function(x) x/sum(x)))
但是，我收到错误消息：
match.fun(FUN) 中的错误：缺少参数“FUN”，没有默认值
google 搜索显示我缺少边距。但是我认为我已经通过选择列来指定了这一点。
谢谢
尝试这种方式来指定列（通过sub-setting Df），然后将边距表示为1
Df_new = t(apply(Df[,c(1:3)], 1, \(x) x/sum(x)))
lose draw win
[1,] 0.5000 0.1428571 0.3571429
[2,] 0.0625 0.1250000 0.8125000