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

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: get_similar_players
> ### Title: Similar players to archetypoids
> ### Aliases: get_similar_players
> 
> ### ** Examples
> 
> (s0 <- Sys.time())
[1] "2020-03-31 01:59:04 CEST"
> # Turn off temporarily some negligible warnings from the 
> # archetypes package to avoid missunderstandings. The code works well.
> oldw <- getOption("warn")
> options(warn = -1)
> library(Anthropometry)
> df <- do_join_games_bio("ACB", acb_games_1718, acb_players_1718)
> df1 <- do_add_adv_stats(df)
> df2 <- do_stats(df1, "Total", "2017-2018", "ACB", "Regular Season")
Joining, by = c("Name", "Team", "CombinID", "Position", "Nationality", "GP", "GS")
> df3 <- df2[which(df2$Position == "Guard")[1:31], c("MP", "PTS", "Name")]
> preproc <- preprocessing(df3[,1:2], stand = TRUE, percAccomm = 1)
> set.seed(4321)
> lass <- stepArchetypesRawData(preproc$data, 1:2, numRep = 20, verbose = FALSE)
> res <- archetypoids(2, preproc$data, huge = 200, step = FALSE, ArchObj = lass,
+                     nearest = "cand_ns", sequ = TRUE)
> cases <- anthrCases(res)
> df3[cases,]
Error: Must subset rows with a valid subscript vector.
✖ The subscript `cases` has the wrong type `anthrCases`.
ℹ It must be logical, numeric, or character.
Backtrace:
     █
  1. ├─df3[cases, ]
  2. └─tibble:::`[.tbl_df`(df3, cases, )
  3.   └─tibble:::tbl_subset_row(xo, i = i, i_arg)
  4.     └─tibble:::vectbl_as_row_index(i, x, i_arg)
  5.       └─tibble:::vectbl_as_row_location(i, nr, i_arg, assign)
  6.         ├─tibble:::subclass_row_index_errors(...)
  7.         │ ├─base::tryCatch(...)
  8.         │ │ └─base:::tryCatchList(expr, classes, parentenv, handlers)
  9.         │ │   └─base:::tryCatchOne(expr, names, parentenv, handlers[[1L]])
 10.         │ │     └─base:::doTryCatch(return(expr), name, parentenv, handler)
 11.         │ └─base::force(expr)
 12.         └─vctrs::vec_as_location(i, n, arg = as_label(i_arg))
Execution halted