從矢量採樣並保持零頻率

Question

我想從矢量中進行替換採樣。例如：

set.seed(11) 
x = as.data.frame(table(sample(c("one", "two", "three"), 5, replace = T, prob = c(0.05, 0.45, 0.5)))) 

回報：

x 

Var1 Freq 
1 three 4 
2 two 1 

有沒有辦法得到一個數據幀將包含 「一個」 頻率，以及，其中值是0：

Var1 Freq 

1 three 4 
2 two 1 
3 one 0 

Answer 1

你可以定義一個因子和樣本：

f_sa <- factor(c("one", "two", "three")) 
x <- as.data.frame(table(sample(f_sa, 5, replace = T, prob = c(0.05, 0.45, 0.5)))) 

x 
# Var1 Freq 
# 1 one 0 
# 2 three 4 
# 3 two 1 

如果你想讓它通過頻率，而不是級別進行排序：

x[order(x$Freq, decreasing=T),] 

# Var1 Freq 
#2 three 4 
#3 two 1 
#1 one 0