Update Task6.R