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

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: path.plot
> ### Title: Coefficients path plot
> ### Aliases: path.plot
> 
> ### ** Examples
> 
>   require(SFSI)
>   data(wheatHTP)
>   
>   index = which(Y$CV == 1)              # Use only a subset of data
>   M = scale(M[index,])/sqrt(ncol(M))    # Subset and scale markers
>   G = tcrossprod(M)                     # Genomic relationship matrix
>   y = as.vector(scale(Y[index,"E1"]))   # Subset response variable
>   X = scale(X_E1[index,])               # Reflectance data
>   
>   # Sparse phenotypic regression
>   fm1 = LARS(var(X),cov(y,X))
>   
>   # Sparse family index
>   fm2 = SSI(y,K=G,tst=1:10,trn=11:50)
 Fitting SSI model for nTST=10 and nTRN=40 individuals

  |                                                                            
  |                                                                      |   0%
  |                                                                            
  |=======                                                               |  10%
  |                                                                            
  |==============                                                        |  20%
  |                                                                            
  |=====================                                                 |  30%
  |                                                                            
  |============================                                          |  40%
  |                                                                            
  |===================================                                   |  50%
  |                                                                            
  |==========================================                            |  60%
  |                                                                            
  |=================================================                     |  70%
  |                                                                            
  |========================================================              |  80%
  |                                                                            
  |===============================================================       |  90%
  |                                                                            
  |======================================================================| 100%
>   
>   
>   # Path plot for the first individual in testing set for the SSI
>   path.plot(fm2, K=G, tst=fm2$tst[1])
Error in loadNamespace(x) : there is no package called ‘viridis’
Calls: path.plot ... loadNamespace -> withRestarts -> withOneRestart -> doWithOneRestart
Execution halted