10 Write out assessments

save(assessments, file='04-assessments/assessments-2016.Rdata')
write.csv(file='04-assessments/site-use-param-asmnt.csv', site_use_param_assessments)