update ggplot-create.md file
update layer.R file
add layer figures