mypath <- system.file("extdata", "cmap.db", package="longevityDrugs")
conn <- initDb(mypath)