Как рассчитать доверительный интервал пропорции с использованием R.
Доверительный интервал пропорции в настоящее время является одним из важных аспектов использования статистики в повседневной жизни, фактически почти во всех крупных компаниях используется ее, особенно те компании с искусственными интеллектуальными и технологиями. Давайте посмотрим на некоторые вопросы и посмотрим, как R мог бы помочь, чтобы решить это.
Вопрос 1
Каково критическое значение, если и доверительный интервал составляет 99%? 1.96 2.32 2.63 1.68 2.58
Вопрос 2
Вне 1500 студентов в хостеле Idia 1000 имеют аллергию на зикитов, так часто избегая маршрута Зика Холла. Половина оставшейся пропорции также не будет использовать маршрут Indy. Получить 95% доверительный интервал истинной доли населения студентов, которые будут использовать маршрут Zik? [0.6353, 0.6981] [0.3019, 0.3647] [0.8145, 0.8522] [0.3095, 0.3572] [0.8085, 0.8582]
Вопрос3
В последнем классе пересмотра 0,7 активно участвовали. Какова стандартная ошибка, если население учащихся было 2500? 0.038 0.21 0.029 0.458 Нет ответа
Вопрос4
Если мы используем процент достоверности ______, то наша погрешность будет _______. [маленький, большой] [маленький, маленький] [большой, маленький] [Средний, большой] [Большой, большой]
Вопрос5
Вне 1500 студентов в хостеле Idia 1000 имеют аллергию на зикитов, так часто избегая маршрута Зика Холла. Половина оставшейся пропорции также не будет использовать маршрут Indy. Получить 95% доверительный интервал истинной доли населения студентов, которые не использовали бы маршрут Indy? [0.1478, 0.186] [0.1418, 0.1915] [0.1505, 0.1828] [0.8145, 0.8522] [0.8085, 0.8582]
Вопрос 6
Исследование обнаруживает, что из 2305 Awoites, 1383 Awoites дружит с катангитами. Что такое погрешность, с достоверным интервалом 95%? 4% 2% 4.5% 2.5% 3%
Вопрос7
Каково критическое значение, если и доверительный интервал составляет 99%? 2.54 2.63 2.86 1.96 2.58
Вопрос8
Учитывая, что МЭЭ составляет ± 4,5%. При 95% доверительный интервал и стандартное отклонение 2, каков размер выборки? 0.7588 76 7588 7588.34 75.88
Вопрос9
Вне 1500 студентов в хостеле Idia 1000 имеют аллергию на зикитов, так часто избегая маршрута Зика Холла. Половина оставшейся пропорции также не будет использовать маршрут Indy. Получить 95% доверительный интервал истинной доли населения студентов, которые не использовали бы Zik Route? [0.6353, 0.6981] [0.3019, 0.3647] [0.6428, 0.6905] [0.8145, 0.8522] [0.8085, 0.8582]
Вопрос10
Исследование обнаруживает, что 0,6 из каждого Auite дружит с зикитами. Если Мо составляет 2%. Сколько вкусов дружит с зикитами? 2304.96 2305 23 23.05
Решение во -первых, я создам робота, который будет продолжать решение, которые выглядят одинаково, поэтому коды:
# for confidence Interval when given a proportion,number of population and the confidence level
confidenceInterval=function(p,n,confidenceLevel){
pn=p/n
q=1-pn
alpha=1-confidenceLevel
me=abs(qnorm(alpha/2))*sqrt(pn*q/n)
CI=p+me
CI2=p-me
print(CI)
print(CI2)
}
# To calculate the confidence Interval proportions when proportion,number of population and the confidence level are given
confprops=function(proportionSize,populationSize,confidenceLevel){
pproportion=proportionSize/populationSize
qproportion=1-pproportion
alpha=1-confidenceLevel
marginerror=abs(qnorm(alpha/2))*sqrt(pproportion*qproportion/n)
CI=pproportion+marginerror
CI2=pproportion-marginerror
print(CI)
CI2
}
# To Calculate the margin error when given proportion size,poputlation size and confidence level
marginOfError=function(proportionSize,populationSize,confidenceLevel){
p=proportionSize/populationSize
q=1-p
alpha=1-confidenceLevel
zscore=abs(qnorm(alpha/2))
marginOfError=zscore*sqrt(p*q/populationSize)
marginOfError
}
To calculate the population size when margin error, confidence level and standard deviation is given.
size=function(marginOfError,confidenceLevel,standardDeviation){
alpha=1-confidenceLevel
zscore=abs(qnorm(alpha/2))
size=(zscore*standardDeviation/marginOfError)^2
size
}
Скопируйте код выше и вставьте. Затем вы только что создали робота для большинства вопросов, которые нам необходимы, чтобы решить эту тему.
по вопросу 1
Чтобы рассчитать критическое значение, мы рассчитываем оценку Z полуалфа. где коды уровней уверенности >>
confidenceLevel=99/100 alpha=1-confidenceLevel half_alpha=alpha/2 criticalValue=abs(qnorm(half_alpha)) print(criticalValue)
Результат >>
> confidenceLevel=99/100 > alpha=1-confidenceLevel > half_alpha=alpha/2 > criticalValue=abs(qnorm(half_alpha)) > print(criticalValue) [1] 2.575829
Вопрос 2,5,9 Обратите внимание, что количество студентов, которое будет использовать маршрут ZIK, составляет 500. S0 ,,. 95. Поэтому мы используем наш робот и называем функцию. Также те, которые не будут использовать Indy в вопросе5, 250. Потому что половина из 500 — 250. Итак ,, 95. Вопрос9 также похож на те, которые не будут использовать ZIK, — это 1000. Итак ,, 95 кодов >>
# To calculate the confidence Interval proportions when proportion,number of population and the confidence level are given
confprops=function(proportionSize,populationSize,confidenceLevel){
pproportion=proportionSize/populationSize
qproportion=1-pproportion
alpha=1-confidenceLevel
marginerror=abs(qnorm(alpha/2))*sqrt(pproportion*qproportion/populationSize)
CI=pproportion+marginerror
CI2=pproportion-marginerror
print(CI)
CI2
}
confprops(500,1500,0.95)
confprops(250,1500,0.95)
confprops(1000,1500,0.95)
Результат >>
> > confprops=function(proportionSize,populationSize,confidenceLevel){
+ pproportion=proportionSize/populationSize
+ qproportion=1-pproportion
+ alpha=1-confidenceLevel
+ marginerror=abs(qnorm(alpha/2))*sqrt(pproportion*qproportion/populationSize)
+ CI=pproportion+marginerror
+ CI2=pproportion-marginerror
+ print(CI)
+ CI2
+ }
> confprops(500,1500,0.95)
[1] 0.3571893
[1] 0.3094774
> confprops(250,1500,0.95)
[1] 0.1855264
[1] 0.1478069
> confprops(1000,1500,0.95)
[1] 0.6905226
[1] 0.6428107
Вопрос3. Для вопроса 3 нам уже дают пропорцию и размер населения. SO/SQRT (N) или квадратный корень {P (1-P)/N}. Теперь наш.7 и. Итак, мы решаем с кодами кодов >>>
p=0.7 q=1-p n=2500 standardError=sqrt(p*q/n) print(standardError)
Результат >> |
p=0.7 > q=1-p > n=2500 > standardError=sqrt(p*q/n) > print(standardError) [1] 0.009165151
Вопрос4
Это очень прямо, так как мы все знали, что чем выше уровень уверенности, тем больше необходим край ошибки. Вопрос 6 Здесь нам нужна погрешность ошибок, просто скопируйте код, который я написал для него как робота. и вызовите функцию, заменяющую соответствующее значение.95
size,poputlation size and confidence level
marginOfError=function(proportionSize,populationSize,confidenceLevel){
p=proportionSize/populationSize
q=1-p
alpha=1-confidenceLevel
zscore=abs(qnorm(alpha/2))
marginOfError=zscore*sqrt(p*q/populationSize)
marginOfError
}
marginOfError(1383,2305,0.95)
Результат >>
> marginOfError=function(proportionSize,populationSize,confidenceLevel){
+ p=proportionSize/populationSize
+ q=1-p
+ alpha=1-confidenceLevel
+ zscore=abs(qnorm(alpha/2))
+ marginOfError=zscore*sqrt(p*q/populationSize)
+ marginOfError
+ }
> marginOfError(1383,2305,0.95)
[1] 0.01999946
Примечание: если вы приблизите это, вы получите 0,02. что такое же, как 2%.
Вопрос8. Во -первых, мы делаем n предметом формулы. это дает нам размер (n) = (zscore*standarddeviation/marginoferror)^2. Вот как мы делаем робота, используя важные параметры. Теперь давайте посмотрим коды, когда
size=function(marginOfError,confidenceLevel,standardDeviation){
alpha=1-confidenceLevel
zscore=abs(qnorm(alpha/2))
size=(zscore*standardDeviation/marginOfError)^2
size
}
size(0.045,0.95,2)
Результаты >>
> size=function(marginOfError,confidenceLevel,standardDeviation){
+ alpha=1-confidenceLevel
+ zscore=abs(qnorm(alpha/2))
+ size=(zscore*standardDeviation/marginOfError)^2
+ size
+ }
> size(0.045,0.95,2)
[1] 7588.067
Вопрос10. Из вопроса6 ясно, что есть 2305 из Awoite. так , 0,02. Так как уверенность+ или — я Итак, cofidnce.6+0,02,62 Количество студентов, дружелюбных с.62*2305 = 1429 Поскольку нам дают долю, мы умножаем общую численность населения, чтобы получить фактическое значение. Так что на самом деле Нет ответа Но мы выбираем что -то, что может быть ответом. Надеюсь, вы найдете эту статью полезной ?? Это все еще твой мальчик, Максвизард!. Вы можете поболтать со мной на WhatsApp 07045225718 Если у вас есть какие -либо сомнения или исправление по этому поводу. Наслаждайтесь кодированием!
Оригинал: «https://dev.to/maxwizard01/how-to-calculate-confidence-interval-using-r-e6g»