[Robast-commits] r760 - in branches/robast-1.0/pkg/RobAStBase: R man

[noreply at r-forge.r-project.org]

Author: ruckdeschel
Date: 2014-07-24 14:58:41 +0200 (Thu, 24 Jul 2014)
New Revision: 760

Added:
   branches/robast-1.0/pkg/RobAStBase/man/biastype-methods.Rd
   branches/robast-1.0/pkg/RobAStBase/man/normtype-methods.Rd
Modified:
   branches/robast-1.0/pkg/RobAStBase/R/interpolRisks.R
Log:
[RobAStBase] interpolRisks gain biastype and normtype methods

Modified: branches/robast-1.0/pkg/RobAStBase/R/interpolRisks.R
===================================================================
--- branches/robast-1.0/pkg/RobAStBase/R/interpolRisks.R	2014-07-24 12:29:21 UTC (rev 759)
+++ branches/robast-1.0/pkg/RobAStBase/R/interpolRisks.R	2014-07-24 12:58:41 UTC (rev 760)
@@ -4,4 +4,6 @@
 RMXRRisk <- function(samplesize = 100)  new("RMXRRisk",type=".RMXE", samplesize = samplesize)
 setMethod("samplesize","interpolRisk", function(object)object at samplesize)
 setReplaceMethod("samplesize","interpolRisk", function(object, value){
-       object at samplesize <- value; object})
\ No newline at end of file
+       object at samplesize <- value; object})
+setMethod("biastype","interpolRisk", function(object) NormType())
+setMethod("normtype","interpolRisk", function(object) symmetricBias())
\ No newline at end of file

Added: branches/robast-1.0/pkg/RobAStBase/man/biastype-methods.Rd
===================================================================
--- branches/robast-1.0/pkg/RobAStBase/man/biastype-methods.Rd	                        (rev 0)
+++ branches/robast-1.0/pkg/RobAStBase/man/biastype-methods.Rd	2014-07-24 12:58:41 UTC (rev 760)
@@ -0,0 +1,18 @@
+\name{biastype-methods}
+\docType{methods}
+\alias{biastype,interpolRisk-method}
+\alias{biastype}
+\title{Methods for Function biastype  in Package `RobAStBase'}
+\description{biastype-methods}
+
+\section{Methods}{\describe{
+
+\item{biastype}{\code{signature(object = "interpolrisk")}:
+  returns the slot \code{biastype} of an object of class \code{"interpolrisk"}. }
+}}
+\examples{
+myrisk <- MBRRisk(biastype=100)
+biastype(myrisk)
+}
+\concept{risk}
+\keyword{classes}

Added: branches/robast-1.0/pkg/RobAStBase/man/normtype-methods.Rd
===================================================================
--- branches/robast-1.0/pkg/RobAStBase/man/normtype-methods.Rd	                        (rev 0)
+++ branches/robast-1.0/pkg/RobAStBase/man/normtype-methods.Rd	2014-07-24 12:58:41 UTC (rev 760)
@@ -0,0 +1,18 @@
+\name{normtype-methods}
+\docType{methods}
+\alias{normtype,interpolRisk-method}
+\alias{normtype}
+\title{Methods for Function normtype  in Package `RobAStBase'}
+\description{normtype-methods}
+
+\section{Methods}{\describe{
+
+\item{normtype}{\code{signature(object = "interpolrisk")}:
+  returns the slot \code{normtype} of an object of class \code{"interpolrisk"}. }
+}}
+\examples{
+myrisk <- MBRRisk(normtype=100)
+normtype(myrisk)
+}
+\concept{risk}
+\keyword{classes}