This is part of my learning process for learning how to use Plotly and publish an R document