Cacher is the code snippet organizer for pro developers

ip <- as.data.frame(installed.packages()[,c(1,3:4)])
rownames(ip) <- NULL

ip <- ip[is.na(ip$Priority),1:2,drop=FALSE]
print(ip, row.names=FALSE)