# NOT RUN {
# Without predefined values
Color <- enum(c("Red", "Blue", "Green"))
Color
myColor <- Color$Red
myColor
# With predefined values
Symbol <- enum(c(Diamond = 1, Triangle = 2, Circle = 2))
Symbol
mySymbol <- Symbol$Diamond
mySymbol
# }
Run the code above in your browser using DataLab