Nothing
#[export]
colhameans <- function(x, parallel = FALSE) {
dim(x)[1]/ Rfast::colsums(1/x, parallel = parallel)
}
#[export]
rowhameans <- function(x) {
dim(x)[1]/ Rfast::rowsums(1/x)
}
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.