# NOT RUN {
# load a polar volume
pvol <- system.file("extdata", "volume.h5", package = "bioRad")
vol <- read_pvolfile(pvol)
# elevations for the scans in the volume
get_elevation_angles(vol)
# extract the first scan:
scan <- vol$scans[[1]]
# elevation angle of the scan:
get_elevation_angles(scan)
# }
Run the code above in your browser using DataLab