Create Asing2.R