readgii | R Documentation |
Reads a GIFTI File and parses the output
readgii(file) readGIfTI(file) read_gifti(file)
file |
Name of file to read |
List of values
if (have_gifti_test_data(outdir = NULL)) { gii_files = download_gifti_data(outdir = NULL) gii_list = lapply(gii_files, readgii) surf_files = grep("white[.]surf[.]gii", gii_files, value = TRUE) surfs = lapply(surf_files, surf_triangles) col_file = grep("white[.]shape[.]gii", gii_files, value = TRUE) cdata = readgii(col_file) cdata = cdata$data$shape mypal = grDevices::colorRampPalette(colors = c("blue", "black", "red")) n = 4 breaks = quantile(cdata) ints = cut(cdata, include.lowest = TRUE, breaks = breaks) ints = as.integer(ints) stopifnot(!any(is.na(ints))) cols = mypal(n)[ints] cols = cols[surfs[[1]]$triangle] } ## Not run: if (have_gifti_test_data(outdir = NULL)) { if (requireNamespace("rgl", quietly = TRUE)) { rgl::rgl.open() rgl::rgl.triangles(surfs[[1]]$pointset, color = cols) rgl::play3d(rgl::spin3d(), duration = 5) } } ## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.