41 lines
937 B
R
41 lines
937 B
R
libs=c('terra', 'raster', 'sp', 'rgdal', 'rgeos', 'rgl',
|
|
'gstat', 'zoo', 'xts', 'hydroGOF', 'hydroTSM',
|
|
'ggplot2', 'lattice', 'reshape2',
|
|
'abind', 'spam', 'fields',
|
|
'RTriangle', 'geometry',
|
|
'Rcpp', 'sf',
|
|
'deldir', 'proj4', 'lubridate', 'interp',
|
|
'GGally',
|
|
'mapproj',
|
|
'coord_map',
|
|
'akima',
|
|
'graticule',
|
|
'doParallel','rjson'
|
|
|
|
)
|
|
# libs=c('lavaan', 'multcompView', 'pander', 'psych', 'pwr', 'rmdpartials', 'ufs', 'kableExtra') # ROSETTA
|
|
|
|
fun.inst <- function(libs){
|
|
nx=length(libs)
|
|
i=1
|
|
for(i in 1:nx){
|
|
x=libs[i]
|
|
message(i, '/', nx, '\t', x)
|
|
if(!require(x, character.only = TRUE, )){
|
|
message('Installing ', x)
|
|
install.packages(x)
|
|
}else{
|
|
message('Existing ', x)
|
|
}
|
|
}
|
|
}
|
|
fun.inst(libs)
|
|
|
|
|
|
if(!require(devtools)){
|
|
install.packages("devtools")
|
|
}
|
|
devtools::install_github("shulele/RTriangle", subdir="pkg")
|
|
|
|
|