if (FALSE) { # NROW(available.packages())
# \donttest{
ap <- available.packages()
if (NROW(ap)) {
a_package <- rownames(ap)[startsWith(rownames(ap), "A")][2]
ca <- cran_archive(a_package)
head(ca)
}
# }
}
Run the code above in your browser using DataLab