Academic Integrity: tutoring, explanations, and feedback — we don’t complete graded work or submit on a student’s behalf.

x<-seq(100,250) y<-dnorm(x,mean=175, sd=18) plot(x,y, type = \"l\", lwd = 2, xli

ID: 3149100 • Letter: X

Question

x<-seq(100,250)
y<-dnorm(x,mean=175, sd=18)
plot(x,y, type = "l", lwd = 2, xlim = c(100, 250), main = 'Sampling Distribution of Body Weight')
abline(v = 195, col = "red", lwd=2, lty=3)
mtext("195",side=3,line=-16,
at=par("usr")[1]+0.62*diff(par("usr")[1:2]),
cex=0.8, col = "red")

I created a normal distribution with this code and I want to draw the critical regions under the curve sothat my plot looks like that:

How do I do that in R studio? Thank you

Two-Tailed Critical Region for a Significance Level of 0.05 T, df-24 330.6 0.4 0.3 C 0.2 @y ,1. 0.025 0.025 22g260 137 167 198 291 322 352 383 Energy Cost

Explanation / Answer

Solution:

Below is the Graph in R studio.

As we all know R is a coding language, we can handle it in many ways. However, on popular and easy-to-use method is to use the 'polygon()' function [from graphics package]. It simply draws a polygon with co-ordination.