# NOT RUN {
x <- as.relation(1 : 3)
relation_properties(x)
relation_property(x, "is_endorelation")
# }
# NOT RUN {
<!-- % relation_property(x, "is_linear_order") -->
# }
# NOT RUN {
<!-- % relation_property(x, "is_linear_order") <- relation_is(x, "linear_order") -->
# }
# NOT RUN {
<!-- % relation_property(x, "is_linear_order") -->
# }
Run the code above in your browser using DataLab