Profvis i praktiken
Undersök koden till höger som utför en vanlig dataanalys. Den läser in och väljer ut data, visualiserar det relevanta datat och lägger till en regressionslinje.
Den här övningen är en del av kursen
Effektiv R-kod
Övningsinstruktioner
- Läs in paketet
profvis. - Profilera koden.
- Omge koden med kursiga klammerparenteser,
{. - Omge dessa klammerparenteser i ett anrop till
profvis().
Interaktiv övning med praktiskt arbete
Testa den här övningen genom att slutföra den här exempelkoden.
# 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!