# تعریف یک کلاس S4
setClass("Person",
         slots = list(name = "character", age = "numeric"))