R တွင် t ဖြန့်ချီပုံဆွဲနည်း

R တွင်ဖြန့်ချီမှုအတွက်ဖြစ်နိုင်ခြေသိပ်သည်းမှုလုပ်ဆောင်ချက်ကိုဆွဲရန်၊ အောက်ပါလုပ်ဆောင်ချက်များကို ကျွန်ုပ်တို့အသုံးပြုနိုင်သည်-

• ဖြစ်နိုင်ခြေသိပ်သည်းဆလုပ်ဆောင်ချက်ကို ဖန်တီးရန် dt(x၊ df)
• ဖြစ်နိုင်ခြေသိပ်သည်းဆလုပ်ဆောင်မှုကို ကြံစည်ရန် curve(function၊ from = NULL၊ to = NULL)

ဖြစ်နိုင်ခြေသိပ်သည်းဆလုပ်ဆောင်မှုကို ကြံစည်ရန်၊ ကျွန်ုပ်တို့သည် dt() လုပ်ဆောင်ချက်တွင် df (လွတ်လပ်မှုဒီဂရီ) နှင့် curve() လုပ်ဆောင်ချက်ရှိ တန်ဖိုးများ အဖြစ် သတ်မှတ်ရန် လိုအပ်သည်။

ဥပမာအားဖြင့်၊ အောက်ဖော်ပြပါကုဒ်သည် ကွက်ကွက်၏ x-ဝင်ရိုးသည် -4 နှင့် 4 ကြားတွင် လွတ်လပ်မှု 10 ဒီဂရီရှိသော ဖြန့်ချီမှုအတွက် ဖြစ်နိုင်ခြေသိပ်သည်းဆလုပ်ဆောင်ပုံကို သရုပ်ဖော်ပုံဖော်ပြသည်-

 curve(dt(x, df=10), from=-4, to=4)

သာမာန် ဖြန့်ဖြူးမှု နှင့် ဆင်တူသည်၊ t ဖြန့်ဝေမှုသည် ပျမ်းမျှ 0 ပတ်လည် အချိုးကျသည်။

ကျွန်ုပ်တို့သည် ခေါင်းစဉ်တစ်ခုထည့်ခြင်း၊ Y ဝင်ရိုးအညွှန်းကိုပြောင်းခြင်း၊ အတန်းအကျယ်ကို တိုးမြှင့်ခြင်းနှင့် ကွက်ကွက်ကို ပိုမိုသာယာလှပစေရန်အတွက် အတန်းအရောင်ကိုပင် ပြောင်းလဲနိုင်သည်-

 curve(dt(x, df=10), from=-4, to=4, 
    main = 't Distribution (df = 10)', #add title
    ylab = 'Density', #change y-axis label
    lwd = 2, #increase line width to 2
    col = 'steelblue') #change line color to steelblue 

t ဖြန့်ဝေမှုများကို ကွဲပြားခြားနားသော လွတ်လပ်မှုဒီဂရီများနှင့် နှိုင်းယှဉ်ရန် ဂရပ်သို့ မျဉ်းကွေးများစွာကို ပေါင်းထည့်နိုင်သည်။ ဥပမာအားဖြင့်၊ အောက်ပါကုဒ်သည် df=6၊ df=10၊ နှင့် df=30 ဖြင့် t ဖြန့်ချီရေးကွက်များကို ဖန်တီးသည်-

 curve(dt(x, df=6), from=-4, to=4, col='blue') 
curve(dt(x, df=10), from=-4, to=4, col='red', add=TRUE)
curve(dt(x, df=30), from=-4, to=4, col='green', add=TRUE)

အောက်ပါ syntax ကိုယူသည့် legend() လုပ်ဆောင်ချက်ကို အသုံးပြု၍ ဇာတ်ကွက်ထဲသို့ ဒဏ္ဍာရီတစ်ခုကို ထည့်နိုင်သည်။

legend(x၊ y=NULL၊ ဒဏ္ဍာရီ၊ ဖြည့်စွက်၊ col၊ bg၊ lty၊ cex)

ရွှေ-

• x၊ y- ဒဏ္ဍာရီနေရာချထားရန် အသုံးပြုသည့် x နှင့် y သြဒိနိတ်များ
• ဒဏ္ဍာရီ – ဒဏ္ဍာရီတွင်ထည့်ရန်စာသား
• ဖြည့်စွက်- ဒဏ္ဍာရီအတွင်းတွင် အရောင်ဖြည့်ပါ။
• col- ဒဏ္ဍာရီအတွင်းရှိ လိုင်းများအတွက် အသုံးပြုရန် အရောင်များစာရင်း
• bg- ဒဏ္ဍာရီ၏ နောက်ခံအရောင်
• lty: လိုင်းစတိုင်
• cex: ဒဏ္ဍာရီထဲက စာသားအရွယ်အစား

ကျွန်ုပ်တို့၏နမူနာတွင် ဒဏ္ဍာရီတစ်ခုဖန်တီးရန် အောက်ပါ syntax ကို အသုံးပြုပါမည်။

 #create density plots
curve(dt(x, df=6), from=-4, to=4, col='blue') 
curve(dt(x, df=10), from=-4, to=4, col='red', add=TRUE)
curve(dt(x, df=30), from=-4, to=4, col='green', add=TRUE)

#add legend
legend(-4, .3, legend=c("df=6", "df=10", "df=30"),
       col=c("blue", "red", "green"), lty=1, cex=1.2)