# an example using simplify.list() and unsimplify.list()
# get the matrix for CIE XYZ at 5 nm step size
mat3x81 = colorimetry.genlist[[1]]
# create the matroid
mat5 = matroid( mat3x81 )
# test for simplicity
is_simple(mat5)
## [1] FALSE
# get the list of hyperplanes, and simplify
hyper = gethyperplane( mat5 )
hypersimple = simplify( hyper )
# print the loop and multiple data found
attr(hypersimple,'lmdata')
# unsimplify and compare to the originals
# the list attr(hypersimple,'lmdata') is 'secretly' used in unsimplify()
identical( unsimplify(hypersimple), hyper )
## [1] TRUE
Run the code above in your browser using DataLab