[Distr-commits] r1024 - branches/distr-2.6/pkg/distrEllipse/tests/Examples
noreply at r-forge.r-project.org
noreply at r-forge.r-project.org
Sun May 3 08:17:56 CEST 2015
Author: stamats
Date: 2015-05-03 08:17:56 +0200 (Sun, 03 May 2015)
New Revision: 1024
Modified:
branches/distr-2.6/pkg/distrEllipse/tests/Examples/distrEllipse-Ex.Rout.save
Log:
updated Rout.save file
Modified: branches/distr-2.6/pkg/distrEllipse/tests/Examples/distrEllipse-Ex.Rout.save
===================================================================
--- branches/distr-2.6/pkg/distrEllipse/tests/Examples/distrEllipse-Ex.Rout.save 2015-05-03 06:16:19 UTC (rev 1023)
+++ branches/distr-2.6/pkg/distrEllipse/tests/Examples/distrEllipse-Ex.Rout.save 2015-05-03 06:17:56 UTC (rev 1024)
@@ -1,1114 +1,866 @@
-
-R version 3.0.1 Patched (2013-09-02 r63805) -- "Good Sport"
-Copyright (C) 2013 The R Foundation for Statistical Computing
-Platform: i386-w64-mingw32/i386 (32-bit)
-
-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.
-
- Natural language support but running in an English locale
-
-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.
-
-> pkgname <- "distrEllipse"
-> source(file.path(R.home("share"), "R", "examples-header.R"))
-> options(warn = 1)
-> options(pager = "console")
-> base::assign(".ExTimings", "distrEllipse-Ex.timings", pos = 'CheckExEnv')
-> base::cat("name\tuser\tsystem\telapsed\n", file=base::get(".ExTimings", pos = 'CheckExEnv'))
-> base::assign(".format_ptime",
-+ function(x) {
-+ if(!is.na(x[4L])) x[1L] <- x[1L] + x[4L]
-+ if(!is.na(x[5L])) x[2L] <- x[2L] + x[5L]
-+ options(OutDec = '.')
-+ format(x[1L:3L], digits = 7L)
-+ },
-+ pos = 'CheckExEnv')
->
-> ### * </HEADER>
-> library('distrEllipse')
-Loading required package: mvtnorm
-Loading required package: setRNG
-Loading required package: distr
-Loading required package: startupmsg
-:startupmsg> Utilities for start-up messages (version 0.9)
-:startupmsg>
-:startupmsg> For more information see ?"startupmsg",
-:startupmsg> NEWS("startupmsg")
-
-Loading required package: sfsmisc
-Loading required package: SweaveListingUtils
-:SweaveListingUtils> Utilities for Sweave together with
-:SweaveListingUtils> TeX listings package (version 0.7)
-:SweaveListingUtils>
-:SweaveListingUtils> NOTE: Support for this package
-:SweaveListingUtils> will stop soon.
-:SweaveListingUtils>
-:SweaveListingUtils> Package 'knitr' is providing the
-:SweaveListingUtils> same functionality in a better
-:SweaveListingUtils> way.
-:SweaveListingUtils>
-:SweaveListingUtils> Some functions from package 'base'
-:SweaveListingUtils> are intentionally masked ---see
-:SweaveListingUtils> SweaveListingMASK().
-:SweaveListingUtils>
-:SweaveListingUtils> Note that global options are
-:SweaveListingUtils> controlled by
-:SweaveListingUtils> SweaveListingoptions() ---c.f.
-:SweaveListingUtils> ?"SweaveListingoptions".
-:SweaveListingUtils>
-:SweaveListingUtils> For more information see
-:SweaveListingUtils> ?"SweaveListingUtils",
-:SweaveListingUtils> NEWS("SweaveListingUtils")
-:SweaveListingUtils> There is a vignette to this
-:SweaveListingUtils> package; try
-:SweaveListingUtils> vignette("ExampleSweaveListingUtils").
-
-
-Attaching package: 'SweaveListingUtils'
-
-The following objects are masked from 'package:base':
-
- library, require
-
-:distr> Object oriented implementation of distributions (version
-:distr> 2.5.2)
-:distr>
-:distr> Attention: Arithmetics on distribution objects are
-:distr> understood as operations on corresponding random variables
-:distr> (r.v.s); see distrARITH().
-:distr>
-:distr> Some functions from package 'stats' are intentionally masked
-:distr> ---see distrMASK().
-:distr>
-:distr> Note that global options are controlled by distroptions()
-:distr> ---c.f. ?"distroptions".
-:distr>
-:distr> For more information see ?"distr", NEWS("distr"), as well as
-:distr> http://distr.r-forge.r-project.org/
-:distr> Package "distrDoc" provides a vignette to this package as
-:distr> well as to several extension packages; try
-:distr> vignette("distr").
-
-
-Attaching package: 'distr'
-
-The following objects are masked from 'package:stats':
-
- df, qqplot, sd
-
-Loading required package: distrEx
-:distrEx> Extensions of package distr (version 2.5)
-:distrEx>
-:distrEx> Note: Packages "e1071", "moments", "fBasics" should be
-:distrEx> attached /before/ package "distrEx". See
-:distrEx> distrExMASK().Note: Extreme value distribution
-:distrEx> functionality has been moved to
-:distrEx>
-:distrEx> package "RobExtremes". See distrExMOVED().
-:distrEx>
-:distrEx> For more information see ?"distrEx", NEWS("distrEx"), as
-:distrEx> well as
-:distrEx> http://distr.r-forge.r-project.org/
-:distrEx> Package "distrDoc" provides a vignette to this package
-:distrEx> as well as to several related packages; try
-:distrEx> vignette("distr").
-
-
-Attaching package: 'distrEx'
-
-The following objects are masked from 'package:stats':
-
- IQR, mad, median, var
-
-Loading required package: distrSim
-:distrSim> Simulation classes based on package distr (version
-:distrSim> 2.5.2)
-:distrSim>
-:distrSim> Some functions from package 'stats' are intentionally
-:distrSim> masked ---see distrSimMASK().
-:distrSim>
-:distrSim>
-:distrSim> For more information see ?"distrSim",
-:distrSim> NEWS("distrSim"), as well as
-:distrSim> http://distr.r-forge.r-project.org/
-:distrSim> Package "distrDoc" provides a vignette to this package
-:distrSim> as well as to several related packages; try
-:distrSim> vignette("distr").
-
-
-Attaching package: 'distrSim'
-
-The following object is masked from 'package:stats':
-
- simulate
-
-The following object is masked from 'package:base':
-
- rbind
-
-:distrEllipse> S4 classes for elliptically contoured
-:distrEllipse> distributions (version 2.5)
-:distrEllipse>
-:distrEllipse> Some functions from package 'stats' are
-:distrEllipse> intentionally masked ---see
-:distrEllipse> distrEllipseMASK().
-:distrEllipse>
-:distrEllipse>
-:distrEllipse> For more information see ?"distrEllipse",
-:distrEllipse> NEWS("distrEllipse"), as well as
-:distrEllipse> http://distr.r-forge.r-project.org/
-:distrEllipse> Package "distrDoc" provides a vignette to this
-:distrEllipse> package as well as to several related
-:distrEllipse> packages; try vignette("distr").
-
->
-> base::assign(".oldSearch", base::search(), pos = 'CheckExEnv')
-> cleanEx()
-> nameEx("EllipticalDistribution-class")
-> ### * EllipticalDistribution-class
->
-> flush(stderr()); flush(stdout())
->
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: EllipticalDistribution-class
-> ### Title: Elliptical distribution class
-> ### Aliases: EllipticalDistribution-class
-> ### scale,EllipticalDistribution-method
-> ### location,EllipticalDistribution-method
-> ### scale<-,EllipticalDistribution-method
-> ### location<-,EllipticalDistribution-method
-> ### E,EllipticalDistribution,missing,missing-method
-> ### var,EllipticalDistribution-method
-> ### +,EllipticalDistribution,numeric-method
-> ### *,EllipticalDistribution,numeric-method
-> ### %*%,matrix,EllipticalDistribution-method
-> ### coerce,EllipticalDistribution,UnivariateDistribution-method
-> ### coerce,UnivariateDistribution,EllipticalDistribution-method
-> ### Keywords: distribution
->
-> ### ** Examples
->
-> new("EllipticalDistribution") ## better use EllipticalDistribution()
-Distribution Object of Class: EllipticalDistribution
- loc: (0,0)
- scale:
- [,1] [,2]
- [1,] 1.00, 0.00,
- [2,] 0.00, 1.00,
-
- Distribution of Lengths:
- Distribution Object of Class: AbscontDistribution
->
->
->
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("EllipticalDistribution-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("EllipticalDistribution")
-> ### * EllipticalDistribution
->
-> flush(stderr()); flush(stdout())
->
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: EllipticalDistribution
-> ### Title: Generating function for EllipticalDistribution-class
-> ### Aliases: EllipticalDistribution
-> ### Keywords: distribution
->
-> ### ** Examples
->
-> E0 <- EllipticalDistribution()
-> plot(E0)
-> E1 <- diag(1,2)%*%E0+c(1,2)
-> plot(E1)
-> E(E1)
-[1] 1 2
-> var(E1)
- [,1] [,2]
-[1,] 0.9999983 0.0000000
-[2,] 0.0000000 0.9999983
->
->
->
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("EllipticalDistribution", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("EllipticalParameter-class")
-> ### * EllipticalParameter-class
->
-> flush(stderr()); flush(stdout())
->
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: EllipticalParameter-class
-> ### Title: Paramter of an Elliptical distributions
-> ### Aliases: EllipticalParameter-class location
-> ### location,EllipticalParameter-method location<-
-> ### location<-,EllipticalParameter-method scale
-> ### scale,EllipticalParameter-method scale<-
-> ### scale<-,EllipticalParameter-method
-> ### Keywords: distribution models
->
-> ### ** Examples
->
-> new("EllipticalParameter")
-An object of class "EllipticalParameter"
-Slot "loc":
-[1] 0 0
-
-Slot "scale":
- [,1] [,2]
-[1,] 1 0
-[2,] 0 1
-
-Slot "name":
-[1] "parameter of an elliptically symmetric distribution"
-
->
->
->
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("EllipticalParameter-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("MVnormDistribution-class")
-> ### * MVnormDistribution-class
->
-> flush(stderr()); flush(stdout())
->
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: MVNormDistribution-class
-> ### Title: MVNorm distribution class
-> ### Aliases: MVNormDistribution-class sigma,MVNormDistribution-method
-> ### mean,MVNormDistribution-method
-> ### Keywords: distribution
->
-> ### ** Examples
->
-> new("MVNormDistribution") ## better use generating function MVNormDistribution()
-Distribution Object of Class: MVNormDistribution
- loc: (0,0)
- scale:
- [,1] [,2]
- [1,] 1.00, 0.00,
- [2,] 0.00, 1.00,
-
- Distribution of Lengths:
- Distribution Object of Class: AbscontDistribution
->
->
->
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MVnormDistribution-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("MVnormDistribution")
-> ### * MVnormDistribution
->
-> flush(stderr()); flush(stdout())
->
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: MVNormDistribution
-> ### Title: Generating function for MVNormDistribution-class
-> ### Aliases: MVNormDistribution MVNorm
-> ### Keywords: distribution
->
-> ### ** Examples
->
-> E0 <- MVNorm()
-> plot(E0)
-> E1 <- diag(1,2)%*%E0+c(1,2)
-> plot(E1)
-> E(E1)
-[1] 1 2
-> var(E1)
- [,1] [,2]
-[1,] 0.9999983 0.0000000
-[2,] 0.0000000 0.9999983
->
->
->
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MVnormDistribution", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("MVnormParameter-class")
-> ### * MVnormParameter-class
->
-> flush(stderr()); flush(stdout())
->
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: MVNormParameter-class
-> ### Title: Paramter of a multivariate normal distribution
-> ### Aliases: MVNormParameter-class mean mean,MVNormParameter-method sigma
-> ### sigma,MVNormParameter-method
-> ### Keywords: distribution models
->
-> ### ** Examples
->
-> new("MVNormParameter")
-An object of class "MVNormParameter"
-Slot "loc":
-[1] 0 0
-
-Slot "scale":
- [,1] [,2]
-[1,] 1 0
-[2,] 0 1
-
-Slot "name":
-[1] "parameter of an elliptically symmetric distribution"
-
->
->
->
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MVnormParameter-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("MVtDistribution-class")
-> ### * MVtDistribution-class
->
-> flush(stderr()); flush(stdout())
->
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: MVtDistribution-class
-> ### Title: MVt distribution class
-> ### Aliases: MVtDistribution-class sigma,MVtDistribution-method
-> ### df,MVtDistribution-method ncp,MVtDistribution-method
-> ### Keywords: distribution
->
-> ### ** Examples
->
-> new("MVtDistribution") ## better use generating function MVtDistribution()
-Distribution Object of Class: MVtDistribution
- df: 1
- ncp: 0
- loc: (0,0)
- scale:
- [,1] [,2]
- [1,] 1.00, 0.00,
- [2,] 0.00, 1.00,
-
- Distribution of Lengths:
- Distribution Object of Class: AbscontDistribution
->
->
->
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MVtDistribution-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("MVtDistribution")
-> ### * MVtDistribution
->
-> flush(stderr()); flush(stdout())
->
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: MVtDistribution
-> ### Title: Generating function for MvtDistribution-class
-> ### Aliases: MVtDistribution MVt
-> ### Keywords: distribution
->
-> ### ** Examples
->
-> E0 <- MVt()
-Warning in log(x) : NaNs produced
-Warning in log(x) : NaNs produced
-Warning in log(x) : NaNs produced
-> plot(E0)
-> E1 <- diag(1,2)%*%E0+c(1,2)
-> plot(E1)
-> E(E1)
-[1] 1 2
-> var(E1)
-Warning in log(x) : NaNs produced
-Warning in log(x) : NaNs produced
-Warning in log(x) : NaNs produced
-Warning in log(x) : NaNs produced
- [,1] [,2]
-[1,] 22.1488 0.0000
-[2,] 0.0000 22.1488
->
->
->
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MVtDistribution", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("MVtParameter-class")
-> ### * MVtParameter-class
->
-> flush(stderr()); flush(stdout())
->
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: MVtParameter-class
-> ### Title: Paramter of a multivariate t distribution
-> ### Aliases: MVtParameter-class sigma,MVtParameter-method
-> ### df,MVtParameter-method ncp,MVtParameter-method
-> ### Keywords: distribution models
->
-> ### ** Examples
->
-> new("MVtParameter")
-An object of class "MVtParameter"
-Slot "df":
-[1] 1
-
-Slot "ncp":
-[1] 0
-
-Slot "loc":
-[1] 0 0
-
-Slot "scale":
- [,1] [,2]
-[1,] 1 0
-[2,] 0 1
-
-Slot "name":
-[1] "parameter of multivariate t distribution"
-
->
->
->
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MVtParameter-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("MultivarDistrList-class")
-> ### * MultivarDistrList-class
->
-> flush(stderr()); flush(stdout())
->
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: MultivarDistrList-class
-> ### Title: List of multivariate distributions
-> ### Aliases: MultivarDistrList-class MVDistrList-class
-> ### coerce,MultivariateDistribution,MultivarDistrList-method
-> ### dim,MultivarDistrList-method dimension,MultivarDistrList-method
-> ### Keywords: distribution list
->
-> ### ** Examples
->
-> (DL1 <- MultivarDistrList(Norm(), Exp(), Pois()))
-An object of class "UnivarDistrList"
- [[1]] Distribution Object of Class: Norm
- :mean: 0
- :sd: 1
- [[2]] Distribution Object of Class: Exp
- :rate: 1
- [[3]] Distribution Object of Class: Pois
- :lambda: 1
-> (DL2 <- MultivarDistrList(MVNorm(),
-+ EllipticalDistribution(radDistr=Exp(), loc=c(1,2),
-+ scale=diag(c(3,1))),MVt()))
-Warning in log(x) : NaNs produced
-Warning in log(x) : NaNs produced
-Warning in log(x) : NaNs produced
-An object of class "MVDistrList"
- [[1]] Distribution Object of Class: MVNormDistribution
- :loc: (0,0)
- :scale:
- : :[,1] :[,2] :
- :[1,] : 1.00, : 0.00, :
- :[2,] : 0.00, : 1.00, :
- :
- Distribution of Lengths:
- :Distribution Object of Class: AbscontDistribution
- [[2]] Distribution Object of Class: EllipticalDistribution
- :loc: (1,2)
- :scale:
- : :[,1] :[,2] :
- :[1,] : 3.00, : 0.00, :
- :[2,] : 0.00, : 1.00, :
- :
- Distribution of Lengths:
- :Distribution Object of Class: Exp
- :rate: 1
- [[3]] Distribution Object of Class: MVtDistribution
- :df: 1
- :ncp: 0
- :loc: (0,0)
- :scale:
- : :[,1] :[,2] :
- :[1,] : 1.00, : 0.00, :
- :[2,] : 0.00, : 1.00, :
- :
- Distribution of Lengths:
- :Distribution Object of Class: AbscontDistribution
->
->
->
->
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MultivarDistrList-class", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("MultivarDistrList")
-> ### * MultivarDistrList
->
-> flush(stderr()); flush(stdout())
->
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: MultivarDistrList
-> ### Title: Generating function for MultivarDistrList-class
-> ### Aliases: MultivarDistrList
-> ### Keywords: list distribution
->
-> ### ** Examples
->
-> (DL1 <- MultivarDistrList(Norm(), Exp(), Pois()))
-An object of class "UnivarDistrList"
- [[1]] Distribution Object of Class: Norm
- :mean: 0
- :sd: 1
- [[2]] Distribution Object of Class: Exp
- :rate: 1
- [[3]] Distribution Object of Class: Pois
- :lambda: 1
-> (DL2 <- MultivarDistrList(MVNorm(),
-+ EllipticalDistribution(radDistr=Exp(), loc=c(1,2),
-+ scale=diag(c(3,1))),MVt()))
-Warning in log(x) : NaNs produced
-Warning in log(x) : NaNs produced
-Warning in log(x) : NaNs produced
-An object of class "MVDistrList"
- [[1]] Distribution Object of Class: MVNormDistribution
- :loc: (0,0)
- :scale:
- : :[,1] :[,2] :
- :[1,] : 1.00, : 0.00, :
- :[2,] : 0.00, : 1.00, :
- :
- Distribution of Lengths:
- :Distribution Object of Class: AbscontDistribution
- [[2]] Distribution Object of Class: EllipticalDistribution
- :loc: (1,2)
- :scale:
- : :[,1] :[,2] :
- :[1,] : 3.00, : 0.00, :
- :[2,] : 0.00, : 1.00, :
- :
- Distribution of Lengths:
- :Distribution Object of Class: Exp
- :rate: 1
- [[3]] Distribution Object of Class: MVtDistribution
- :df: 1
- :ncp: 0
- :loc: (0,0)
- :scale:
- : :[,1] :[,2] :
- :[1,] : 1.00, : 0.00, :
- :[2,] : 0.00, : 1.00, :
- :
- Distribution of Lengths:
- :Distribution Object of Class: AbscontDistribution
->
->
->
-> base::assign(".dptime", (proc.time() - get(".ptime", pos = "CheckExEnv")), pos = "CheckExEnv")
-> base::cat("MultivarDistrList", base::get(".format_ptime", pos = 'CheckExEnv')(get(".dptime", pos = "CheckExEnv")), "\n", file=base::get(".ExTimings", pos = 'CheckExEnv'), append=TRUE, sep="\t")
-> cleanEx()
-> nameEx("MultivarMixingDistribution-class")
-> ### * MultivarMixingDistribution-class
->
-> flush(stderr()); flush(stdout())
->
-> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
-> ### Name: MultivarMixingDistribution-class
-> ### Title: Class "MultivarMixingDistribution"
-> ### Aliases: MultivarMixingDistribution-class mixCoeff mixDistr mixCoeff<-
-> ### mixDistr<- mixCoeff<--methods mixDistr<--methods
-> ### mixCoeff<-,MultivarMixingDistribution-method
-> ### mixDistr<-,MultivarMixingDistribution-method mixCoeff-methods
-> ### mixDistr-methods mixCoeff,MultivarMixingDistribution-method
-> ### mixDistr,MultivarMixingDistribution-method
-> ### support,MultivarMixingDistribution-method
-> ### gaps,MultivarMixingDistribution-method
-> ### .logExact,MultivarMixingDistribution-method
-> ### .lowerExact,MultivarMixingDistribution-method
-> ### Symmetry,MultivarMixingDistribution-method
-> ### dimension,MultivarMixingDistribution-method
-> ### dim,MultivarMixingDistribution-method
-> ### E,MultivarMixingDistribution,ANY,ANY-method
-> ### show,MultivarMixingDistribution-method
-> ### showobj,MultivarMixingDistribution-method
-> ### Keywords: distribution
->
-> ### ** Examples
->
-> mylist <- MultivarMixingDistribution(Binom(3,.3), Dirac(2), Norm(),
-+ mixCoeff=c(1/4,1/5,11/20))
-[[1]]
-Distribution Object of Class: Binom
- size: 3
- prob: 0.3
-
-[[2]]
-Distribution Object of Class: Dirac
- location: 2
-
-[[3]]
-Distribution Object of Class: Norm
- mean: 0
- sd: 1
-
-Distribution Object of Class: Dirac
- location: 2
-> mylist2 <- MultivarMixingDistribution(Binom(3,.3), mylist,
-+ mixCoeff=c(.3,.7))
-[[1]]
-Distribution Object of Class: Binom
- size: 3
- prob: 0.3
-
-[[2]]
-An object of class "UnivarLebDecDistribution"
- --- a Lebesgue decomposed distribution:
-
- Its discrete part (with weight 0.450000) is a
- Distribution Object of Class: DiscreteDistribution
- This part is accessible with 'discretePart(<obj>)'.
-
- Its absolutely continuous part (with weight 0.550000) is a
- Distribution Object of Class: AbscontDistribution
- This part is accessible with 'acPart(<obj>)'.
-Warning in function (object) :
- arithmetics on distributions are understood as operations on r.v.'s
-see 'distrARITH()'; for switching off this warning see '?distroptions'
-
-An object of class "UnivarLebDecDistribution"
- --- a Lebesgue decomposed distribution:
-
- Its discrete part (with weight 0.450000) is a
- Distribution Object of Class: DiscreteDistribution
- This part is accessible with 'discretePart(<obj>)'.
-
- Its absolutely continuous part (with weight 0.550000) is a
- Distribution Object of Class: AbscontDistribution
- This part is accessible with 'acPart(<obj>)'.
-Warning in show(x) :
- arithmetics on distributions are understood as operations on r.v.'s
-see 'distrARITH()'; for switching off this warning see '?distroptions'
-> mylist2
-An object of class "UnivarLebDecDistribution"
- --- a Lebesgue decomposed distribution:
-
- Its discrete part (with weight 0.615000) is a
- Distribution Object of Class: DiscreteDistribution
- This part is accessible with 'discretePart(<obj>)'.
-
- Its absolutely continuous part (with weight 0.385000) is a
- Distribution Object of Class: AbscontDistribution
- This part is accessible with 'acPart(<obj>)'.
-Warning in function (object) :
- arithmetics on distributions are understood as operations on r.v.'s
-see 'distrARITH()'; for switching off this warning see '?distroptions'
-> p(mylist)(0.3)
-[1] 0.4256013
-> mixDistr(mylist2)
-An object of class "UnivarDistrList"
- [[1]] Distribution Object of Class: AbscontDistribution
- [[2]] Distribution Object of Class: DiscreteDistribution
-Warning in function (object) :
- arithmetics on distributions are understood as operations on r.v.'s
-see 'distrARITH()'; for switching off this warning see '?distroptions'
->
-> ##multivariate
-> E1 <- diag(1,2)%*%EllipticalDistribution(radDistr=Gammad())+c(1,2)
-> mylistD <- MultivarMixingDistribution(MVNorm(), E1, MVt(),
-+ mixCoeff=c(1/4,1/5,11/20))
-Warning in log(x) : NaNs produced
-Warning in log(x) : NaNs produced
-Warning in log(x) : NaNs produced
-[[1]]
-Distribution Object of Class: MVNormDistribution
- loc: (0,0)
- scale:
- [,1] [,2]
- [1,] 1.00, 0.00,
- [2,] 0.00, 1.00,
-
- Distribution of Lengths:
- Distribution Object of Class: AbscontDistribution
-
-[[2]]
-Distribution Object of Class: EllipticalDistribution
- loc: (1,2)
- scale:
- [,1] [,2]
- [1,] 1.00, 0.00,
- [2,] 0.00, 1.00,
-
- Distribution of Lengths:
- Distribution Object of Class: Gammad
- shape: 1
- scale: 1
-
-[[3]]
-Distribution Object of Class: MVtDistribution
- df: 1
- ncp: 0
- loc: (0,0)
- scale:
- [,1] [,2]
- [1,] 1.00, 0.00,
- [2,] 0.00, 1.00,
-
- Distribution of Lengths:
- Distribution Object of Class: AbscontDistribution
-
-Distribution Object of Class: EllipticalDistribution
- loc: (1,2)
- scale:
- [,1] [,2]
- [1,] 1.00, 0.00,
- [2,] 0.00, 1.00,
-
- Distribution of Lengths:
- Distribution Object of Class: Gammad
- shape: 1
- scale: 1
-> mylistD2 <- MultivarMixingDistribution(E1+c(-2,2), mylistD,
-+ mixCoeff=c(.3,.7))
-[[1]]
-Distribution Object of Class: EllipticalDistribution
- loc: (-1,4)
- scale:
- [,1] [,2]
- [1,] 1.00, 0.00,
- [2,] 0.00, 1.00,
-
- Distribution of Lengths:
- Distribution Object of Class: Gammad
- shape: 1
- scale: 1
-
-[[2]]
-An object of class "MultivarMixingDistribution"
- ---------------------------------------------
- It consists of 3 components
- Components:
- [[1]]Distribution Object of Class: MVNormDistribution
- :loc: (0,0)
- :scale:
- : :[,1] :[,2] :
- :[1,] : 1.00, : 0.00, :
- :[2,] : 0.00, : 1.00, :
- :
- Distribution of Lengths:
- :Distribution Object of Class: AbscontDistribution
- [[2]]Distribution Object of Class: EllipticalDistribution
- :loc: (1,2)
- :scale:
- : :[,1] :[,2] :
- :[1,] : 1.00, : 0.00, :
- :[2,] : 0.00, : 1.00, :
- :
- Distribution of Lengths:
- :Distribution Object of Class: Gammad
- :shape: 1
- :scale: 1
- [[3]]Distribution Object of Class: MVtDistribution
- :df: 1
- :ncp: 0
- :loc: (0,0)
- :scale:
- : :[,1] :[,2] :
- :[1,] : 1.00, : 0.00, :
- :[2,] : 0.00, : 1.00, :
- :
- Distribution of Lengths:
- :Distribution Object of Class: AbscontDistribution
- ---------------------------------------------
- Weights:
- 0.250000 0.200000 0.550000
- ---------------------------------------------
-
-An object of class "MultivarMixingDistribution"
- ---------------------------------------------
- It consists of 3 components
- Components:
- [[1]]Distribution Object of Class: MVNormDistribution
- :loc: (0,0)
- :scale:
- : :[,1] :[,2] :
- :[1,] : 1.00, : 0.00, :
- :[2,] : 0.00, : 1.00, :
- :
- Distribution of Lengths:
- :Distribution Object of Class: AbscontDistribution
- [[2]]Distribution Object of Class: EllipticalDistribution
- :loc: (1,2)
- :scale:
- : :[,1] :[,2] :
- :[1,] : 1.00, : 0.00, :
- :[2,] : 0.00, : 1.00, :
- :
- Distribution of Lengths:
- :Distribution Object of Class: Gammad
- :shape: 1
- :scale: 1
- [[3]]Distribution Object of Class: MVtDistribution
- :df: 1
- :ncp: 0
- :loc: (0,0)
- :scale:
- : :[,1] :[,2] :
- :[1,] : 1.00, : 0.00, :
- :[2,] : 0.00, : 1.00, :
- :
- Distribution of Lengths:
- :Distribution Object of Class: AbscontDistribution
- ---------------------------------------------
- Weights:
- 0.250000 0.200000 0.550000
- ---------------------------------------------
-> mylistD2
-An object of class "MultivarMixingDistribution"
- ---------------------------------------------
- It consists of 2 components
- Components:
- [[1]]Distribution Object of Class: EllipticalDistribution
- :loc: (-1,4)
- :scale:
- : :[,1] :[,2] :
- :[1,] : 1.00, : 0.00, :
- :[2,] : 0.00, : 1.00, :
- :
- Distribution of Lengths:
- :Distribution Object of Class: Gammad
- :shape: 1
- :scale: 1
- [[2]]An object of class "MultivarMixingDistribution"
- :---------------------------------------------
- :It consists of 3 components
- :Components:
- :[[1]]Distribution Object of Class: MVNormDistribution
- : :loc: (0,0)
- : :scale:
- : : : :[,1] : :[,2] : :
- : :[1,] : : 1.00, : : 0.00, : :
- : :[2,] : : 0.00, : : 1.00, : :
- : :
- Distribution of Lengths:
- : :Distribution Object of Class: AbscontDistribution
- :[[2]]Distribution Object of Class: EllipticalDistribution
- : :loc: (1,2)
- : :scale:
- : : : :[,1] : :[,2] : :
- : :[1,] : : 1.00, : : 0.00, : :
- : :[2,] : : 0.00, : : 1.00, : :
- : :
- Distribution of Lengths:
- : :Distribution Object of Class: Gammad
- : :shape: 1
- : :scale: 1
- :[[3]]Distribution Object of Class: MVtDistribution
- : :df: 1
- : :ncp: 0
- : :loc: (0,0)
- : :scale:
- : : : :[,1] : :[,2] : :
- : :[1,] : : 1.00, : : 0.00, : :
- : :[2,] : : 0.00, : : 1.00, : :
- : :
- Distribution of Lengths:
- : :Distribution Object of Class: AbscontDistribution
- :---------------------------------------------
- :Weights:
- :0.250000 :0.200000 :0.550000 :
- ---------------------------------------------
- ---------------------------------------------
- Weights:
- 0.300000 0.700000
- ---------------------------------------------
-> p(mylistD)
-NULL
-> mixDistr(mylistD2)
-An object of class "MVDistrList"
- [[1]] Distribution Object of Class: EllipticalDistribution
- :loc: (-1,4)
- :scale:
- : :[,1] :[,2] :
- :[1,] : 1.00, : 0.00, :
- :[2,] : 0.00, : 1.00, :
- :
- Distribution of Lengths:
- :Distribution Object of Class: Gammad
- :shape: 1
- :scale: 1
- [[2]] An object of class "MultivarMixingDistribution"
- :---------------------------------------------
- :It consists of 3 components
- :Components:
- :[[1]]Distribution Object of Class: MVNormDistribution
- : :loc: (0,0)
- : :scale:
- : : : :[,1] : :[,2] : :
- : :[1,] : : 1.00, : : 0.00, : :
- : :[2,] : : 0.00, : : 1.00, : :
- : :
- Distribution of Lengths:
- : :Distribution Object of Class: AbscontDistribution
- :[[2]]Distribution Object of Class: EllipticalDistribution
- : :loc: (1,2)
- : :scale:
- : : : :[,1] : :[,2] : :
- : :[1,] : : 1.00, : : 0.00, : :
- : :[2,] : : 0.00, : : 1.00, : :
- : :
- Distribution of Lengths:
- : :Distribution Object of Class: Gammad
- : :shape: 1
- : :scale: 1
- :[[3]]Distribution Object of Class: MVtDistribution
- : :df: 1
- : :ncp: 0
[TRUNCATED]
To get the complete diff run:
svnlook diff /svnroot/distr -r 1024
More information about the Distr-commits
mailing list