#create and initialize a new SQLite database
conn = initDb("test.db")
data(sdfsample)
#just load the data with no features or descriptors
ids=loadSdf(conn,sdfsample)
addNewFeatures(conn, function(sdfset)
data.frame(MW = MW(sdfset),
rings(sdfset,type="count",upper=6, arom=TRUE))
)
unlink("test.db")
Run the code above in your browser using DataLab