Displaying 1 result from an estimated 1 matches for "replication1".
Did you mean:
replication
2017 Oct 20
1
create a loop
....Names = c("group", "total.pop", "sampled.pop"), class =
"data.frame", row.names = c(NA,
-3L))
##
idx <- 1:nrow(dat1)
lll <- split(idx, dat1$group)
##########################
#Replication 1 create a resampled data
############################
Replication1<-dat1[unlist(lapply(lll, sample, rep=TRUE)),]
Summary.Rep1<-ddply(Replication1, 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...