biến toàn cầu trong chức năng R

Question

Tôi tạo ra một chức năng để xử lý một số dữ liệu của tôi, như thế này:

a <- "old" 
test <- function (x) { 
    assign(x, "new", envir = .GlobalEnv) 
} 
test(a) 

Nhưng tôi không thể nhìn thấy một sự thay đổi từ "cũ" thành "mới", tôi đoán đây là một số "biến toàn cầu", bất kỳ đề xuất nào?

Cảm ơn!

Answer 1

cho assign(x,value), x cần phải là một tên của một biến không giá trị của nó, vì vậy x nên ở dạng ký tự: assign("a","new"), và để được sử dụng trong chức năng của bạn , hãy thử:

test <- function (x) 
{ 
    assign(deparse(substitute(x)), "new", envir = .GlobalEnv) 
} 

trong trường hợp của bạn, bạn sẽ tạo một biến có tên là "cũ" và gán "mới" với nó:

> old 
[1] "new" 

Answer 2

bạn có thể kết hợp chức năng của bạn với sapply chức năng, ví dụ:

require (plyr) 
b <- sapply (a, test) 
b 
    old 
"new" 

cách mà bạn đang áp dụng chức năng của bạn đến các yếu tố thực tế của a vector của bạn - như romunov chỉ ra trong câu trả lời của mình.

khác ví dụ:

a <- c("old", "oold", "ooold", "oooold") 
b <- sapply (a, test) 
b 
    old oold ooold oooold 
"new" "new" "new" "new"