Description Usage Arguments Value Author(s) See Also Examples
Returns a custom binary descriptor fingerprint for a given set of query cids and
target compounds, based on the activity data within a bioassaySet
object.
1 | bioactivityFingerprint(bioassaySet, targets = FALSE, summarizeReplicates = "activesFirst")
|
bioassaySet |
A |
targets |
An optional list of target id(s) to consider when creating the binary fingerprint. If a listed target is not in the bioassaySet, or has no active scores it will still be accepted, but create a fingerprint with all zeros for this location. The binary order of this list is preserved, so that direct comparison and combination of resulting |
summarizeReplicates |
Optionally allows users to choose how replicates (multiple assays sharing common compounds and targets) are resolved if they disagree. If 'activesFirst' any active score will take precedence over an inactive. If 'mode' the resulting score will be computed according to the statistical mode using |
The returned object is a standard ChemmineR FPset
object, and
can be used as described in the ChemmineR documentation. The order and number of binary bits for each compound can be set using the targets
option, enabling the combination or comparison of multiple objects created with the same target list.
If a single compound has both active and inactive scores for the same target, it will
be resolved according to the confictResolver
option.
Tyler William H Backman
Functions: getBioassaySetByCids
, getAssays
, perTargetMatrix
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | ## connect to a test database
extdata_dir <- system.file("extdata", package="bioassayR")
sampleDatabasePath <- file.path(extdata_dir, "sampleDatabase.sqlite")
sampleDB <- connectBioassayDB(sampleDatabasePath)
## retrieve all targets in database
targetList <- allTargets(sampleDB)
## get an activity fingerprint object for selected CIDs
queryCids <- c("2244", "3715", "2662", "3033", "133021",
"44563999", "44564000", "44564001", "44564002")
myAssaySet <- getBioassaySetByCids(sampleDB, queryCids)
myFp <- bioactivityFingerprint(bioassaySet=myAssaySet)
## disconnect from sample database
disconnectBioassayDB(sampleDB)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.