# NOT RUN {
# Create temp directory
tmp <- tempdir()
# Create library
libname(dat1, tmp)
# Add dat to library
lib_add(dat1, mtcars, iris)
# Copy dat1 to dat2
lib_copy(dat1, dat2, file.path(tmp, "copy"))
# library 'dat2': 2 items
# - attributes: not loaded
# - path: C:\Users\User\AppData\Local\Temp\RtmpCSJ6Gc/copy
# - items:
# Name Extension Rows Cols Size LastModified
# 1 mtcars rds 32 11 7.5 Kb 2020-11-05 21:14:54
# 2 iris rds 150 5 7.5 Kb 2020-11-05 21:14:54
# Clean up
lib_delete(dat1)
lib_delete(dat2)
# }
Run the code above in your browser using DataLab