Attaching package: ‘OmicsPLS’

The following object is masked from ‘package:stats’:

    loadings

Failed to create bus connection: No such file or directory
── Attaching core tidyverse packages ──────────────────────── tidyverse 2.0.0 ──
✔ dplyr     1.1.4     ✔ readr     2.1.4
✔ forcats   1.0.0     ✔ stringr   1.5.1
✔ ggplot2   3.5.1     ✔ tibble    3.2.1
✔ lubridate 1.9.3     ✔ tidyr     1.3.0
✔ purrr     1.0.2     
── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
✖ dplyr::filter() masks stats::filter()
✖ dplyr::lag()    masks stats::lag()
ℹ Use the conflicted package (<http://conflicted.r-lib.org/>) to force all conflicts to become errors
Warning message:
In system("timedatectl", intern = TRUE) :
  running command 'timedatectl' had status 1

Attaching package: ‘cowplot’

The following object is masked from ‘package:lubridate’:

    stamp

There were 50 or more warnings (use warnings() to see the first 50)
Saving 7 x 7 in image
Warning messages:
1: The following aesthetics were dropped during statistical transformation: label.
ℹ This can happen when ggplot fails to infer the correct grouping structure in
  the data.
ℹ Did you forget to specify a `group` aesthetic or to convert a numerical
  variable into a factor? 
2: ggrepel: 4 unlabeled data points (too many overlaps). Consider increasing max.overlaps 
Saving 7 x 7 in image
Warning messages:
1: The following aesthetics were dropped during statistical transformation: label.
ℹ This can happen when ggplot fails to infer the correct grouping structure in
  the data.
ℹ Did you forget to specify a `group` aesthetic or to convert a numerical
  variable into a factor? 
2: ggrepel: 4 unlabeled data points (too many overlaps). Consider increasing max.overlaps 
Error in `geom_point()`:
! Problem while computing aesthetics.
ℹ Error occurred in the 1st layer.
Caused by error in `get()`:
! first argument has length > 1
Backtrace:
     ▆
  1. ├─base (local) `<fn>`(x)
  2. ├─ggplot2:::print.ggplot(x)
  3. │ ├─ggplot2::ggplot_build(x)
  4. │ └─ggplot2:::ggplot_build.ggplot(x)
  5. │   └─ggplot2:::by_layer(...)
  6. │     ├─rlang::try_fetch(...)
  7. │     │ ├─base::tryCatch(...)
  8. │     │ │ └─base (local) tryCatchList(expr, classes, parentenv, handlers)
  9. │     │ │   └─base (local) tryCatchOne(expr, names, parentenv, handlers[[1L]])
 10. │     │ │     └─base (local) doTryCatch(return(expr), name, parentenv, handler)
 11. │     │ └─base::withCallingHandlers(...)
 12. │     └─ggplot2 (local) f(l = layers[[i]], d = data[[i]])
 13. │       └─l$compute_aesthetics(d, plot)
 14. │         └─ggplot2 (local) compute_aesthetics(..., self = self)
 15. │           └─base::lapply(aesthetics, eval_tidy, data = data, env = env)
 16. │             └─rlang (local) FUN(X[[i]], ...)
 17. ├─base::get(category)
 18. └─base::.handleSimpleError(...)
 19.   └─rlang (local) h(simpleError(msg, call))
 20.     └─handlers[[1L]](cnd)
 21.       └─cli::cli_abort(...)
 22.         └─rlang::abort(...)
Execution halted