Running examples in 'MAMSE-Ex.R' failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: MAMSE-package
> ### Title: Minimum Averaged Mean Squared Error (MAMSE) Weights.
> ### Aliases: MAMSE-package
> ### Keywords: package multivariate nonparametric survival univar
> 
> ### ** Examples
> 
> set.seed(2009)
> 
> # MAMSE weights for univariate data
> x=list(rnorm(25),rnorm(250,.1),rnorm(100,-.1))
> wx=MAMSE(x)
> 
> # Weighted Likelihood estimate for the mean (Normal model)
> sum(wx*sapply(x,mean))
[1] 0.01458792
> 
> #MAMSE weights for copulas
> rho=c(.25,.3,.15,.2)
> r=2*sin(rho*pi/600)
> y=list(0,0,0,0)
> for(i in 1:4){
+   sig=matrix(c(1,r,r,1),2,2)
+   y[[i]]=matrix(rnorm(150),nc=2)
+ }
Error in matrix(c(1, r, r, 1), 2, 2) : 
  data length differs from size of matrix: [10 != 2 x 2]
Execution halted
Running examples in ‘MAMSE-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: MAMSE-package
> ### Title: Minimum Averaged Mean Squared Error (MAMSE) Weights.
> ### Aliases: MAMSE-package
> ### Keywords: package multivariate nonparametric survival univar
> 
> ### ** Examples
> 
> set.seed(2009)
> 
> # MAMSE weights for univariate data
> x=list(rnorm(25),rnorm(250,.1),rnorm(100,-.1))
> wx=MAMSE(x)
> 
> # Weighted Likelihood estimate for the mean (Normal model)
> sum(wx*sapply(x,mean))
[1] 0.01458792
> 
> #MAMSE weights for copulas
> rho=c(.25,.3,.15,.2)
> r=2*sin(rho*pi/600)
> y=list(0,0,0,0)
> for(i in 1:4){
+   sig=matrix(c(1,r,r,1),2,2)
+   y[[i]]=matrix(rnorm(150),nc=2)
+ }
Error in matrix(c(1, r, r, 1), 2, 2) : 
  data length differs from size of matrix: [10 != 2 x 2]
Execution halted
File ‘MAMSE/libs/MAMSE.so’:
  Found no calls to: ‘R_registerRoutines’, ‘R_useDynamicSymbols’

It is good practice to register native routines and to disable symbol
search.

See ‘Writing portable packages’ in the ‘Writing R Extensions’ manual.
Running examples in ‘MAMSE-Ex.R’ failed
The error most likely occurred in:

> ### Name: MAMSE-package
> ### Title: Minimum Averaged Mean Squared Error (MAMSE) Weights.
> ### Aliases: MAMSE-package
> ### Keywords: package multivariate nonparametric survival univar
> 
> ### ** Examples
> 
> set.seed(2009)
> 
> # MAMSE weights for univariate data
> x=list(rnorm(25),rnorm(250,.1),rnorm(100,-.1))
> wx=MAMSE(x)
> 
> # Weighted Likelihood estimate for the mean (Normal model)
> sum(wx*sapply(x,mean))
[1] 0.01458792
> 
> #MAMSE weights for copulas
> rho=c(.25,.3,.15,.2)
> r=2*sin(rho*pi/600)
> y=list(0,0,0,0)
> for(i in 1:4){
+   sig=matrix(c(1,r,r,1),2,2)
+   y[[i]]=matrix(rnorm(150),nc=2)
+ }
Error in matrix(c(1, r, r, 1), 2, 2) : 
  data length differs from size of matrix: [10 != 2 x 2]
Execution halted
File ‘MAMSE/libs/MAMSE.so’:
  Found no calls to: ‘R_registerRoutines’, ‘R_useDynamicSymbols’

It is good practice to register native routines and to disable symbol
search.

See ‘Writing portable packages’ in the ‘Writing R Extensions’ manual.
Running examples in ‘MAMSE-Ex.R’ failed
The error most likely occurred in:

> ### Name: MAMSE-package
> ### Title: Minimum Averaged Mean Squared Error (MAMSE) Weights.
> ### Aliases: MAMSE-package
> ### Keywords: package multivariate nonparametric survival univar
> 
> ### ** Examples
> 
> set.seed(2009)
> 
> # MAMSE weights for univariate data
> x=list(rnorm(25),rnorm(250,.1),rnorm(100,-.1))
> wx=MAMSE(x)
> 
> # Weighted Likelihood estimate for the mean (Normal model)
> sum(wx*sapply(x,mean))
[1] 0.01458792
> 
> #MAMSE weights for copulas
> rho=c(.25,.3,.15,.2)
> r=2*sin(rho*pi/600)
> y=list(0,0,0,0)
> for(i in 1:4){
+   sig=matrix(c(1,r,r,1),2,2)
+   y[[i]]=matrix(rnorm(150),nc=2)
+ }
Error in matrix(c(1, r, r, 1), 2, 2) : 
  data length differs from size of matrix: [10 != 2 x 2]
Execution halted