Добавьте нормальную линию распределения в гистограмме

Я встретил странную проблему, которую я не могу понять полностью. Я должен добавить нормальную линию распределения на гистограмме. Я ввожу код каждого шага, но после ввода функции линии ответа нет. Я не знаю, что случилось. Надеюсь, кто-нибудь поможет мне! Мой код:

grades<-mydata$Exam1
hist(grades,breaks=20,freq=T) #A correct histogram comes out.
mean(grades,na.rm=T) #there is NA in the column so I remove it when calculating mean.
[1] 75.15278

sd(grades,na.rm=T)  
[1] 16.97443 

x<-seq(0,100,0.01) 
y<-dnorm(x,mean=mean(grades,na.rm=T),sd=sd(grades,na.rm=T))
lines(x,y)#and there's no response!no line showed up!

Что-то не так с моим кодом? Спасибо за вашу помощь!

2 ответа

Решение

Я предполагаю, что это код R - тогда попробуйте это:

grades <- mydata$Exam1
hist(grades, prob=TRUE)
curve(dnorm(x, mean=mean(grades), sd=sd(grades)), add=TRUE)

Обратите внимание, что если вы сравниваете нормальное распределение с гистограммой, вы, вероятно, хотите, чтобы гистограмма отображала вероятности, а не частоты.

Ты хочешь hist(*, freq=FALSE)не freq=TRUE,

Другие вопросы по тегам