inti 0.6.1

DESCRIPTION

@@ -1,14 +1,14 @@
 Package: inti
 Type: Package
-Version: 0.6.0
+Version: 0.6.1
 Title: Tools and Statistical Procedures in Plant Science
 Description: The 'inti' package is part of the 'inkaverse' project for developing 
     different procedures and tools used in plant science and experimental designs. 
     The mean aim of the package is to support researchers during the planning of
     experiments and data collection (tarpuy()), data analysis and graphics (yupana())
     , and technical writing. 
     Learn more about the 'inkaverse' project at <https://inkaverse.com/>.
-Date: 2023-01-23
+Date: 2023-05-30
 Authors@R: c(
     person("Flavio", "Lozano-Isla", email = "[email protected]", role = c("aut", "cre")
           , comment = c(ORCID = "0000-0002-0714-669X")),

NEWS.md

@@ -1,3 +1,8 @@
+# inti 0.6.2
+
+- To improve:
+  - Include lattice
+
 # inti 0.6.1
 
 - Tarpuy: 
@@ -16,10 +21,6 @@
 - gdocs2qmd()
   - Word document with different output structure
 
-#> to improve:
-
-- Include lattice
-
 # inti 0.6.0
 
 - Fix for dev dplyr (Thanks @hadley)

R/gdoc2qmd.R

@@ -42,17 +42,17 @@ gdoc2qmd <- function(file
     dplyr::filter(!.data$value %in% "# ") %>% 
     dplyr::mutate(across("value"
                          , ~ gsub("```Unknown element type at this position: UNSUPPORTED```", "", .))) %>%
-    head(which(startsWith(.$value, c('#| END', "#| end"))) - 1)
+    utils::head(which(startsWith(.$value, c('#| END', "#| end"))) - 1)
 
   txtonly <- txt %>% 
     dplyr::filter(!grepl("\\|", .data$value)) %>% 
     dplyr::filter(!grepl("#tbl", .data$value)) %>% 
     dplyr::filter(!grepl("#fig", .data$value))
 
   tt <- txtonly %>% 
-    filter(if_all(everything(), ~ . != "")) %>% 
-    head(1) %>% 
-    deframe() %>% 
+    dplyr::filter(if_all(everything(), ~ . != "")) %>% 
+    utils::head(1) %>% 
+    tibble::deframe() %>% 
     as.vector()
 
   fig <- txt %>%