Skip to content

Commit

Permalink
more example namespace fixes
Browse files Browse the repository at this point in the history
  • Loading branch information
thackl committed Oct 16, 2023
1 parent 95d5a5c commit 6b93c05
Show file tree
Hide file tree
Showing 3 changed files with 3 additions and 3 deletions.
2 changes: 1 addition & 1 deletion R/focus.R
Original file line number Diff line number Diff line change
Expand Up @@ -63,7 +63,7 @@
#' f1 <- f0 %>%
#' # parser system/gene info
#' tidyr::separate(seq_id2, into=c("seq_id2", "system", "gene"), sep=",") %>%
#' filter(
#' dplyr::filter(
#' evalue < 1e-10, # get rid of some spurious hits
#' # and let's focus just on a few systems for this example
#' system %in% c("CRISPR-CAS", "DISARM", "GABIJA", "LAMASSU", "THOERIS"))
Expand Down
2 changes: 1 addition & 1 deletion R/geom.R
Original file line number Diff line number Diff line change
Expand Up @@ -151,7 +151,7 @@ geom_seq_label <- function(mapping = NULL, data = seqs(),
#' @export
#' @examples
#' s0 <- read_seqs(list.files(ex("cafeteria"), "Cr.*\\.fa", full.names = TRUE))
#' s1 <- s0 %>% filter(length>5e5)
#' s1 <- s0 %>% dplyr::filter(length>5e5)
#'
#' gggenomes(emale_genes) + geom_seq() + geom_gene() +
#' geom_bin_label()
Expand Down
2 changes: 1 addition & 1 deletion R/shift.R
Original file line number Diff line number Diff line change
Expand Up @@ -17,7 +17,7 @@
#' mcp <- emale_genes |>
#' filter(name == "MCP") |>
#' group_by(seq_id) |>
#' slice_head(n=1) # some have fragmented MCP gene, keep only first
#' dplyr::slice_head(n=1) # some have fragmented MCP gene, keep only first
#'
#' p2 <- p0 |> shift(all_of(mcp$seq_id), by= -mcp$start) +
#' geom_gene(data=genes(name=="MCP"), fill="#01b9af")
Expand Down

0 comments on commit 6b93c05

Please sign in to comment.