checkRd: (-1) hmmm.model.Rd:45: Lost braces; missing escapes or markup?
    45 | with categories k_1, k_2, the joint frequencies y = {y_ij}, where i=1,...,k_1, j=1,...,k_2, 
       |                                                     ^
Running examples in ‘hmmm-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: anova.hidden
> ### Title: anova for the class hidden
> ### Aliases: anova.hidden
> ### Keywords: package
> 
> ### ** Examples
> data(drinks)
> y<-cbind(drinks$lemon.tea,drinks$orange.juice)
> 
> f<-~lat*tea+lat*juice+tea*juice  # lat indicates the latent variable
> fm<-c("l-l-l")
> fmargobs<-marg.list(fm,mflag="m")
> Ptr<-matrix(c(0.941, 0.199,
+                0.059, 0.801),2,2,byrow=TRUE)
> Ptobs<-matrix(c(0.053, 0.215, 0.206, 0.001, 0.039, 0.021, 0.020, 0.176, 0.270,
+                 0.000, 0.000, 0.000, 0.048, 0.263, 0.360, 0.065, 0.053, 0.211)
+                 ,2,9,byrow=TRUE)
> 
> # saturated model (fsat<-~lat*tea*juice is implicit)
> model.obsf<-hmmm.model(marg=fmargobs,
+ lev=c(2,3,3),names=c("lat","tea","juice"))
> modelsat<-hidden.emfit(y,model.obsf,y.eps=0.01,maxit=10,
+ maxiter=2500,norm.diff.conv=0.001,old.tran.p=Ptr,bb=Ptobs)
Error in while (((norm.diff > norm.diff.conv) || (norm.score > norm.score.conv)) &  : 
  missing value where TRUE/FALSE needed
Calls: hidden.emfit -> hidden.emfit.S -> hmmm.mlfit -> mphineq.fit
Execution halted
checkRd: (-1) hmmm.model.Rd:45: Lost braces; missing escapes or markup?
    45 | with categories k_1, k_2, the joint frequencies y = {y_ij}, where i=1,...,k_1, j=1,...,k_2, 
       |                                                     ^
Running examples in ‘hmmm-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: anova.hidden
> ### Title: anova for the class hidden
> ### Aliases: anova.hidden
> ### Keywords: package
> 
> ### ** Examples
> data(drinks)
> y<-cbind(drinks$lemon.tea,drinks$orange.juice)
> 
> f<-~lat*tea+lat*juice+tea*juice  # lat indicates the latent variable
> fm<-c("l-l-l")
> fmargobs<-marg.list(fm,mflag="m")
> Ptr<-matrix(c(0.941, 0.199,
+                0.059, 0.801),2,2,byrow=TRUE)
> Ptobs<-matrix(c(0.053, 0.215, 0.206, 0.001, 0.039, 0.021, 0.020, 0.176, 0.270,
+                 0.000, 0.000, 0.000, 0.048, 0.263, 0.360, 0.065, 0.053, 0.211)
+                 ,2,9,byrow=TRUE)
> 
> # saturated model (fsat<-~lat*tea*juice is implicit)
> model.obsf<-hmmm.model(marg=fmargobs,
+ lev=c(2,3,3),names=c("lat","tea","juice"))
> modelsat<-hidden.emfit(y,model.obsf,y.eps=0.01,maxit=10,
+ maxiter=2500,norm.diff.conv=0.001,old.tran.p=Ptr,bb=Ptobs)
Error in while (((norm.diff > norm.diff.conv) || (norm.score > norm.score.conv)) &  : 
  missing value where TRUE/FALSE needed
Calls: hidden.emfit -> hidden.emfit.S -> hmmm.mlfit -> mphineq.fit
Execution halted
checkRd: (-1) hmmm.model.Rd:45: Lost braces; missing escapes or markup?
    45 | with categories k_1, k_2, the joint frequencies y = {y_ij}, where i=1,...,k_1, j=1,...,k_2, 
       |                                                     ^
Running examples in ‘hmmm-Ex.R’ failed
The error most likely occurred in:

> ### Name: anova.hidden
> ### Title: anova for the class hidden
> ### Aliases: anova.hidden
> ### Keywords: package
> 
> ### ** Examples
> data(drinks)
> y<-cbind(drinks$lemon.tea,drinks$orange.juice)
> 
> f<-~lat*tea+lat*juice+tea*juice  # lat indicates the latent variable
> fm<-c("l-l-l")
> fmargobs<-marg.list(fm,mflag="m")
> Ptr<-matrix(c(0.941, 0.199,
+                0.059, 0.801),2,2,byrow=TRUE)
> Ptobs<-matrix(c(0.053, 0.215, 0.206, 0.001, 0.039, 0.021, 0.020, 0.176, 0.270,
+                 0.000, 0.000, 0.000, 0.048, 0.263, 0.360, 0.065, 0.053, 0.211)
+                 ,2,9,byrow=TRUE)
> 
> # saturated model (fsat<-~lat*tea*juice is implicit)
> model.obsf<-hmmm.model(marg=fmargobs,
+ lev=c(2,3,3),names=c("lat","tea","juice"))
> modelsat<-hidden.emfit(y,model.obsf,y.eps=0.01,maxit=10,
+ maxiter=2500,norm.diff.conv=0.001,old.tran.p=Ptr,bb=Ptobs)
Error in while (((norm.diff > norm.diff.conv) || (norm.score > norm.score.conv)) &  : 
  missing value where TRUE/FALSE needed
Calls: hidden.emfit -> hidden.emfit.S -> hmmm.mlfit -> mphineq.fit
Execution halted
checkRd: (-1) hmmm.model.Rd:45: Lost braces; missing escapes or markup?
    45 | with categories k_1, k_2, the joint frequencies y = {y_ij}, where i=1,...,k_1, j=1,...,k_2, 
       |                                                     ^
Running examples in ‘hmmm-Ex.R’ failed
The error most likely occurred in:

> ### Name: anova.hidden
> ### Title: anova for the class hidden
> ### Aliases: anova.hidden
> ### Keywords: package
> 
> ### ** Examples
> data(drinks)
> y<-cbind(drinks$lemon.tea,drinks$orange.juice)
> 
> f<-~lat*tea+lat*juice+tea*juice  # lat indicates the latent variable
> fm<-c("l-l-l")
> fmargobs<-marg.list(fm,mflag="m")
> Ptr<-matrix(c(0.941, 0.199,
+                0.059, 0.801),2,2,byrow=TRUE)
> Ptobs<-matrix(c(0.053, 0.215, 0.206, 0.001, 0.039, 0.021, 0.020, 0.176, 0.270,
+                 0.000, 0.000, 0.000, 0.048, 0.263, 0.360, 0.065, 0.053, 0.211)
+                 ,2,9,byrow=TRUE)
> 
> # saturated model (fsat<-~lat*tea*juice is implicit)
> model.obsf<-hmmm.model(marg=fmargobs,
+ lev=c(2,3,3),names=c("lat","tea","juice"))
> modelsat<-hidden.emfit(y,model.obsf,y.eps=0.01,maxit=10,
+ maxiter=2500,norm.diff.conv=0.001,old.tran.p=Ptr,bb=Ptobs)
Error in while (((norm.diff > norm.diff.conv) || (norm.score > norm.score.conv)) &  : 
  missing value where TRUE/FALSE needed
Calls: hidden.emfit -> hidden.emfit.S -> hmmm.mlfit -> mphineq.fit
Execution halted
checkRd: (-1) hmmm.model.Rd:45: Lost braces; missing escapes or markup?
    45 | with categories k_1, k_2, the joint frequencies y = {y_ij}, where i=1,...,k_1, j=1,...,k_2, 
       |                                                     ^
Running examples in 'hmmm-Ex.R' failed
The error most likely occurred in:

> ### Name: anova.hidden
> ### Title: anova for the class hidden
> ### Aliases: anova.hidden
> ### Keywords: package
> 
> ### ** Examples
> data(drinks)
> y<-cbind(drinks$lemon.tea,drinks$orange.juice)
> 
> f<-~lat*tea+lat*juice+tea*juice  # lat indicates the latent variable
> fm<-c("l-l-l")
> fmargobs<-marg.list(fm,mflag="m")
> Ptr<-matrix(c(0.941, 0.199,
+                0.059, 0.801),2,2,byrow=TRUE)
> Ptobs<-matrix(c(0.053, 0.215, 0.206, 0.001, 0.039, 0.021, 0.020, 0.176, 0.270,
+                 0.000, 0.000, 0.000, 0.048, 0.263, 0.360, 0.065, 0.053, 0.211)
+                 ,2,9,byrow=TRUE)
> 
> # saturated model (fsat<-~lat*tea*juice is implicit)
> model.obsf<-hmmm.model(marg=fmargobs,
+ lev=c(2,3,3),names=c("lat","tea","juice"))
> modelsat<-hidden.emfit(y,model.obsf,y.eps=0.01,maxit=10,
+ maxiter=2500,norm.diff.conv=0.001,old.tran.p=Ptr,bb=Ptobs)
Error in while (((norm.diff > norm.diff.conv) || (norm.score > norm.score.conv)) &  : 
  missing value where TRUE/FALSE needed
Calls: hidden.emfit -> hidden.emfit.S -> hmmm.mlfit -> mphineq.fit
Execution halted
checkRd: (-1) hmmm.model.Rd:45: Lost braces; missing escapes or markup?
    45 | with categories k_1, k_2, the joint frequencies y = {y_ij}, where i=1,...,k_1, j=1,...,k_2, 
       |                                                     ^
Running examples in ‘hmmm-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: anova.hidden
> ### Title: anova for the class hidden
> ### Aliases: anova.hidden
> ### Keywords: package
> 
> ### ** Examples
> data(drinks)
> y<-cbind(drinks$lemon.tea,drinks$orange.juice)
> 
> f<-~lat*tea+lat*juice+tea*juice  # lat indicates the latent variable
> fm<-c("l-l-l")
> fmargobs<-marg.list(fm,mflag="m")
> Ptr<-matrix(c(0.941, 0.199,
+                0.059, 0.801),2,2,byrow=TRUE)
> Ptobs<-matrix(c(0.053, 0.215, 0.206, 0.001, 0.039, 0.021, 0.020, 0.176, 0.270,
+                 0.000, 0.000, 0.000, 0.048, 0.263, 0.360, 0.065, 0.053, 0.211)
+                 ,2,9,byrow=TRUE)
> 
> # saturated model (fsat<-~lat*tea*juice is implicit)
> model.obsf<-hmmm.model(marg=fmargobs,
+ lev=c(2,3,3),names=c("lat","tea","juice"))
> modelsat<-hidden.emfit(y,model.obsf,y.eps=0.01,maxit=10,
+ maxiter=2500,norm.diff.conv=0.001,old.tran.p=Ptr,bb=Ptobs)
Error in while (((norm.diff > norm.diff.conv) || (norm.score > norm.score.conv)) &  : 
  missing value where TRUE/FALSE needed
Calls: hidden.emfit -> hidden.emfit.S -> hmmm.mlfit -> mphineq.fit
Execution halted
checkRd: (-1) hmmm.model.Rd:45: Lost braces; missing escapes or markup?
    45 | with categories k_1, k_2, the joint frequencies y = {y_ij}, where i=1,...,k_1, j=1,...,k_2, 
       |                                                     ^
checkRd: (-1) hmmm.model.Rd:45: Lost braces; missing escapes or markup?
    45 | with categories k_1, k_2, the joint frequencies y = {y_ij}, where i=1,...,k_1, j=1,...,k_2, 
       |                                                     ^
Running examples in 'hmmm-Ex.R' failed
The error most likely occurred in:

> ### Name: anova.hidden
> ### Title: anova for the class hidden
> ### Aliases: anova.hidden
> ### Keywords: package
> 
> ### ** Examples
> data(drinks)
> y<-cbind(drinks$lemon.tea,drinks$orange.juice)
> 
> f<-~lat*tea+lat*juice+tea*juice  # lat indicates the latent variable
> fm<-c("l-l-l")
> fmargobs<-marg.list(fm,mflag="m")
> Ptr<-matrix(c(0.941, 0.199,
+                0.059, 0.801),2,2,byrow=TRUE)
> Ptobs<-matrix(c(0.053, 0.215, 0.206, 0.001, 0.039, 0.021, 0.020, 0.176, 0.270,
+                 0.000, 0.000, 0.000, 0.048, 0.263, 0.360, 0.065, 0.053, 0.211)
+                 ,2,9,byrow=TRUE)
> 
> # saturated model (fsat<-~lat*tea*juice is implicit)
> model.obsf<-hmmm.model(marg=fmargobs,
+ lev=c(2,3,3),names=c("lat","tea","juice"))
> modelsat<-hidden.emfit(y,model.obsf,y.eps=0.01,maxit=10,
+ maxiter=2500,norm.diff.conv=0.001,old.tran.p=Ptr,bb=Ptobs)
Error in while (((norm.diff > norm.diff.conv) || (norm.score > norm.score.conv)) &  : 
  missing value where TRUE/FALSE needed
Calls: hidden.emfit -> hidden.emfit.S -> hmmm.mlfit -> mphineq.fit
Execution halted