총 327페이지

159페이지 본문시작

위험평가를 위한 정량평가법 소개 - R을 이용한 이론과 실습
분포가 Pert(40,50,90) 라고 할 때 5,000두의 수를 도살할 경우 생산되는 발골육의 양
(톤)을 알고자 한다고 가정하자. 이 경우 저지르기 쉬운 실수는 무게의 분포 Pert(40,50,90)에
5000을 곱하는 것인데 이는 분명히 결과를 과대추정한다. 이 방법은 각각의 동물로부터
생산되는 쇠고기의 양이 Pert(40.50.90)분포의 무작위 표본이라는 것을 고려하지 않은
것이다. 즉 1두의 동물은 다른 동물에 대하여 독립이라는 것을 무시하고 5,000두 모두
정확히 동일한 양의 쇠고기를 생산한다고 가정한 결과다. 따라서 올바른 방법은 공식 15를
사용하는 것이다 (그림 2-12). 아래의 식에서 수치는 Pert(40,50,90) 분포의 평균 (��)
55kg과 표준편차 (��) 8.7kg을 의미하며 분모의 1000은 발골육의 무게를 톤 단위로 환산한
것이다.
��
��?????�煬貌司司脾옵貌貌餐潽哲發옵�
�貌司司司�
��?
��
?
�狼司司�
CODE
x
df
#x축·y축라벨을위한함수생성
fx
fy
#ggplot함수를이용하여밀도함수그래프그리기
ggplot(data=df)+
stat_density(mapping=aes(x=x,fill=x),position="identity",alpha=0.5)+
geom_vline(aes(xintercept=273988),colour="red",linetype="dashed")+
geom_vline(aes(xintercept=276012),colour="red",linetype="dashed")+
ggtitle("Normal(275000.00,615.18)")+theme(plot.title=element_text(hjust=0.5))+
ylab("Valuesx10^-")+xlab("ValuesinThousands") +
scale_y_continuous(labels=fy)+scale_x_continuous(labels=fx)
그림 2-12 5000두 소의 발골육 무게에 대한 올바른 분포
144

159페이지 본문끝



현재 포커스의 아래내용들은 동일한 컨텐츠를 가지고 페이지넘김 효과및 시각적 효과를 제공하는 페이지이므로 스크린리더 사용자는 여기까지만 낭독하시고 위의 페이지이동 링크를 사용하여 다음페이지로 이동하시기 바랍니다.
상단메뉴 바로가기 단축키안내 : 이전페이지는 좌측방향키, 다음페이지는 우측방향키, 첫페이지는 상단방향키, 마지막페이지는 하단방향키, 좌측확대축소는 insert키, 우측확대축소는 delete키