doc <- am_create()
# Initially, no local changes
am_get_last_local_change(doc) # NULL
# Make a change
doc$key <- "value"
am_commit(doc, "Add key")
# Now we have a local change
change <- am_get_last_local_change(doc)
str(change) # Raw vector
Run the code above in your browser using DataLab