在R

Question

我在R中确实有一个脚本，可以为我提供足球比赛的预测。 它使用泊松分布公式来查找最有可能在比赛中发生的结果，然后对它们进行研究，就可以发现谁是赢家还是输家（如果将1-0,2-0,2-1的概率相加， ，等等。。。你找到了赢得team1的机会，依此类推...）

我需要确定的是泊松分布表中的两个最高值及其相对的“父亲”。

我的意思是，正如您在图片中所看到的，我应该标识0.08652817和0.07346077以及它们的相对“父亲”（3-2和4-2）

因此脚本应提供类似的内容

1°: 0,0865 (3-2)
2°: 0,073 (4-2)

我尝试使用

max(match, na.rm=T)

但显然它只显示0,0865，而不是它的“父亲”（3-2） 对于第二高的值，我也确实需要。

我该怎么办？

Answer 1

使用软件包dplyr和purrr：

m <- matrix(ncol=7, nrow=7, runif(49)) #Fake data that look like your probabilities
d <- expand.grid(home=1:7, away=1:7) #data.frame with all possible outcomes
d$prob <- purrr::pmap_dbl(d, function(home, away){m[home,away]}) 
dplyr::top_n(d, 3, prob)