Dbase: Dbase

In ShinsukeSakai0321/LimitState: Package supporting FORM approach

Description

Base class for the expression of distribution. The main function is to evaluate the equivalent normal distribution at specific estimation point.

Usage

Arbitrary distribution is expressed by inheritting this base class

Public function

Standard reference class is R6 class
Public function

function	contents	variable(s)
initialize(mu,sigmma)	initializes the object	mu:mean value,sigmma:std. value
Eq(X)	returns (mean,std.) list of equivalent norm. distribution	X:estimaion point
GetMeanSig()	returns (mu,std.) list of the distribution

Note

Gnormal, GLognormal, GGumbel, GWeibull have been deveoped as the inheritted classes

Author(s)

Shinsuke Sakai

Examples

#Definition of class for log normal distribution
GLognormal <- R6Class("GLognormal",
                      inherit=Dbase,
                      public = list(
                        Eq = function(X){
                          zeta <- sqrt(log(1+ (private$sigmmaX / private$muX)**2))
                          lambda <- log(private$muX) - 0.5 * zeta*zeta
                          phi <- dnorm(qnorm(plnorm(X, lambda, zeta)))
                          fXi <- dlnorm(X, lambda, zeta)
                          sigm <- phi / fXi
                          mu <- X - qnorm(plnorm(X, lambda, zeta)) * sigm
                          c(mu, sigm)
                        }
                      )
)
#main program
dist <- GLognormal$new(4,1)
dist$Eq(1.0)
  

ShinsukeSakai0321/LimitState documentation built on Dec. 26, 2019, 11:31 a.m.