all change succesfull
Modified through data.table package
delete some file
add some file
modified plot4.R