Update analyze.R