كيفية رسم توزيع weibull في r

لرسم دالة الكثافة الاحتمالية لتوزيع Weibull في R، يمكننا استخدام الوظائف التالية:

• dweibull(x, Shape,scale = 1) لإنشاء دالة الكثافة الاحتمالية.
• منحنى (وظيفة، من = NULL، إلى = NULL) لرسم دالة كثافة الاحتمال.

لرسم دالة الكثافة الاحتمالية، نحتاج إلى تحديد قيمة معلمة الشكل والمقياس في دالة dweibull بالإضافة إلى القيم من وإلى في الدالة المنحنية () .

على سبيل المثال، يوضح الكود التالي كيفية رسم دالة كثافة الاحتمالية لتوزيع Weibull مع المعلمات الشكل = 2 والمقياس = 1 حيث ينتقل المحور السيني للمخطط من 0 إلى 4:

 curve(dweibull(x, shape=2, scale = 1), from=0, to=4)

يمكننا إضافة عنوان، وتغيير تسمية المحور Y، وزيادة عرض الصف، وحتى تغيير لون الصف لجعل الحبكة أكثر جمالية:

 curve(dweibull(x, shape=2, scale = 1), from=0, to=4, 
    main = 'Weibull Distribution (shape = 2, scale = 1)', #add title
    ylab = 'Density', #change y-axis label
    lwd = 2, #increase line width to 2
    col = 'steelblue') #change line color to steelblue 

يمكننا أيضًا إضافة عدة منحنيات إلى الرسم البياني لمقارنة توزيعات Weibull بمعلمات الشكل والمقياس المختلفة:

 curve(dweibull(x, shape=2, scale = 1), from=0, to=4, col='red')
curve(dweibull(x, shape=1.5, scale = 1), from=0, to=4, col='blue', add=TRUE)

يمكننا إضافة وسيلة إيضاح إلى المخطط باستخدام وظيفة legend() ، والتي تأخذ الصيغة التالية:

وسيلة الإيضاح (x، y=NULL، legend، fill، col، bg، lty، cex)

ذهب:

• x وy: إحداثيات x وy المستخدمة لتحديد موضع وسيلة الإيضاح
• وسيلة الإيضاح: النص الذي سيتم وضعه في وسيلة الإيضاح
• ملء: ملء اللون داخل وسيلة الإيضاح
• col: قائمة الألوان التي سيتم استخدامها للخطوط الموجودة داخل وسيلة الإيضاح
• bg: لون خلفية وسيلة الإيضاح
• lty: نمط الخط
• cex: حجم النص في وسيلة الإيضاح

في مثالنا سوف نستخدم بناء الجملة التالي لإنشاء وسيلة إيضاح:

 #create density plots
curve(dweibull(x, shape=2, scale = 1), from=0, to=4, col='red')
curve(dweibull(x, shape=1.5, scale = 1), from=0, to=4, col='blue', add=TRUE)

#add legend
legend(2, .7, legend=c("shape=2, scale=1", "shape=1.5, scale=1"),
       col=c("red", "blue"), lty=1, cex=1.2)