如何从频率计算概率

Question

我将这个月储存为：

count.data <- count.month

x    freq
Jan   7
Feb   23
Mar   86
Apr   281

现在我想找出X的概率。

示例：

简属性的概率:7/ (7+23+86+281) #总freq

Answer 1

你可以试试这个。假设您的dat.frame名为dat

dat$prob <- dat$freq/sum(dat$freq)
dat
#x freq       prob
#1 Jan    7 0.01763224
#2 Feb   23 0.05793451
#3 Mar   86 0.21662469
#4 Apr  281 0.70780856

Answer 2

或使用dplyr

 library(dplyr)
 df %>% mutate(prob = freq / sum(freq))
    x freq       prob
1 Jan    7 0.01763224
2 Feb   23 0.05793451
3 Mar   86 0.21662469
4 Apr  281 0.70780856

Answer 3

df$prob <- prop.table(df$freq)
df

输出：

    x freq       prob
1 Jan    7 0.01763224
2 Feb   23 0.05793451
3 Mar   86 0.21662469
4 Apr  281 0.70780856

如果您想访问特定的月份：

 prop.table(df$freq)[df$x == "Feb"] 
[1] 0.05793451

sqldf包：

library(sqldf)
sqldf('SELECT x, freq, (freq*1.0)/(SELECT SUM(freq) FROM df) AS prob
      FROM df')