# NOT RUN {
library(fastdigest)
code = c("x = 5", "y = x + 1")
outvars = c("x", "y")
outvarhashes = c(fastdigest(5), fastdigest(6))
outvarclasses = rep("numeric", 2)
invars = c("", "x")
invarhashes = c("", fastdigest(5))
invarclasses = c("", "numeric")
ps = ProvStoreDF(outvars = outvars,
outvarhashes = outvarhashes,
outvarclasses = outvarclasses,
invars = invars,
invarhashes = invarhashes,
invarclasses = invarclasses,
code = code,
agent = "coolguyorgirl")
plot(fullprovgraph(ps))
# }
Run the code above in your browser using DataLab