[R] bootstraping by groups

[Marna Wagley]

Hi All,
I have many classes and was trying to estimate the value using a
bootstrapping approach for each group with the following code. However, it
did not work when I added a group in the code. Do you have any suggestions?
thanks,


bootprop <- function(data, index){
  d <- data[index, ]
  sum(d[["BothTimes"]], na.rm = TRUE)/sum(d[["onlyoneTime"]], na.rm = TRUE)
}

daT %>%
  group_by(year) %>%
  boot.pop. <- boot(daT, bootprop, 999) %>%
boot.pop.$t0)

	[[alternative HTML version deleted]]