R中的最小绝对偏差[重复]

Question

这个问题在这里已有答案：

• Grouping functions (tapply, by, aggregate) and the *apply family 9个答案

我有一个数据帧列表。每个数据框具有相同的行数和列数。

这是一个示例数据帧：

df
TIME  AMOUNT
20     456
30     345
15     122
12     267

这是预期的RESULT：我想数AMOUNT_NORM列在哪里

AMOUNT列中的每个值除以AMOUNT列中所有值的总和。

df
TIME  AMOUNT AMOUNT_NORM
20     456   0.38
30     345   0.29
15     122   0.1
12     267   0.22

Answer 1

以下应该做你想要的

library(tidyverse)
df %>% mutate(AMOUNT_NORM = AMOUNT/SUM(AMOUNT))

编辑：没有读取数据帧列表位。在这种情况下，你只需：

lapply(your_df_list, function(x) {
   x %>% mutate(AMOUNT_NORM = AMOUNT/SUM(AMOUNT))
})