if (FALSE) {
# Works with shiny.telemetry
issues <- bid_telemetry("telemetry.sqlite")
# Works with Shiny OpenTelemetry (1.12+)
issues <- bid_telemetry("otel_spans.json")
# Same analysis workflow for both
high_priority <- issues[issues$severity %in% c("critical", "high"), ]
# Use DBI connection directly
con <- DBI::dbConnect(RSQLite::SQLite(), "telemetry.sqlite")
issues <- bid_telemetry(con, table_name = "my_events")
DBI::dbDisconnect(con)
# Use with bridges for BID workflow
top_issue <- issues[1, ]
notice <- bid_notice_issue(top_issue, previous_stage = interpret_stage)
}
Run the code above in your browser using DataLab