8

我有一个如下所示的 data.frame:

> dat <- data.frame(Operation = c("Login", "Posted", "Deleted"), `Total Count` = c(5, 25, 40), check.names = FALSE)
> dat
  Operation Total Count
1     Login           5
2    Posted          25
3   Deleted          40

我想计算每个操作的百分比,例如,操作的百分比是多少Login。我希望得到如下结果:

  Operation Total Count Percentage
1     Login           5 0.07142857
2    Posted          25 0.35714286
3   Deleted          40 0.57142857

由于计数已经汇总,table()因此不起作用:

> table(dat$`Total Count`)

 5 25 40 
 1  1  1 
4

3 回答 3

19

调用您的专栏Total.Count而不是Total Count; 名称中的空格效果不佳。

如果您将数据放在名为的数据框中,例如my.df

my.df$Pct <- my.df$Total.Count / sum(my.df$Total.Count)
my.df
##   Operation Total.Count        Pct
## 1     Login           5 0.07142857
## 2    Posted          25 0.35714286
## 3   Deleted          40 0.57142857
于 2013-08-13T12:36:12.260 回答
17

您可以使用函数prop.table()来计算百分比(假设列名是TotalCount)。

df$percent<- prop.table(df$TotalCount)

df
  Operation TotalCount    percent
1     Login          5 0.07142857
2    Posted         25 0.35714286
3   Deleted         40 0.57142857
于 2013-08-13T12:39:34.190 回答
6

如果你想使用dplyr

dat %>% 
  mutate(Percent = TotalCount / sum(TotalCount))

请注意,我将列名更改为TotalCount不带空格。

于 2017-01-13T19:04:40.750 回答