R တွင် point ခန့်မှန်းခြေများကို တွက်ချက်နည်း (ဥပမာများဖြင့်)


အမှတ်ခန့်မှန်းချက်သည် လူဦးရေကန့်သတ်ချက်တစ်ခုကို ခန့်မှန်းရန်အတွက် နမူနာဒေတာမှ ကျွန်ုပ်တို့တွက်ချက်သည့် နံပါတ်တစ်ခုကို ကိုယ်စားပြုသည်။ ဤသည်မှာ လူဦးရေအစစ်အမှန် မည်ကဲ့သို့ဖြစ်နိုင်သည်ကို ကျွန်ုပ်တို့၏ ဖြစ်နိုင်ခြေအကောင်းဆုံး ခန့်မှန်းချက်ဖြစ်သည်။

အောက်ပါဇယားသည် လူဦးရေကန့်သတ်ချက်များကို ခန့်မှန်းရန် ကျွန်ုပ်တို့အသုံးပြုသည့် ခန့်မှန်းချက်အမှတ်ကို ပြသည်-

အတိုင်းထက်အလွန် လူဦးရေကန့်သတ်ချက် အမှတ်ခန့်မှန်းချက်
ဆိုလိုတာ μ (လူဦးရေ ပျမ်းမျှ) x (နမူနာပျမ်းမျှ)
အချိုးအစား π (လူဦးရေအချိုးအစား) p (နမူနာအချိုး)

အောက်ဖော်ပြပါ ဥပမာများသည် လူဦးရေ၏ပျမ်းမျှနှင့် လူဦးရေအချိုးအတွက် အမှတ်ခန့်မှန်းချက်များကို တွက်ချက်ပုံကို သရုပ်ပြသည်။

ဥပမာ 1- လူဦးရေ၏ ခန့်မှန်းချက်ကို ဆိုလိုသည်။

အချို့သော နယ်ပယ်တစ်ခုရှိ အပင်အမျိုးအစားတစ်ခု၏ ပျမ်းမျှအမြင့် (လက်မ) ကို ခန့်မှန်းလိုသည်ဆိုကြပါစို့။ ကျွန်ုပ်တို့သည် အပင် ၁၃ ပင်၏ ရိုးရှင်းသော ကျပန်းနမူနာကို စုဆောင်းပြီး အပင်တစ်ခုစီ၏ အမြင့်ကို တိုင်းတာသည်။

အောက်ပါကုဒ်သည် နမူနာ ဆိုလိုချက်ကို တွက်ချက်နည်းကို ပြသည်-

 #define data
data <- c(8, 8, 9, 12, 13, 13, 14, 15, 19, 22, 23, 23, 24)

#calculate sample mean
mean(data, na. rm = TRUE )

[1] 15.61538

နမူနာပျမ်းမျှသည် 15.6 လက်မဖြစ်သည်။ ဤသည်မှာ ကျွန်ုပ်တို့၏ လူဦးရေ ခန့်မှန်းချက်ကို ဆိုလိုခြင်း ဖြစ်သည်။

လူဦးရေအတွက်ဆိုလိုရင်း 95% ယုံကြည်မှုကြားကာလကို တွက်ချက်ရန် အောက်ပါကုဒ်ကိုလည်း အသုံးပြုနိုင်ပါသည်။

 #find sample size, sample mean, and sample standard deviation
n <- length(data)
xbar <- mean(data, na. rm = TRUE )
s <- sd(data)

#calculate margin of error
margin <- qt(0.975,df=n-1)*s/sqrt(n)

#calculate lower and upper bounds of confidence interval
low <- xbar - margin
low

[1] 12.03575

high <- xbar + margin
high

[1] 19.19502

လူဦးရေအတွက် ယုံကြည်မှု 95% ကြားကာလသည် [12.0၊ 19.2] လက်မဖြစ်သည်။

ဥပမာ 2- လူဦးရေအချိုးအစား ခန့်မှန်းချက် အမှတ်

ဥပဒေတစ်ရပ်ရပ်ကို ထောက်ခံသော မြို့တစ်မြို့ရှိ လူများ၏ အချိုးအစားကို ခန့်မှန်းလိုသည်ဆိုပါစို့။ ကျွန်ုပ်တို့သည် နိုင်ငံသား ၂၀ ဦး၏ ရိုးရှင်းသော ကျပန်းနမူနာကို အင်တာဗျူးပါသည်။

အောက်ပါကုဒ်သည် နမူနာအချိုးကို တွက်ချက်နည်းကို ပြသည်-

 #define data
data <- c('Y', 'Y', 'Y', 'N', 'N', 'Y', 'Y', 'Y', 'N', 'Y',
          'N', 'Y', 'Y', 'N', 'N', 'Y', 'Y', 'Y', 'N', 'N')

#find total sample size
n <- length(data)

#find number who responded 'Yes'
k <- sum(data == ' Y ') 

#find sample proportion
p <- k/n

p

[1] 0.6

ဥပဒေကို ထောက်ခံသော နိုင်ငံသားနမူနာ၏ အချိုးသည် 0.6 ဖြစ်သည်။ ၎င်းသည် ကျွန်ုပ်တို့၏ လူဦးရေအချိုးအစား ခန့်မှန်းချက်ကို ကိုယ်စားပြုသည်။

လူဦးရေအတွက်ဆိုလိုရင်း 95% ယုံကြည်မှုကြားကာလကို တွက်ချက်ရန် အောက်ပါကုဒ်ကိုလည်း အသုံးပြုနိုင်ပါသည်။

 #find total sample size
n <- length(data)

#find number who responded 'Yes'
k <- sum(data == ' Y ') 

#find sample proportion
p <- k/n

#calculate margin of error
margin <- qnorm(0.975)*sqrt(p*(1-p)/n)

#calculate lower and upper bounds of confidence interval
low <- p - margin
low

[1] 0.3852967

high <- p + margin
high

[1] 0.8147033

လူဦးရေအချိုးအတွက် 95% ယုံကြည်မှုကြားကာလသည် [0.39၊ 0.81] ဖြစ်သည်။

ထပ်လောင်းအရင်းအမြစ်များ

R တွင် ဂဏန်းငါးလုံး၏ အကျဉ်းချုပ်ကို တွက်နည်း
R တွင်ယုံကြည်မှုကြားကာလကိုဘယ်လိုရှာရမလဲ
R တွင် ယုံကြည်မှုကြားကာလကို မည်သို့ဆွဲမည်နည်း။

မှတ်ချက်တစ်ခုထည့်ပါ။

သင့် email လိပ်စာကို ဖော်ပြမည် မဟုတ်ပါ။ လိုအပ်သော ကွက်လပ်များကို * ဖြင့်မှတ်သားထားသည်