Có một phương thức công khai đặc biệt tên là initialize() (lưu ý cách viết theo tiếng Anh Mỹ). Phương thức này không được người dùng gọi trực tiếp. Thay vào đó, nó được tự động gọi khi một đối tượng được tạo; tức là khi người dùng gọi new().

initialize() cho phép bạn đặt giá trị cho các private field khi tạo một đối tượng R6. Mẫu của một hàm initialize() như sau:

thing_factory <- R6Class(
  "Thing",
  private = list(
    a_field = "a value",
    another_field = 123
  ),
  public = list(
    initialize = function(a_field, another_field) {
      if(!missing(a_field)) {
        private$a_field <- a_field
      }
      if(!missing(another_field)) {
        private$another_field <- another_field
      }
    }
  )
)

Lưu ý cách dùng missing() (docs). Hàm này trả về TRUE nếu một đối số không được truyền trong lời gọi hàm.

Các đối số truyền cho phương thức new() của factory sẽ được chuyển cho initialize().

a_thing <- thing_factory$new(
  a_field = "a different value", 
  another_field = 456
)

Ẩn bớt độ phức tạp với tính đóng gói

Create Your Free Account