if (FALSE) {
Hi <- PyClass("Hi", list(
name = NULL,
`__init__` = function(self, name) {
self$name <- name
NULL
},
say_hi = function(self) {
paste0("Hi ", self$name)
}
))
a <- Hi("World")
}
Run the code above in your browser using DataLab