Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/70.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R 样本最大值指数的分布 我抽取10个独立的二项分布随机变量席,然后找到最大的指数。我认为每一个都有可能是最大值,但是柱状图显示了一个不同的模式,下面是_R - Fatal编程技术网

R 样本最大值指数的分布 我抽取10个独立的二项分布随机变量席,然后找到最大的指数。我认为每一个都有可能是最大值,但是柱状图显示了一个不同的模式,下面是

R 样本最大值指数的分布 我抽取10个独立的二项分布随机变量席,然后找到最大的指数。我认为每一个都有可能是最大值,但是柱状图显示了一个不同的模式,下面是,r,R,我在R中使用了以下代码: n=10^5 Which_maximum = function(x){ sample1 = rbinom(10,5,0.5) return(which.max(sample1)) } repeat1 = sapply(1:n,Which_maximum) hist(repeat1) 这看起来很奇怪,谢谢你的建议 问题在于哪个.max决定了数值向量的第一个最大值的位置。 例如,请尝试以下代码: set.seed(23456) x <- rbinom(10

我在R中使用了以下代码:

n=10^5

Which_maximum = function(x){
  sample1 = rbinom(10,5,0.5)
  return(which.max(sample1))
}
repeat1 = sapply(1:n,Which_maximum)
hist(repeat1)

这看起来很奇怪,谢谢你的建议

问题在于
哪个.max
决定了数值向量的第一个最大值的位置。 例如,请尝试以下代码:

set.seed(23456)
x <- rbinom(10,5,0.5)
print(x)
[1] 2 3 3 4 3 2 3 4 4 3
which.max(x)
[1] 4

这似乎不是一个实际的编码问题?你的问题到底是什么?对于连续分布,是的,它们的可能性相同,但是
rbinom
是一个离散分布。所以有联系
which.max
只返回第一个索引。
library(nnet)
n <- 10^5
which_maximum <- function(x) {
  sample1 <- rbinom(10,5,0.5)
  return(which.is.max(sample1))
}
repeat1 <- sapply(1:n,which_maximum)
barplot(table(repeat1))