###Introduction This is my assignment 3 of R programming course on Coursera These code may not be well written Looking forward to your suggestion ######Contact: alan1992919@126.com