P281424/AMR
1
0 Fork 0
mirror of https://github.com/msberends/AMR.git synced 2026-10-01 04:13:33 +02:00
Code Releases Activity

ci for devel and freq fix

Browse Source
This commit is contained in:
dr. M.S. (Matthijs) Berends committed 2019-03-29 21:45:46 +01:00
1 parent ce68ff4ee7
commit 56d4b4719f
2 files changed
+9 -8
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

R/freq.R
+4 -3
View File
@@ -391,9 +391,10 @@ frequency_tbl <- function(x,
}
if (NROW(x) > 0 & any(class(x) == "mo")) {
header_list$families <- x %>% mo_family() %>% n_distinct()
header_list$genera <- x %>% mo_genus() %>% n_distinct()
header_list$species <- x %>% mo_species() %>% n_distinct()
x_mo <- as.mo(x) # do it once for all three
header_list$families <- x_mo %>% mo_family() %>% n_distinct()
header_list$genera <- x_mo %>% mo_genus() %>% n_distinct()
header_list$species <- x_mo %>% mo_species() %>% n_distinct()
}
if (NROW(x) > 0 & any(class(x) == "difftime") & !is.hms(x)) {