# NOT RUN {
path <- orderly::orderly_example("minimal")
p <- orderly::orderly_test_start("example", root = path)
# The data in the orderly example is now available to use
dat
# Check to see which artefacts have been created so far:
orderly::orderly_test_check(p)
# Manually the code that this report has in its script
png(file.path(p, "mygraph.png"))
barplot(setNames(dat$number, dat$name), las = 2)
dev.off()
# We now confirm that the artefact has been created:
orderly::orderly_test_check(p)
# }
Run the code above in your browser using DataLab