0.R

updateR(admin_password = "os_admin_user_password")

1.R

require(devtools)
install_github('andreacirilloac/updateR')

2.R

stopifnot(.Platform$OS.type == "unix")

3.R

page              <- read_html(page_source)
version_block     <- rvest::html_nodes(page,"h1+ p a+ a , table:nth-child(8) tr:nth-child(1) td > a")
filename          <- rvest::html_text(version_block) %>% strsplit("\n", fixed = TRUE) # the resulting value is a list
filename          <- filename[[2]] # we take the second element, containing the name of the file
filename_quoted          <- paste("'",filename,"'",sep = "")      

4.R

url               <- paste(page_source,filename, sep = "")

5.R

download.file(url,filename)

6.R

command           <- paste("echo " , admin_password, "| sudo -S installer -pkg ", filename_quoted , " -target / -verbose")
system(command)