[ggplot2 v4] [VelocityPlot] Error: Error in vapply(glyph, get_attr, which = "width", default = 0, numeric(1)): values must be length 1

[pwwang]

data(dim_example)

VelocityPlot(dim_example[, 1:2], dim_example[, 3:4], group_by = dim_example$clusters)

Error in vapply(glyph, get_attr, which = "width", default = 0, numeric(1)) : 
  values must be length 1,
 but FUN(X[[1]]) result is length 200

Related: #19