R中没有出现Hist答案

【问题标题】：No appear Hist in RR中没有出现Hist
【发布时间】：2016-10-05 09:53:31
【问题描述】：

library(downloader)
url <- "https://raw.githubusercontent.com/genomicsclass/dagdata/master/inst/extdata/femaleControlsPopulation.csv"
filename <- "femaleControlsPopulation"
download(url, destfile=filename)
dat <- read.csv(filename)
x <- unlist( read.csv(filename))
set.seed(1)
n <- 10000
averages5 <- vector("numeric", n)
for (i in 1:n){
x <- sample(x,5)
averages5[i] <- mean(x)
}
hist(averages5)
mean(abs(averages5-mean(x))>1)

我遇到的问题是空历史，平均值为 0 .....请我需要帮助

【问题讨论】：

dat <- read.table(file=url, header=TRUE); x <- dat$Bodyweight 稍后你将覆盖x per (x <- sample(x,5)) !!!
最好n <- 10000; averages5 <- replicate(n, mean(sample(x,5))); hist(averages5)
感谢您的回答，但是因为我在这方面非常新，我必须在其中插入此代码....我的意思是在这行。我尝试在已经存在的 dat 之后插入并继续不出现任何内容....

标签： r histogram

【解决方案1】：

这会做你想做的事：

url <- "https://raw.githubusercontent.com/genomicsclass/dagdata/master/inst/extdata/femaleControlsPopulation.csv"
dat <- read.table(file=url, header=TRUE)
x <- dat$Bodyweight
n <- 10000
averages5 <- replicate(n, mean(sample(x,5)))
hist(averages5)

【讨论】：