Глобальные и локальные переменные в R

<- делает назначение в современных условиях.

когда вы находитесь внутри функции R создает новую среду для вас. По умолчанию он включает в себя все из среды, в которой он был создан, поэтому вы можете использовать эти переменные, но все новое, что вы создаете, не будет записано в глобальную среду.

В большинстве случаев <<- назначит переменные уже в глобальной среде или даже создаст переменную в глобальной среде если вы находитесь внутри функции. Однако, это не совсем так просто, как это. Что он делает, это проверяет родительскую среду для переменной с именем интереса. Если он не находит его в вашей родительской среде, он переходит к родителю родительской среды (в момент создания функции) и ищет там. Он продолжает восходить к глобальной среде, и если он не найден в глобальной среде, он назначит переменную в глобальной среде.

этот может проиллюстрировать, что происходит.

bar <- "global"
foo <- function(){
    bar <- "in foo"
    baz <- function(){
        bar <- "in baz - before <<-"
        bar <<- "in baz - after <<-"
        print(bar)
    }
    print(bar)
    baz()
    print(bar)
}
> bar
[1] "global"
> foo()
[1] "in foo"
[1] "in baz - before <<-"
[1] "in baz - after <<-"
> bar
[1] "global"

в первый раз, когда мы печатаем бар, мы не позвонили foo тем не менее, он все равно должен быть глобальным - это имеет смысл. Во второй раз мы печатаем это внутри foo перед вызовом baz так что значение "в foo" имеет смысл. Ниже мы видим, что <<- на самом деле делает. Следующее напечатанное значение- " in baz-before <<-. Это потому что <<- не смотрит в текущая среда (если вы не находитесь в глобальной среде, в этом случае <<- действует как <-). Так что внутри baz значение бара остается как "в baz-before baz копия бара внутри foo меняется на "В баз", но, как мы видим, глобальный bar остается неизменной. Это потому, что копия bar это определяется внутри foo есть в родительской среде, когда мы создали baz Итак, это первый экземпляр bar это <<- видит и, таким образом, копия, которую он назначает. Так что <<- это не просто прямое назначение глобальной среде.

<<- сложно, и я бы не рекомендовал использовать его, если вы можете избежать этого. Если вы действительно хотите назначить глобальную среду, вы можете использовать функцию assign и явно указать ей, что вы хотите назначить глобально.

теперь я меняю <<- для оператора assign и мы можем видеть, какой эффект это имеет:

bar <- "global"
foo <- function(){
    bar <- "in foo"   
    baz <- function(){
        assign("bar", "in baz", envir = .GlobalEnv)
    }
    print(bar)
    baz()
    print(bar)
}
bar
#[1] "global"
foo()
#[1] "in foo"
#[1] "in foo"
bar
#[1] "in baz"

так что оба раза мы печатаем бар внутри foo значение "в foo" даже после вызова baz. Это потому что assign никогда даже не рассматривал копию bar внутри foo, потому что мы сказали ему, где именно искать. Однако на этот раз значение bar в глобальной среде было изменено, потому что мы явно назначили там.

теперь вы также спросили о создании локальных переменных, и вы можете сделать это довольно легко, а также без создания функции... Нам просто нужно использовать local функция.

bar <- "global"
# local will create a new environment for us to play in
local({
    bar <- "local"
    print(bar)
})
#[1] "local"
bar
#[1] "global"

немного больше по тем же линиям

attrs <- {}

attrs.a <- 1

f <- function(d) {
    attrs.a <- d
}

f(20)
print(attrs.a)

выведет "1"

attrs <- {}

attrs.a <- 1

f <- function(d) {
   attrs.a <<- d
}

f(20)
print(attrs.a)

печать "20"