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

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: cluster
> ### Title: Cluster wrapper function
> ### Aliases: cluster
> 
> ### ** Examples
> 
> library(clustRcompaR)
> library(dplyr)

Attaching package: ‘dplyr’

The following objects are masked from ‘package:stats’:

    filter, lag

The following objects are masked from ‘package:base’:

    intersect, setdiff, setequal, union

> library(quanteda)
Package version: 1.4.1
Parallel computing: 2 of 32 threads used.
See https://quanteda.io for tutorials and examples.

Attaching package: ‘quanteda’

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

    View

> 
> d <- inaugural_addresses
> d <- mutate(d, century = ifelse(Year < 1800, "17th",
+                                 ifelse(Year >= 1800 & Year < 1900, "18th",
+                                        ifelse(Year >= 1900 & Year < 2000, "19th", "20th"))))
> 
> three_clusters <- cluster(d, century, n_clusters = 3)
Document-feature matrix of: 58 documents, 2,820 features (79.6% sparse).
> extract_terms(three_clusters)
   Cluster.1.Terms Cluster.1.Term.Frequencies Cluster.2.Terms
1               in                  34.200000              in
2               my                  13.866667           their
3            their                  12.333333          govern
4             will                  11.200000            will
5           govern                   9.533333             has
6            peopl                   7.200000              it
7               it                   7.133333           state
8           nation                   7.000000            been
9              has                   6.733333           peopl
10         countri                   6.533333          nation
   Cluster.2.Term.Frequencies Cluster.3.Terms Cluster.3.Term.Frequencies
1                    77.52941              in                  36.692308
2                    22.88235            will                  16.076923
3                    21.41176          nation                  12.500000
4                    20.29412              us                  12.038462
5                    20.00000           world                   9.807692
6                    19.41176           peopl                   9.307692
7                    18.23529             can                   7.769231
8                    17.82353            must                   7.730769
9                    16.05882         america                   7.423077
10                   14.41176              no                   7.192308
> 
> three_clusters_comparison <- compare(three_clusters, "century")
> compare_plot(three_clusters_comparison)
Error in grid.Call.graphics(C_setviewport, vp, TRUE) : 
  VECTOR_ELT() can only be applied to a 'list', not a 'double'
Calls: <Anonymous> ... push.vp.vpTree -> push.vp -> push.vp.viewport -> grid.Call.graphics
Execution halted