Проблема с графиком

Question

Когда я пытаюсь ввести следующий код в R

library(openintro)
data("email")
attach(email)

email_small <- sample(x = email$num_char, size = 100)

hist(email_small)
boxplot(x, email_small )
x = email$num_char
head(email$num_char, n=5)
mean(head(email$num_char, n=5))


xbar5 <- rep(NA, length = 100)
for (i in 1:100) {
  email5 <- sample(x = email$num_char, size = 5)
  xbar5[i] <- mean(email5)
}
mean(xbar5)

hist(xbar5)
boxplot(x, xbar5)

Но гистограмма или блок-график не отображаются в таблице графиков.Почему не отображается график?Я думаю, что-то не так с моим RStudio.