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

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: demon
> ### Title: The example for GSparO
> ### Aliases: demon
> 
> ### ** Examples
> 
> demon()
Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

Warning in (eta/(3 * sqrt(3) * lambda * v + eta)) * Bu[(t + 1):(t + group[j])] :
  Recycling array of length 1 in array-vector arithmetic is deprecated.
  Use c() or as.vector() instead.

[1] "The error of linear system obtained by this GSparO is 0.000052."
[1] "The relative error of selected features this GSparO is 0.001383."
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