Added code for plotting grph of KD in shiny app.