inst/examples/colorEnum.S

setClass("Color", contains = "EnumValue")

ColorEnum = c(Red = 1, Green = 2, Blue = 3)
storage.mode(ColorEnum) = "integer"

setAs("character", "Color",
         function(from)
            EnumValue(from, new("Color")))

setAs("numeric", "Color",
         function(from)
            EnumValue(from, new("Color")))
omegahat/RDCOMClient documentation built on July 24, 2022, 5:45 a.m.