update ggplot-create.md file
update layer.R file
add setting and mapping figure