R/torso_internal.R
In fishsciences/cfs.misc: Cramer Fish Sciences Miscellaneous Convenience Functions
Defines functions
torso
# not exported
torso <- function(d, n=4L) {
stopifnot(length(n) == 1L)
left <- as.integer(nrow(d)/2 - n/2)
d[ seq_len(n) + left - 1L, ]
}
fishsciences/cfs.misc documentation built on Jan. 29, 2021, 3:19 a.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Defines functions torso
# not exported
torso <- function(d, n=4L) {
stopifnot(length(n) == 1L)
left <- as.integer(nrow(d)/2 - n/2)
d[ seq_len(n) + left - 1L, ]
}
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.