## Note: this functionality has become obsolete since the introduction of the
## 'apset' S4 class.
## Load sample SD file
# data(sdfsample); sdfset <- sdfsample
## Generate atom pair descriptor database for searching
# apset <- sdf2ap(sdfset)
## Loads same atom pair sample data set provided by library
data(apset)
db <- apset
olddb <- apset2descdb(db)
## Create a sub-database for the 1st and 2nd compound in that SDF
db_sub <- db.subset(olddb, c(1, 2))
Run the code above in your browser using DataLab