R中矩阵列中的计数值
我正在运行一个彩票式草稿的模拟，它创建了一个可能订单的x#矩阵。列是选择（例如，第一列是选择1，第二列是选择2等）。我试图通过计算列来计算每个团队获得每个选择的次数。但是，使用R中矩阵列中的计数值,r,matrix,counting,R,Matrix,Counting,我正在运行一个彩票式草稿的模拟，它创建了一个可能订单的x#矩阵。列是选择（例如，第一列是选择1，第二列是选择2等）。我试图通过计算列来计算每个团队获得每个选择的次数。但是，使用table函数，我可以显示这些值，但不知道如何将它们存储到矩阵/向量中。下面是我目前拥有的代码的子集 tickets = c("A","B","B","C","C","C","D","D","D","D")#Population to draw df <- matrix(data=NA,nrow=100,ncol=4
tabletickets = c("A","B","B","C","C","C","D","D","D","D")#Population to draw
df <- matrix(data=NA,nrow=100,ncol=4)# row = #trials, col = # teams
for ( i in 1:100)
#block of code to run
{
order= c(sample(tickets,10,FALSE,))
temp = unique(order)
df[i,] = temp
} #draw all the tickets and delete duplicate values
one = table(df[,1]) #count number times each team gets 1st pick
one # display
A B C D
12 18 26 44
tickets=c（“A”、“B”、“B”、“c”、“c”、“c”、“D”、“D”、“D”、“D”）#要抽签的人数
df您可以按列拆分（因为它是一个矩阵，否则如果它是数据.frame
或list，只需sapply
），然后制表
sapply(split(df, col(df)), table)
# 1 2 3 4
# A 10 12 23 55
# B 19 27 32 22
# C 32 28 21 19
# D 39 33 24 4
应用（df，2，表）
，one%>%as.vector/as.matrix