## Not run:## Create a directory in tempdirpath <- tempfile(pattern="git2r-")dir.create(path)## Initialize a repositoryrepo <- init(path)config(repo, user.name ="Alice", user.email ="alice@example.org")## Create a file, add and commitlines <-"Lorem ipsum dolor sit amet, consectetur adipisicing elit, sed do"writeLines(lines, file.path(path,"test.txt"))add(repo,"test.txt")commit(repo,"Commit message 1")## Create tagtag(repo,"Tagname","Tag message")## List objects in repositoryodb_objects(repo)## End(Not run)