Initialize analysis.R
Update analysis.R