1 Matching Annotations
  1. May 2019
  2. jrnold.github.io jrnold.github.io
    21 Iteration | R for Data Science: Exercise Solutions
    1
    1. MeatloafMalady 26 May 2019
      bottles <- function(i) { if (i > 2) { bottles <- str_c(i - 1, " bottles") } else if (i == 2) { bottles <- "1 bottle" } else { bottles <- "no more bottles" } bottles }

      I think this should read:

      
bottles <- function(i) {
  if (i > 1) {
    bottles <- str_c(i , " bottles")
  } else if (i == 1) {
    bottles <- "1 bottle"
  } else {
    bottles <- "no more bottles"
  }
  bottles
}

      Otherwise you get no bottles of beer twice in the final output

    Visit annotations in context

    Annotators

    URL

    jrnold.github.io/r4ds-exercise-solutions/iteration.html