# NOT RUN {
# Calculate mean temperature within years from the MassClimate dataset.
data(MassClimate)
#Calculate year column
library(lubridate)
MassClimate$Year <- year(as.Date(MassClimate$Date, format = "%d/%m/%Y"))
#Calculate mean temperature within each year
within_yr_mean <- wgmean(MassClimate$Temp, MassClimate$Year)
#Add this variable to the original dataset
MassClimate$Within_yr_mean <- within_yr_mean
# }
Run the code above in your browser using DataLab