with analysis.r