Skip to main content

Browse the archive

Revision 61fc3cd89e7f6776279333b534652356c7059f89 authored by Charles J. Geyer on 13 June 2021, 03:40:32 UTC, committed by cran-robot on 13 June 2021, 03:40:32 UTC 
version 1.1-2
1 parent 1cc05f6
Raw File
chk.R 

 library(aster)

 aster:::setfam(fam.default())

 .C(aster:::C_aster_check_model,
     nind = as.integer(42),
     nnode = as.integer(4),
     pred = as.integer(c(0, 1, 2, 3)),
     fam = as.integer(c(1, 1, 2, 3)))

 options(error=dump.frames)

 .C(aster:::C_aster_check_model,
     nind = as.integer(0),
     nnode = as.integer(4),
     pred = as.integer(c(0, 1, 2, 3)),
     fam = as.integer(c(1, 1, 2, 3)))

 .C(aster:::C_aster_check_model,
     nind = as.integer(42),
     nnode = as.integer(-3),
     pred = as.integer(c(0, 1, 2, 3)),
     fam = as.integer(c(1, 1, 2, 3)))

 .C(aster:::C_aster_check_model,
     nind = as.integer(42),
     nnode = as.integer(4),
     pred = as.integer(c(0, 2, 2, 3)),
     fam = as.integer(c(1, 1, 2, 3)))

 .C(aster:::C_aster_check_model,
     nind = as.integer(42),
     nnode = as.integer(4),
     pred = as.integer(c(0, 1, 2, 3)),
     fam = as.integer(c(1, 1, 2, 25)))
back to top