R/01-Import-data.R

############# 导入数据 #################
rm(list = ls()); gc();

library(purrr)

filePaths <- paste0('data/',list.files(path = 'data/')) # 获取路径
temp <- lapply(filePaths, readRDS) # 读取数据

# data.table::rbindlist(temp) # 合并 列表中的数据框
# 用 daily update 数据 转化为 matrix 类 替换 installed
tools::dependsOnPkgs("ggplot2", installed = installed.packages())

pdb <- available.packages()
# or pdb <- tools::CRAN_package_db()
# http://dirk.eddelbuettel.com/papers/dsc2017_rcpp_1k_revdep.pdf

# Rcpp at 1000 Reverse Depends: Some Observations
length(tools::dependsOnPkgs("ggplot2", recursive = FALSE, installed = pdb))
# 1143 1960
length(tools::dependsOnPkgs("Rcpp", recursive = FALSE, installed = pdb))
# 1283 4879

p1 <- tools::dependsOnPkgs("ggplot2", recursive = FALSE, installed = pdb)
p2 <- tools::dependsOnPkgs("Rcpp", recursive = FALSE, installed = pdb)

intersect(p1,p2) # 167 


# 我认为重要的字段

# 在 CRAN 上发布的日期  统计每天新发布或者更新的 R 包
# 版本号 第几个版本  看出作者的维护情况
# 依赖关系
# 适用的操作系统 OS 
# 维护者
# 贡献者 
# 作者邮箱 获取联系方式 Geek 们都用什么邮箱
# R 包开发版的位置 Github  R-forge SVN 开发习惯
# 是否有手册 除了开发文档以外的 看出作者的用心
# R 包存放位置 CRAN/R-forge/bioconductor
# 描述字段 做文本挖掘 给 R 包分类 关键词 词云
XiangyunHuang/PkgsInfo documentation built on May 23, 2019, 1:26 p.m.