Running examples in 'mixtools-Ex.R' failed
The error most likely occurred in:

> ### Name: plotly_post.beta
> ### Title: Visualization of Posterior Regression Coefficients in Mixtures
> ###   of Random Effects Regressions using 'plotly'
> ### Aliases: plotly_post.beta
> ### Keywords: internal
> 
> ### ** Examples
> 
> data(RanEffdata)
> set.seed(100)
> x <- lapply(1:length(RanEffdata), function(i)
+   matrix(RanEffdata[[i]][, 2:3], ncol = 2))
> x <- x[1:20]
> y <- lapply(1:length(RanEffdata), function(i)
+   matrix(RanEffdata[[i]][, 1], ncol = 1))
> y <- y[1:20]
> lambda <- c(0.45, 0.55)
> mu <- matrix(c(0, 4, 100, 12), 2, 2)
> sigma <- 2
> R <- list(diag(1, 2), diag(1, 2))
> em.out <- regmixEM.mixed(y, x, sigma = sigma, arb.sigma = FALSE,
+                          lambda = lambda, mu = mu, R = R,
+                          addintercept.random = FALSE,
+                          epsilon = 1e-02, verb = TRUE)
iteration= 1 diff= Inf log-likelihood -1149.303 
iteration= 2 diff= 0.9521686 log-likelihood -1148.351 
iteration= 3 diff= 0.4258641 log-likelihood -1147.925 
iteration= 4 diff= 0.2389194 log-likelihood -1147.686 
iteration= 5 diff= 0.153466 log-likelihood -1147.532 
iteration= 6 diff= 0.1074595 log-likelihood -1147.425 
iteration= 7 diff= 0.07976373 log-likelihood -1147.345 
iteration= 8 diff= 0.06171877 log-likelihood -1147.283 
iteration= 9 diff= 0.04925958 log-likelihood -1147.234 
iteration= 10 diff= 0.04027054 log-likelihood -1147.194 
iteration= 11 diff= 0.03355877 log-likelihood -1147.16 
iteration= 12 diff= 0.0284077 log-likelihood -1147.132 
iteration= 13 diff= 0.02436437 log-likelihood -1147.108 
iteration= 14 diff= 0.0211303 log-likelihood -1147.086 
iteration= 15 diff= 0.01850191 log-likelihood -1147.068 
iteration= 16 diff= 0.0163362 log-likelihood -1147.052 
iteration= 17 diff= 0.01453026 log-likelihood -1147.037 
iteration= 18 diff= 0.0130084 log-likelihood -1147.024 
iteration= 19 diff= 0.01171389 log-likelihood -1147.012 
iteration= 20 diff= 0.01060354 log-likelihood -1147.002 
iteration= 21 diff= 0.009643985 log-likelihood -1146.992 
number of iterations= 21 
> 
> x.1 = em.out$x
> n = sum(sapply(x.1, nrow))
> x.1.sum = sum(sapply(1:length(x.1), function(i) length(x.1[[i]][,1])))
> if (x.1.sum == n) {
+   x = lapply(1:length(x.1), function(i) matrix(x.1[[i]][,-1], ncol = 1))
+ } else {
+   x = x.1
+ }
> 
> plotly_post.beta(x = x, y = em.out$y, p.beta = em.out$posterior.beta, 
+                  p.z = em.out$posterior.z)
Error in file.append(to[okay], from[okay]) : 
  could not allocate copy buffer
Calls: plotly_post.beta ... copyDependencyToDir -> mapply -> <Anonymous> -> file.copy -> file.append
Execution halted