Update analysis.r