contributing_manifest <- read.csv("text_analysis/0207_contributing_merged_manifest.csv", header=TRUE)
readme_manifest <- read.csv("text_analysis/0207_readme_merged_manifest.csv", header=TRUE)

overlap = inner_join(contributing_manifest, readme_manifest, by="repo_id")
length(overlap)