search for: getdogage

...}) setMethodS3("setAge", "Person", function(this,num, ...) { this$.age = num; }) # .......................................... setConstructorS3("Dog", function(dog_age=NA) { this = extend(Object(), "Dog", .dog_age=dog_age ) this }) setMethodS3("getDogAge", "Dog", function(this, ...) { this$.dog_age; }) setMethodS3("setDogAge", "Dog", function(this,num, ...) { this$.dog_age = num; }) #.......................................................... setConstructorS3("PerDog", function(age=NA,wt=NA,dog_age=NU...