View source: R/evidence_schema.R
| bind_evidence | R Documentation |
Row-binds multiple evidence data.frames after validating each one.
bind_evidence(...)
... |
Evidence data.frames to bind. |
A single combined evidence data.frame.
ctx <- suppressMessages(r4sub_run_context("STUDY1", "DEV"))
make_ev <- function(ind_id) {
suppressMessages(as_evidence(
data.frame(
asset_type = "validation", asset_id = "ADSL",
source_name = "pinnacle21", indicator_id = ind_id,
indicator_name = ind_id, indicator_domain = "quality",
severity = "low", result = "pass",
stringsAsFactors = FALSE
),
ctx = ctx
))
}
ev1 <- make_ev("IND-001")
ev2 <- make_ev("IND-002")
combined <- suppressMessages(bind_evidence(ev1, ev2))
nrow(combined)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.