inst/dev.R

In ComputationalModeling/intro-to-pyplot-briandk: Graphical Analysis of Variance Using ggplot2

isGranovaInstalled <- function() {
  return("granovaGG" %in% .packages(all.available = TRUE))  
}

isGranovaAttached <- function() {
  return(("package:granovaGG" %in% search()))
}

removeCurrentVersionOfGranova <- function() {
  if (isGranovaInstalled()) {
    
    if (isGranovaAttached()) {
      print("Detaching granovaGG package")
      detach(package:granovaGG)
    }  
    
    print("Removing granovaGG package")
    remove.packages("granovaGG", lib = .libPaths())
  }
}

installGranovaDev <- function() {
  install.packages(pkgs    = '../../granovaGG/', 
                   repos   = NULL, 
                   type    = 'source'
  )
}

removeCurrentVersionOfGranova()
installGranovaDev()
library(granovaGG)
?granovagg.1w
warnings()