data(vdendool)
nh_modes <- eot(x = vdendool, y = NULL, n = 3,
standardised = FALSE,
verbose = TRUE)
subs <- subset(nh_modes, 2:3) # is the same as
subs <- nh_modes[[2:3]]
## effect of 'drop=FALSE' when selecting a single layer
subs <- subset(nh_modes, 2)
class(subs)
subs <- subset(nh_modes, 2, drop = TRUE)
class(subs)
Run the code above in your browser using DataLab