Add data editing in R and first plot