Create code_TP7.R