Displaying 1 result from an estimated 1 matches for "replication2".
Did you mean:
replication
2017 Oct 20
1
create a loop
...Rep1$total.pop)
Estimated.totalvar<-sum(Rep1$adj.var)
Estimated.SE<-sqrt(Estimated.totalvar)*sum(Rep1$total.pop)
RESULTS.R1<-data.frame(Estimated.TotalTemp, SE=Estimated.SE)
RESULTS.R1
##########################
#Replication 2 create a resampled data
############################
Replication2<-dat1[unlist(lapply(lll, sample, rep=TRUE)),]
Summary.Rep2<-ddply(Replication2, c("group"), summarise,
N = length(group),
mean = mean(temp, na.rm=TRUE),
sd = sd(temp),
se = sd / sqrt(N),
variance=sd^2
)
#merge two d...