Chiudi la porta
I metodi di un oggetto R6 possono accedere ai suoi campi privati usando il prefisso private$.
thing_factory <- R6Class(
"Thing",
private = list(
a_field = "a value",
another_field = 123
),
public = list(
do_something = function(x, y, z) {
# Access the private fields
paste(
private$a_field,
private$another_field
)
}
)
)
Questo esercizio fa parte del corso
Programmazione orientata agli oggetti con S3 e R6 in R
Istruzioni dell'esercizio
Una fabbrica di forni a microonde è stata in parte definita per te. È stata aggiornata per includere un campo privato door_is_open e un metodo pubblico open_door.
- Aggiungi un metodo pubblico chiamato
close_door()per chiudere lo sportello del microonde.- Il metodo non deve accettare argomenti.
- Nel corpo della funzione, imposta il campo
door_is_opensuFALSE.
esercizio interattivo pratico
Prova questo esercizio completando questo codice di esempio.
# Add a close_door() method
microwave_oven_factory <- R6Class(
"MicrowaveOven",
private = list(
power_rating_watts = 800,
door_is_open = FALSE
),
public = list(
cook = function(time_seconds) {
Sys.sleep(time_seconds)
print("Your food is cooked!")
},
open_door = function() {
private$door_is_open <- TRUE
},
___ = ___
)
)