# \donttest{
if (interactive()) {
my_func <- function(a = 1, b = "text", c = TRUE) {}
schema <- create_schema_from_func(my_func)
print(schema)
# Override defaults
schema_override <- create_schema_from_func(my_func, params = list(a = 99))
}
# }
Run the code above in your browser using DataLab