如何将列中的值除以最后一个单元格中的值?

How do I Divide Values in a Column by the Value in the Last Cell?

所以我在 R 中工作,我正在尝试编写一个函数。但是我遇到了障碍。

我有以下 df:

Number Freq CumFreq
00.1 2 2
00.5 1 3

...等等。

我想要它,以便 df$CumFreq 中的数字除以 df$CumFreq 中的最后一个单元格,并创建一个新列。例如:

Number Freq CumFreq CF/n
00.1 2 2 0.667
00.5 1 3 1

有什么关于如何写出来的建议吗?

你可以试试

df$CFn <- with(df,CumFreq/sum(Freq))

df$CFn <- with(df,CumFreq/tail(CumFreq,1))

这是一个使用 mutatedplyr 方法:

df %>% mutate("CF/n" = CumFreq/sum(Freq))

  Number Freq CumFreq      CF/n
1   00.1    2       2 0.6666667
2   00.5    1       3 1.0000000