Segue o código que usei pra verificar o tamanho dos pacotes...
library(RCurl)
pkgs <- available.packages()
urls <- file.path(pkgs[,17],paste0(pkgs[,1],"_",pkgs[,2],".zip"))
sizes <- sapply(seq(urls), function(x) {print(x); as.numeric(url.exists(urls[x], .header=TRUE)['Content-Length'])})
sum(!is.na(urls)) ### pacotes encontrados sum(sizes) ### tamanho do arquivo em bytes
cbind(size=round(sum(sizes)/(1024^(0:3)),2),unit=c('Bytes','KB','MB','GB'))
# size unit
# [1,] "3460697537" "Bytes"
# [2,] "3379587.44" "KB"
# [3,] "3300.38" "MB"
# [4,] "3.22" "GB"