# Minimal executable example using assets_light
ex <- data.frame(
Sulcus = c("S.C._left.opening", "S.C._right.opening",
"S.F.int._left.opening", "S.F.int._right.opening"),
Value = c(1, 0.5, 0.8, 0.4)
)
assets_light <- sulcimap::get_assets_light()
p <- plot_sulci(
sulcus_values = ex,
measure = "opening",
palette = "gyr",
show_colorbar = FALSE,
base_dir = assets_light,
save_dir = NULL
)
# p is a ggplot/patchwork object; printing it will draw the figure.
# \donttest{
# Full example
# df should have columns: Sulcus (BrainVISA-style names with suffixes), Value
# plot_out <- plot_sulci(
# sulcus_values = df,
# palette = "gyr",
# value_range = NULL,
# save_dir = NULL,
# measure = "opening",
# show_colorbar = TRUE,
# caption = expression(-log[10](p))
# )
# }
Run the code above in your browser using DataLab