## Load sample data
library(ChemmineR)
data(sdfsample)
## Not run: ## Create sample SD File with 100 molecules
# write.SDF(sdfsample, "test.sdf")
#
# ## Read in sample SD File
# sdfstr <- read.SDFstr("test.sdf")
#
# ## Run export on SDFstr object
# write.SDFsplit(x=sdfstr, filetag="myfile", nmol=10)
#
# ## Run export on SDFset object
# write.SDFsplit(x=sdfsample, filetag="myfile", nmol=10)
#
# ## End(Not run)
Run the code above in your browser using DataLab