Cant knit my document! Help!!!

Publishing Your Results
1

Here is my code that I am trying to knit into HTML.

title: "R Notebook"
output:
html_document:
df_print: paged

install.packages("tidyverse")

library(tidyverse)

install.packages("nycflights13")

library(nycflights13)

band <- tribble(
   ~name,     ~band,
  "Mick",  "Stones",
  "John", "Beatles",
  "Paul", "Beatles"
)

instrument <- tribble(
    ~name,   ~plays,
   "John", "guitar",
   "Paul",   "bass",
  "Keith", "guitar"
)

instrument2 <- tribble(
    ~artist,   ~plays,
   "John", "guitar",
   "Paul",   "bass",
  "Keith", "guitar"
)

View(flights)

View(airlines)

band %>% left_join(instrument, by = "name")
band %>% right_join(instrument, by = "name")
band %>% full_join(instrument, by = "name")
band %>% inner_join(instrument, by = "name")

##Your Turn #1

flights %>%
filter(!is.na(arr_delay)) %>%
left_join(airlines, by = "carrier") %>%
group_by(name) %>%
summarise(delay = mean(arr_delay)) %>%
arrange(delay)

##Your Turn #2

flights %>%
filter(!is.na(arr_delay)) %>%
left_join(airports, by = c("dest" = "faa")) %>%
group_by(name) %>%
summarise(distance = first(distance),
delay = mean(arr_delay)) %>%
arrange(desc(delay))

band %>% semi_join(instrument, by = "name")
band %>% anti_join(instrument, by = "name")

##Your Turn #3

airports %>%
semi_join(flights, by = c("faa" = "dest")) %>%
select(faa)

##Implement

ar1ts <- function(init, n, b, a) {
    x <- numeric(n)
    x[1] <- init
    w <- rnorm(n-1)
    for (t in 1:(n-1)) {
        x[t+1] <- b + a * x[t] + w[t]
    }
    return(x)
}

avec <- c(0.1, -0.1, 0.9, -0.9, 1.1, -1.1)
N <- 200


par(mfrow=c(3,2))  # Arrangement of figures
for (a in avec) {
    plot(ar1ts(0, N, 1, a), type="l",
        xlab=paste("a = ", a), ylab="")
}
2

And all the code does work when I run it!

3

What kind of error message(s) do you get?

4

This topic was automatically closed 21 days after the last reply. New replies are no longer allowed.