Skrývání složitosti pomocí zapouzdření

Objektově orientované programování s S3 a R6 v R

Richie Cotton

Data Evangelist at DataCamp

Zapouzdření

|

implementation | user interface

|

microwave_oven_factory <- R6Class(
  "MicrowaveOven",
  private = list(
    power_rating_watts = 800,

    door_is_open = FALSE

  ),

  public = list(

    open_door = function() {

      private$door_is_open <- TRUE

    }

  )

)

private$ přistupuje k privátním prvkům

self$ přistupuje k veřejným prvkům

Shrnutí

Zapouzdření = oddělení implementace od UI
Data ukládejte do seznamu private
Metody ukládejte do seznamu public
Pomocí private$ přistupujte k privátním prvkům
... a self$ pro přístup k veřejným prvkům

Pojďme si procvičit!

Objektově orientované programování s S3 a R6 v R