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

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: vlda
> ### Title: Weighted Linear Discriminant Analysis
> ### Aliases: vlda
> 
> ### ** Examples
> 
> # for non-compositional data:
> data("dataobs")
> data("uncertainties")
> mylda = vlda(x = dataobs[, 1:2], uncertainties = uncertainties[, 1:2], grouping = dataobs$Group)
Checking positive definiteness of corrected variance for all groups...
> mypred = predict(mylda, newdata = dataobs[, 1:2], newerror = uncertainties[, 1:2])
> forplot = cbind(dataobs, LG1 = mypred$posterior[,1])
> library(ggplot2)
> library(ggthemes)
> ggplot(data = forplot, aes(x = Var1, y = Var2)) +
+    geom_point(aes(shape = Group, color = LG1))
>    scale_color_gradientn(colours = colorblind_pal()(5))
<ScaleContinuous>
 Range:  
 Limits:    0 --    1
> 
> # for compositional data
> data("dataobs_coda")
> data("uncertainties_coda")
> library(compositions)
Loading required package: tensorA

Attaching package: ‘tensorA’

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

    norm

Loading required package: robustbase
Loading required package: bayesm
Welcome to compositions, a package for compositional data analysis.
Find an intro with "? compositions"


Attaching package: ‘compositions’

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

    cor, cov, dist, var

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

    %*%, scale, scale.default

> # generate ilr-transformation
> data_ilr = ilr(dataobs_coda[, 1:3])
> uncert_ilr = t(simplify2array(apply(uncertainties_coda[, 1:3],1,
+                        function(Delta) clrvar2ilr(diag(Delta)))))
> attr(x = uncert_ilr, which = "class") <- "rmult"  # correct the class
> mylda_coda = vlda(x = data_ilr, uncertainties = uncert_ilr, grouping = dataobs_coda$Group)
Checking positive definiteness of corrected variance for all groups...
> mypred_coda = predict(mylda_coda, newdata = data_ilr, newerror = uncert_ilr)
> forplot_coda = cbind(dataobs_coda, LG1 = mypred_coda$posterior[,1])
> library(ggtern)
Error in library(ggtern) : there is no package called ‘ggtern’
Execution halted