setGeneric('viewMeans',function(x,na.rm=FALSE) standardGeneric('viewMeans'))
setMethod('viewMeans','RleViews',function(x,na.rm=FALSE) {
return(viewSums(x,na.rm=na.rm)/width(x))
})
setMethod('viewMeans','RleViewsList',function(x,na.rm=FALSE) {
return(NumericList(sapply(x,viewMeans,na.rm=na.rm)))
})
setMethod('viewMeans','XIntegerViews',function(x,na.rm=FALSE) {
return(viewSums(x,na.rm=na.rm)/width(x))
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.