r - 如何按总和标准化数据帧值(获取百分比)

Question

我有以下数据框:

> str(df)
 'data.frame':  52 obs. of  3 variables:
  $ n    : int  10 20 64 108 128 144 256 320 404 512 ...
  $ step : Factor w/ 4 levels "Step1","Step2",..: 1 1 1 1 1 1 1 1 1 1 ...
  $ value: num  0.00178 0.000956 0.001613 0.001998 0.002975 ...

现在我想标准化/划分 df$value通过属于相同 n 的值的总和，即这样我就可以得到百分比。这不起作用，但显示了我想要实现的目标。在这里，我将属于相同 n 的值的总和预先计算到 dfa 中，并尝试除以原始 df$value按总计 dfa$value与匹配 n :

dfa <- aggregate(x=df$value, by=list(df$n), FUN=sum)
names(dfa)[names(dfa)=="Group.1"] <- "n"           
names(dfa)[names(dfa)=="x"] <- "value"
df$value <- df$value / dfa[dfa$n==df$n,][[1]]

Answer 1

我认为以下工作，使用包data.table .

df <- data.table(df)
df[,value2 := value/sum(value),by=n]