Running examples in ‘tidysq-Ex.R’ failed
The error most likely occurred in:

> ### Name: ==.sq
> ### Title: Compare sq objects
> ### Aliases: ==.sq
> 
> ### ** Examples
> 
> # Creating objects to work on:
> sq_dna_1 <- sq(c("ACTGCTG", "CTTAGA", "CCCT", "CTGAATGT"),
+                alphabet = "dna_bsc")
> sq_dna_2 <- sq(c("ACTGCTG", "CTTAGA", "CCCT", "CTGAATGT"),
+                alphabet = "dna_bsc")
> sq_dna_3 <- sq(c("ACTGCTG", "CTTAGA", "GGAA"),
+                alphabet = "dna_bsc")
> sq_dna_4 <- sq(c("ACTGCTG", "CTTAGA", "CCCT", "GTNANN"),
+                alphabet = "dna_ext")
> sq_ami_1 <- sq(c("ACTGCTG", "NIKAAR", "CCCT", "CTGAATGT"),
+                alphabet = "ami_bsc")
> sq_unt <- sq(c("AHSNLVSCTK$SH%&VS", "YQTVKA&#BSKJGY",
+                "CCCT", "AVYI#VSV&*DVGDJCFA"))
> 
> # Comparing sq object with an object of the same length:
> sq_dna_1 == sq_dna_2
[1] TRUE TRUE TRUE TRUE
> sq_dna_1 == c("ACTGCTG", "CTTAGA", "CCCT", "CTGAATGT")
[1] TRUE TRUE TRUE TRUE
> 
> # Cannot compare sq objects of different lengths:
> ## Not run: 
> ##D sq_dna_1 == sq_dna_3
> ##D sq_dna_1 == c("AAA", "CCC")
> ## End(Not run)
> 
> # Unless comparing sq object with scalar value:
> sq_dna_1 == "CTTAGA"
[1] FALSE  TRUE FALSE FALSE
> 
> # It's possible to compare basic and extended types:
> sq_dna_1 == sq_dna_4
[1]  TRUE  TRUE  TRUE FALSE
> 
> # Mixing DNA, RNA and amino acid types throws an error, however:
> ## Not run: 
> ##D sq_dna_1 == sq_ami_1
> ## End(Not run)
> 
> # On the other hand, unt sq is acceptable everywhere:
> sq_dna_1 == sq_unt
Error: Can't combine `..1` <tidysq alphabet> and `..2` <tidysq alphabet>.
✖ Some attributes are incompatible.
ℹ The author of the class should implement vctrs methods.
ℹ See <https://vctrs.r-lib.org/reference/faq-error-incompatible-attributes.html>.
Backtrace:
     █
  1. └─tidysq:::`==.sq`(sq_dna_1, sq_unt)
  2.   └─vctrs::vec_equal(e1, e2)
  3.     └─vctrs:::vec_cast_common_params(!!!args, .to = .ptype, .df_fallback = DF_FALLBACK_quiet)
  4.       └─vctrs:::vec_cast_common_opts(..., .to = .to, .opts = opts)
  5.         └─(function () ...
  6.           └─tidysq:::vec_ptype2.sq_dna_bsc.sq_unt(...)
  7.             ├─tidysq:::sq_ptype(union(alphabet(x), alphabet(y)), "unt")
  8.             │ ├─vctrs::new_list_of(...)
  9.             │ │ └─vctrs::new_vctr(x, ..., ptype = ptype, class = c(class, "vctrs_list_of"))
 10.             │ └─tidysq:::sq_alphabet(str_alphabet, type)
 11.             │   └─vctrs::new_vctr(alph, type = type, class = c("sq_alphabet", "character"))
 12.             │     └─rlang::is_vector(.data)
 13.             └─base::union(alphabet(x), alphabet(y))
 14.               ├─base::c(...)
 15.               └─vctrs:::c.vctrs_vctr(...)
 16.                 └─vctrs::vec_c(...)
 17.                   └─(function () ...
 18.                     └─vctrs::vec_default_ptype2(...)
 19.                       └─vctrs::stop_incompatible_type(...)
 20.                         └─vctrs:::stop_incompatible(...)
 21.                           └─vctrs:::stop_vctrs(...)
Execution halted