library(snow)
   r<- 50
   d<- 40
   #initialize
   data(sdfsample)
   dir=file.path(tempdir(),"add")
   dir.create(dir)
   eiInit(sdfsample[1:99],dir=dir)
   #create compound db
   runId=eiMakeDb(r,d,numSamples=20,dir=dir)
      
   #find compounds similar two each query
   eiAdd(runId,sdfsample[100],dir=dir)Run the code above in your browser using DataLab