# \donttest{
if (interactive()) {
# Create a shared session for multi-agent use
session <- create_shared_session(
model = "openai:gpt-4o",
sandbox_mode = "strict",
trace_enabled = TRUE
)
# Execute code safely
result <- session$execute_code("x <- 1:10; mean(x)")
# Check trace
print(session$trace_summary())
}
# }
Run the code above in your browser using DataLab