반응형

#위 그래프의 R 소스코드
#표준정규분포 그래프
x=seq(-4,4,by=0.01)
y=dnorm(x)
plot(x,y,type="l",ann=FALSE,axes=FALSE)
#임계값 설정(기각역)
margin=qnorm(0.95)
#축 및 값 추가, pos=c(0,0) 으로 설정해야 축과 그래프 사이 간격 없어짐
axis(1,at=c(-4,0,4),
pos=c(0,0),
label=c("",0,""),cex.axis=1)

#위 그래프의 R 소스코드
#표준정규분포 그래프
x=seq(-4,4,by=0.01)
y=dnorm(x)
plot(x,y,type="l",ann=FALSE,axes=FALSE)
#95% 신뢰구간
z_value1=qnorm(0.025)
z_value2=qnorm(0.975)
#축 및 값 추가, pos=c(0,0) 으로 설정해야 축과 그래프 사이 간격 없어짐
axis(1,at=c(-4,z_value1,0,z_value2,4),
pos=c(0,0),
label=c("",-1.96,0,1.96,""),
cex.axis=1.5)
#색칠을 위한 값 설정
Z_x=seq(z_value1,z_value2,by=0.01)
Z_y=dnorm(Z_x)
#색칠
polygon(c(Z_x,rev(Z_x)),c(Z_y,rep(0,length(Z_y))),col="red")
#테두리
box("outer",col="gray")

#위 그래프의 R 소스코드
#표준정규분포 그래프
x=seq(-4,4,by=0.01)
y=dnorm(x)
plot(x,y,type="l",ann=FALSE,axes=FALSE,xlim=)
#95% 신뢰구간
z_value1=qnorm(0.025)
z_value2=qnorm(0.975)
#축 및 값 추가, pos=c(0,0) 으로 설정해야 축과 그래프 사이 간격 없어짐
axis(1,at=c(-4,z_value2,4),
pos=c(0,0),
label=c("",'x',""),
cex.axis=1.5)
#색칠을 위한 값 설정
Z_x=seq(-4,z_value2,by=0.01)
Z_y=dnorm(Z_x)
#색칠
polygon(c(Z_x,rev(Z_x)),c(Z_y,rep(0,length(Z_y))),col="red")
#테두리
box("outer",col="gray")

#위 그래프의 R 소스코드
#표준정규분포 그래프
x=seq(-4,4,by=0.01)
y=dnorm(x)
plot(x,y,type="l",ann=FALSE,axes=FALSE,xlim=)
#95% 신뢰구간
z_value1=qnorm(0.025)
z_value2=qnorm(0.975)
#축 및 값 추가, pos=c(0,0) 으로 설정해야 축과 그래프 사이 간격 없어짐
axis(1,at=c(-4,z_value2,4),
pos=c(0,0),
label=c("",'x',""),
cex.axis=1.5)
#색칠을 위한 값 설정
Z_x=seq(z_value2,4,by=0.01)
Z_y=dnorm(Z_x)
#색칠
polygon(c(Z_x,rev(Z_x)),c(Z_y,rep(0,length(Z_y))),col="red")
#테두리
box("outer",col="gray")
반응형
'@자료실 > 자주쓰는 그림 모음' 카테고리의 다른 글
모집단 표본추출 그림 2표본 ppt (0) | 2022.09.29 |
---|---|
통계 가설검정 관련 그림들 (정규분포) (0) | 2022.09.01 |
모집단 표본추출 그림 ppt (0) | 2022.08.21 |
댓글
bigpicture님의
글이 좋았다면 응원을 보내주세요!
이 글이 도움이 됐다면, 응원 댓글을 써보세요. 블로거에게 지급되는 응원금은 새로운 창작의 큰 힘이 됩니다.
응원 댓글은 만 14세 이상 카카오계정 이용자라면 누구나 편하게 작성, 결제할 수 있습니다.
글 본문, 댓글 목록 등을 통해 응원한 팬과 응원 댓글, 응원금을 강조해 보여줍니다.
응원금은 앱에서는 인앱결제, 웹에서는 카카오페이 및 신용카드로 결제할 수 있습니다.