Profvis в действии

Изучите код справа, который выполняет стандартный анализ данных: загружает и отбирает данные, строит график и добавляет линию регрессии.

Это упражнение является частью курса

Эффективный код на R

Посмотреть курс

Инструкции к упражнению

Загрузите пакет profvis.
Выполните профилирование кода.
Оберните код в фигурные скобки {.
Оберните фигурные скобки в вызов profvis().

Интерактивное практическое упражнение

Попробуйте выполнить это упражнение, дополнив этот пример кода.

# Load the data set
data(movies, package = "ggplot2movies") 

# Load the profvis package
___

# Profile the following code with the profvis function
___
  # Load and select data
  comedies <- movies[movies$Comedy == 1, ]

  # Plot data of interest
  plot(comedies$year, comedies$rating)

  # Loess regression line
  model <- loess(rating ~ year, data = comedies)
  j <- order(comedies$year)
  
  # Add fitted line to the plot
  lines(comedies$year[j], model$fitted[j], col = "red")
___     ## Remember the closing brackets!

Редактировать и запускать код