library(dplyr)
exampleRepoDir <- tempdir()
createEmptyRepo( exampleRepoDir )
data(mtcars)
hash <- mtcars %.%
group_by(cyl, am) %.%
select(mpg, cyl, wt, am) %.%
summarise(avgmpg = mean(mpg), avgwt = mean(wt)) %.%
filter(avgmpg > 20) %>%
saveToRepo( exampleRepoDir )
getTagsLocal( md5hash = hash, exampleRepoDir )
deleteRepo( exampleRepoDir )
rm( exampleRepoDir )
getTagsGithub( "3db63bc63b8defaf42c0bde19160f242",
user="pbiecek", repo="archivist")
# many archivist-like Repositories on one Github repository
getTagsGithub("ff575c261c949d073b2895b05d1097c3", user="MarcinKosinski",
repo="Museum", branch="master", repoDirGit="ex1")
Run the code above in your browser using DataCamp Workspace