如何将数组/列表添加到对象

Question

我创建了一个学生班：

setClass("student", slots=list(name="character", age="numeric", GPA="numeric"))

现在我想创建另一个类：

setClass("classRoom", slots=list(id = "numeric"),contains = "student")

唯一的问题是我想要添加一个学生列表而不是一个学生。

我如何实现这一目标？

Answer 1

我猜你已经实现了你想要的。 在classRoom中添加学生课程将允许访问班级学生的所有属性。您现在可以在classRoom中输入具有class student属性的新学生。

# define a class called student
setClass("student", slots=list(name="character", age="numeric", GPA="numeric"))

# inherit from student
setClass("classRoom", slots=list(id = "numeric"),contains = "student")

# Now create new objects of classroom:
> s1 <- new("classRoom",name="John", age=21, GPA=3.5, id=001)
> s2 <- new("classRoom",name="Grisham", age=24, GPA=345, id=002)
> s3 <- new("classRoom",name="Flamingo", age=22, GPA=3.8, id=003)

像这样，您已在班级中添加了学生。