Description Usage Arguments Details Value See Also Examples
An editset
combines numerical (linear), categorical and conditional restrictions
in a single object. Internally, it consists of two editmatrices
and an editarray
.
summary
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | editset(editrules, env = new.env())
## S3 method for class 'editset'
as.character(x, datamodel = TRUE, useIf = TRUE,
dummies = FALSE, ...)
## S3 method for class 'editset'
as.data.frame(x, ...)
## S3 method for class 'editset'
c(...)
## S3 method for class 'editset'
summary(object, useBlocks = TRUE, ...)
|
editrules |
|
env |
environment to parse categorical edits in (normally, users need not specify this) |
x |
an |
datamodel |
include datamodel? |
useIf |
return vectorized version? |
dummies |
return datamodel for dummy variables? |
... |
arguments to be passed to or from other methods |
object |
an R object |
useBlocks |
|
The function editset
converts a character
or expression
vector to an editset.
Alternatively, a data.frame
with a column called edit
can be supplied. Function
editfile
reads edits from a free-form textfile.
editset
: An object of class editset
as.data.frame
: a data.frame
with columns 'name' and 'edit'.
editrules.plotting
, violatedEdits
, localizeErrors
,
getVars
, disjunct
, eliminate
, substValue
,
isFeasible
, contains
, is.editset
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 | # edits can be read from a vector of expressions
E <- editset(expression(
if ( x > 0 ) y > 0,
x + y == z,
A %in% letters[1:2],
B %in% letters[2:3],
if ( A == 'a') B == 'b',
if ( A == 'b') x >= 0,
u + v == w,
if ( u >= 0 ) w >= 0
))
E
summary(E)
as.data.frame(E)
getVars(E)
getVars(E,type='cat')
getVars(E,type='num')
## see also editfile
E <- editfile(system.file('script/edits/mixedits.R',package='editrules'))
E
summary(E)
as.data.frame(E)
getVars(E)
getVars(E,type='cat')
getVars(E,type='num')
# edits can be read from a vector of expressions
E <- editset(expression(
if ( x > 0 ) y > 0,
x + y == z,
A %in% letters[1:2],
B %in% letters[2:3],
if ( A == 'a') B == 'b',
if ( A == 'b') x >= 0,
u + v == w,
if ( u >= 0 ) w >= 0
))
E
summary(E)
as.data.frame(E)
getVars(E)
getVars(E,type='cat')
getVars(E,type='num')
## see also editfile
E <- editfile(system.file('script/edits/mixedits.R',package='editrules'))
E
summary(E)
as.data.frame(E)
getVars(E)
getVars(E,type='cat')
getVars(E,type='num')
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.