# Create a temporary directory for testing
tmp_dir <- tempdir()
# Write the progress notes file
write_notes(path = tmp_dir)
# Confirm the file was created
file.exists(file.path(tmp_dir, "dated_progress_notes.md"))
# Clean up
unlink(file.path(tmp_dir, "dated_progress_notes.md"))
Run the code above in your browser using DataLab