Displaying 1 result from an estimated 1 matches for "denth".
Did you mean:
death
2017 Jul 12
1
metRology package
...his:
#sample area
L<-5*2.54 #cm
W<-8*2.54 #cm
#sample mass
m<-0.2543*1000 #mg
#uncertainties
L.u<-(1/16)*2.54 #cm (nearest 16th inch)
W.u<-(1/16)*2.54 #cm
m.u<-0.006*1000 #mg scale calibration data
denth<-c(0,0,0)
singth<-c(0,0,0)
for(i in 1:1e5) {
#denth[i]<-7*dt+sum(rnorm(7,0,dt.u))
for(j in 1:7)
singth[j]<-(m+rnorm(1,0,m.u))/((L+rnorm(1,0,L.u))*(W+rnorm(1,0,W.u)))
denth[i]<-sum(singth)
}
sd(denth) #0.07279882
Now with...