uploading analysis_trial.R