1. เรียนรู้
  2. /
  3. Courses
  4. /
  5. R における S3 と R6 を使ったオブジェクト指向プログラミング

Connected

Exercises

First Thing's First

initialize() という特別な公開メソッドが 1 つあります(アメリカ英語の綴りに注意してください)。これはユーザーが直接呼び出すものではありません。代わりに、オブジェクトが作成されるとき、つまりユーザーが new() を呼び出したときに自動的に実行されます。

initialize() を使うと、R6 オブジェクトを作成するときに private フィールドの値を設定できます。initialize() 関数のパターンは次のとおりです。

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
      }
    }
  )
)

missing()(docs)の使い方に注目してください。これは、関数呼び出しで引数が渡されなかった場合に TRUE を返します。

ファクトリーの new() メソッドに渡された引数は、initialize() に渡されます。

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

คำแนะนำ

100 XP

電子レンジのファクトリーが一部まで定義されています。

  • initialize() という名前の公開メソッドを追加してください。これにより、オブジェクト作成時に power_rating_watts と door_is_open フィールドをユーザーが設定できるようにします。
    • 引数は power_rating_watts と door_is_open にしてください。
    • initialize() メソッドの本体では、各引数について、それが missing()(docs)でなければ、対応する private フィールドを設定してください。
  • 650 ワットの出力で、ドアが開いている電子レンジオブジェクトを作成してください。
    • microwave_oven_factory の new() メソッドを呼び出します。
    • new() に power_rating_watts = 650 と door_is_open = TRUE を渡します。
    • 結果を a_microwave_oven に代入してください。