Nothing
setGeneric("getMotionVariance", function(x,...){standardGeneric("getMotionVariance")})
setMethod("getMotionVariance",
signature="dBMvarianceTmp",
definition=function(x,...){
x@means
})
setMethod("getMotionVariance",
signature="dBMvarianceStack",
definition=function(x,...){
split(x@means, x@trackId)
})
setMethod("getMotionVariance",
signature="dBGBvarianceTmp",
definition=function(x,...){
cbind(para=x@paraSd^2, orth=x@orthSd^2)
})
setMethod("getMotionVariance",
signature="DBBMM",
definition=function(x,...){
x<-slot(x,'DBMvar')
callGeneric()
})
setMethod("getMotionVariance",
signature="DBBMMStack",
definition=function(x,...){
x<-slot(x,'DBMvar')
callGeneric()
})
setMethod("getMotionVariance",
signature="DBBMMBurstStack",
definition=function(x,...){
x<-slot(x,'DBMvar')
callGeneric()
})
setMethod("getMotionVariance",
signature="dynBGB",
definition=function(x,...){
x<-slot(x,'var')
callGeneric()
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.