R/shinyR.R

In shinyr: Data Insights Through Inbuilt R Shiny App

#' shineMe
#' @title shineMe
#' @description An R shiny app for shinyr UI.
#' @author Jayachandra N
#' @return shiny UI page
#' @export
#' @import shiny
#' @import shinydashboard
#' @import plotly
#' @examplesIf interactive()
#' shineMe()
shineMe <- function() {
  shiny::runApp(system.file(package = "shinyr", "app"))
}

#' plotCor
#' @title Plot Cor
#' @description Plot correlation plot
#' @param cor_dat Corelation matrix
#' @param my_method method to plot, for example: circle
#' @importFrom corrplot corrplot
#' @return Corelation plot
#' @export
#' @author Jayachandra N
#' @examplesIf interactive()
#' cor_dat <- cor(mtcars)
#' plotCor(cor_dat, "circle")
plotCor <- function(cor_dat, my_method) {
  corrplot::corrplot(cor_dat, method = my_method) # A single line function?
}