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

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: lvnet
> ### Title: Confirmatory Latent Variable Network Models
> ### Aliases: lvnet
> 
> ### ** Examples
> 
> # Load dataset:
> library("lavaan")
This is lavaan 0.6-3
lavaan is BETA software! Please report any bugs.

Attaching package: ‘lavaan’

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

    vech

> data(HolzingerSwineford1939)
> Data <- HolzingerSwineford1939[,7:15]
> 
> # Measurement model:
> Lambda <- matrix(0, 9, 3)
> Lambda[1:3,1] <- NA
> Lambda[4:6,2] <- NA
> Lambda[7:9,3] <- NA
> 
> # Fit CFA model:
> CFA <- lvnet(Data, lambda = Lambda)
> 
> # Latent network:
> Omega_psi <- matrix(c(
+   0,NA,NA,
+   NA,0,0,
+   NA,0,0
+ ),3,3,byrow=TRUE)
> 
> # Fit model:
> LNM <- lvnet(Data, lambda = Lambda, omega_psi=Omega_psi)
> 
> # Compare fit:
> lvnetCompare(cfa=CFA,lnm=LNM)
          Df      AIC      BIC     EBIC    Chisq Chisq diff Df diff
Saturated  0       NA       NA       NA  0.00000         NA      NA
cfa       24 7517.490 7595.339 7835.038 85.30552  85.305522      24
lnm       25 7516.494 7590.637 7818.921 86.31009   1.004565       1
            Pr(>Chisq)
Saturated           NA
cfa       8.502553e-09
lnm       3.162085e-01
> 
> # Summary:
> summary(LNM)
========== lvnet ANALYSIS RESULTS ========== 

Input: 
	Model:			 
	Number of manifests:	 9 
	Number of latents:	 3 
	Number of parameters:	 20 
	Number of observations	 301

Test for exact fit: 
	Chi-square:		 86.31 
	DF:			 25 
	p-value:		 0

Information criteria: 
	AIC:			 7516.494 
	BIC:			 7590.637 
	Adjusted BIC:		 7527.208 
	Extended BIC:		 7818.921

Fit indices: 
	CFI:			 0.931 
	NFI:			 0.906 
	TLI:			 0.9 
	RFI:			 0.865 
	IFI:			 0.931 
	RNI:			 0.931 
	RMR:			 0.077 
	SRMR:			 0.061

RMSEA: 
	RMSEA:			 0.09 
	90% CI lower bound:	 0.07 
	90% CI upper bound:	 0.111 
	p-value:		 0.001

Parameter estimates:
Error in `[[<-.data.frame`(`*tmp*`, i, value = c("lambda_1_1", NA)) : 
  replacement has 2 rows, data has 1
Calls: summary ... [<-.data.frame -> xpdrows.data.frame -> [[<- -> [[<-.data.frame
Execution halted