R/vef.pack.R

In NicolasStefaniak/easieR: easieR: A GUI R metapackage.

vef.pack <-
function(){
      pack.to.inst <- c('afex',
                      'akima',
                      'Amelia',
                      'BayesFactor',
                      'bibtex',
                      'car',
                      'cobs',
                      'corpcor',
                      'deldir',
                      'DescTools',
                      'doBy',
                      'dplyr',
                      'emmeans',
                      'epitools',
                      'foreign',
                      'ggplot2',
                      'ggplotgui',
                      'gmodels',
                      'GPArotation',
                      'gsl',
                      'huxtable',
                      'knitr',
                      'lars',
                      'lsr',
                      'MBESS',
                      'mc2d',
                      'mgcv',
                      'mlogit',
                      'nFactors',
                      'nortest',
                      'olsrr',
                      'outliers',
                      'pander',
                      'PMCMRplus',
                      'plyr',
                      'ppcor',
                      'psych',
                      'pwr',
                      'quantreg',
                      'Rcpp',
                      'readxl',
                      'reshape2',
                      'Rfit',
                      'rmarkdown',
                      'rms',
                      'robustbase',
                      'rpivotTable',
                      'rrcov',
                      'scatterplot3d',
                      'semPlot',
                      'sjstats',
                      'sos',
                      'sp',
                      'stringi',
                      'stringr',
                      'svDialogs',
                      'TeachingDemos',
                      'textclean',
                      'WRS2'
    )

          list()->Resultats
    Resultats[[.dico[["desc_install_correct_packages"]]]]<-pack.to.inst[ which(lapply(pack.to.inst, require, character.only=T)==TRUE) ]
    Resultats[[.dico[["desc_install_bad_packages"]]]]<-pack.to.inst[ which(lapply(pack.to.inst, require, character.only=T)==FALSE) ]
    return(Resultats)
}