powered by
Object that represents a limit state function
expr
prepared for expression like SYS_LSF$expr <- expression(f_ck - d_nom)...
func
prepared for objective functions like SYS_LSF$func <- function(x)return(x[1] + x[2])
vars
needs list of PROB_BASEVAR-Object
name
Can be added for better recognition. Otherwise the problem will be called "Unkown Problem"
ExpressionToFunction()
Transforms a valid expression into a objective function. Need the set of Variables with correct spelled names and IDs
check()
Checks all variables. You dont need to execute this, since the system object will do anyway.
# NOT RUN { list_of_vars <- list(PROB_BASEVAR(),PROB_BASEVAR()) lsf1 <- SYS_LSF(name="my first lsf", vars=list_of_vars) lsf1$func <- function(var1,var2){var1-var2} # }
Run the code above in your browser using DataLab