3 回答
TA貢獻2003條經驗 獲得超2個贊
<<-
powersquarecube
power <- function(exponent) {
function(x) x ^ exponent}square <- power(2)square(2) # -> [1] 4square(4) # -> [1] 16cube <- power(3)cube(2) # -> [1] 8cube(4) # -> [1] 64<<-<-
new_counteri
new_counter <- function() {
i <- 0
function() {
# do something useful, then ...
i <<- i + 1
i }}counter_onecounter_two
counter_one <- new_counter()counter_two <- new_counter()counter_one() # -> [1] 1counter_one() # -> [1] 2counter_two() # -> [1] 1
TA貢獻2021條經驗 獲得超8個贊
<<-assigninheritsTRUEassignassign<<-
<<-assign(x, value, inherits=TRUE)
search).
apply
<<-
- 3 回答
- 0 關注
- 680 瀏覽
添加回答
舉報
