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

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: TEAM
> ### Title: Testing on an Aggregation Tree Method
> ### Aliases: TEAM
> 
> ### ** Examples
> 
> set.seed(1)
> # Simulate local shift difference for each population from mixture of normals
> N1 <- N2 <- 1e6
> require(ks) #loads rnorm.mixt function
Loading required package: ks
> #Controls
> x1 <- rnorm.mixt(N1,mus=c(0.2,0.89),sigmas=c(0.04,0.01),props=c(0.97,0.03))
> #Cases
> x2 <- rnorm.mixt(N2,mus=c(0.2,0.88),sigmas=c(0.04,0.01),props=c(0.97,0.03))
> res <- TEAM(x1,x2,K=14,alpha=0.05,L=3)
Error in unlist(indx.list[rej.x], rej.xtra) : 'recursive' is NA
Calls: TEAM -> unique -> unlist
Execution halted
Running examples in ‘TEAM-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: TEAM
> ### Title: Testing on an Aggregation Tree Method
> ### Aliases: TEAM
> 
> ### ** Examples
> 
> set.seed(1)
> # Simulate local shift difference for each population from mixture of normals
> N1 <- N2 <- 1e6
> require(ks) #loads rnorm.mixt function
Loading required package: ks
> #Controls
> x1 <- rnorm.mixt(N1,mus=c(0.2,0.89),sigmas=c(0.04,0.01),props=c(0.97,0.03))
> #Cases
> x2 <- rnorm.mixt(N2,mus=c(0.2,0.88),sigmas=c(0.04,0.01),props=c(0.97,0.03))
> res <- TEAM(x1,x2,K=14,alpha=0.05,L=3)
Error in unlist(indx.list[rej.x], rej.xtra) : 'recursive' is NA
Calls: TEAM -> unique -> unlist
Execution halted
Running examples in ‘TEAM-Ex.R’ failed
The error most likely occurred in:

> ### Name: TEAM
> ### Title: Testing on an Aggregation Tree Method
> ### Aliases: TEAM
> 
> ### ** Examples
> 
> set.seed(1)
> # Simulate local shift difference for each population from mixture of normals
> N1 <- N2 <- 1e6
> require(ks) #loads rnorm.mixt function
Loading required package: ks
> #Controls
> x1 <- rnorm.mixt(N1,mus=c(0.2,0.89),sigmas=c(0.04,0.01),props=c(0.97,0.03))
> #Cases
> x2 <- rnorm.mixt(N2,mus=c(0.2,0.88),sigmas=c(0.04,0.01),props=c(0.97,0.03))
> res <- TEAM(x1,x2,K=14,alpha=0.05,L=3)
Error in unlist(indx.list[rej.x], rej.xtra) : 'recursive' is NA
Calls: TEAM -> unique -> unlist
Execution halted
Running examples in ‘TEAM-Ex.R’ failed
The error most likely occurred in:

> ### Name: TEAM
> ### Title: Testing on an Aggregation Tree Method
> ### Aliases: TEAM
> 
> ### ** Examples
> 
> set.seed(1)
> # Simulate local shift difference for each population from mixture of normals
> N1 <- N2 <- 1e6
> require(ks) #loads rnorm.mixt function
Loading required package: ks
> #Controls
> x1 <- rnorm.mixt(N1,mus=c(0.2,0.89),sigmas=c(0.04,0.01),props=c(0.97,0.03))
> #Cases
> x2 <- rnorm.mixt(N2,mus=c(0.2,0.88),sigmas=c(0.04,0.01),props=c(0.97,0.03))
> res <- TEAM(x1,x2,K=14,alpha=0.05,L=3)
Error in unlist(indx.list[rej.x], rej.xtra) : 'recursive' is NA
Calls: TEAM -> unique -> unlist
Execution halted
Running examples in 'TEAM-Ex.R' failed
The error most likely occurred in:

> ### Name: TEAM
> ### Title: Testing on an Aggregation Tree Method
> ### Aliases: TEAM
> 
> ### ** Examples
> 
> set.seed(1)
> # Simulate local shift difference for each population from mixture of normals
> N1 <- N2 <- 1e6
> require(ks) #loads rnorm.mixt function
Loading required package: ks
> #Controls
> x1 <- rnorm.mixt(N1,mus=c(0.2,0.89),sigmas=c(0.04,0.01),props=c(0.97,0.03))
> #Cases
> x2 <- rnorm.mixt(N2,mus=c(0.2,0.88),sigmas=c(0.04,0.01),props=c(0.97,0.03))
> res <- TEAM(x1,x2,K=14,alpha=0.05,L=3)
Error in unlist(indx.list[rej.x], rej.xtra) : 'recursive' is NA
Calls: TEAM -> unique -> unlist
Execution halted
'LazyData' is specified without a 'data' directory
'LazyData' is specified without a 'data' directory
'LazyData' is specified without a 'data' directory
'LazyData' is specified without a 'data' directory
'LazyData' is specified without a 'data' directory
'LazyData' is specified without a 'data' directory
'LazyData' is specified without a 'data' directory
'LazyData' is specified without a 'data' directory