## SDFset instance
data(sdfsample)
sdfset <- sdfsample
## Detect and remove invalid SDFs in SDFset.
valid <- validSDF(sdfset)
which(!valid) # Returns index for invalid SDFs
sdfset <- sdfset[valid] # Returns only valid SDFs.
Run the code above in your browser using DataLab