newfam.Rout.save
R version 2.4.1 (2006-12-18)
Copyright (C) 2006 The R Foundation for Statistical Computing
ISBN 3-900051-07-0
R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.
R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.
Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
>
> library(aster)
Loading required package: trust
>
> famlist <- fam.default()
> print(famlist)
[[1]]
[1] "bernoulli"
[[2]]
[1] "poisson"
[[3]]
[1] "truncated.poisson(truncation = 0)"
[[4]]
[1] "truncated.poisson(truncation = 2)"
>
> aster:::setfam(famlist)
>
> aster:::getfam()
[[1]]
[[1]]$name
[1] "bernoulli"
[[1]]$origin
[1] 0
[[2]]
[[2]]$name
[1] "poisson"
[[2]]$origin
[1] 0
[[3]]
[[3]]$name
[1] "truncated.poisson"
[[3]]$truncation
[1] 0
[[3]]$origin
[1] 0
[[4]]
[[4]]$name
[1] "truncated.poisson"
[[4]]$truncation
[1] 2
[[4]]$origin
[1] 0
>
> aster:::getsupfam()
[[1]]
[[1]]$name
[1] "bernoulli"
[[2]]
[[2]]$name
[1] "poisson"
[[3]]
[[3]]$name
[1] "truncated.poisson"
[[3]]$truncation
[1] NA
[[4]]
[[4]]$name
[1] "negative.binomial"
[[4]]$size
[1] NA
[[5]]
[[5]]$name
[1] "truncated.negative.binomial"
[[5]]$size
[1] NA
[[5]]$truncation
[1] NA
[[6]]
[[6]]$name
[1] "normal.location"
[[6]]$sd
[1] NA
>
>