개인 변수로 R 함수를 만드는 방법은 무엇입니까?

Question

모두가 동일한 개인 변수에 액세스하는 R 함수 집합을 어떻게 만듭니 까?

및 writeSetting(key,value) 같은 기능을 모두 동일한 숨겨진 목록에서 작동하도록 만들려한다고 가정 해 봅시다 settings. 내가

local({ 
    settings <- list() 
    readSetting <<- function (key) settings[[key]] 
    writeSetting <<- function (key, value) settings[[key]] = value 
}) 

다음

... readSetting 및 writeSetting ... 그래서처럼하려고하면 local 전화의 외부 표시되지 않습니다. 내가 그들이 볼 수 있도록하려면, 내가 먼저 local 전화 외부

readSetting <- writeSetting <- NULL 

을 지정해야합니다. 변수가 공개 된 두 가지 다른 방법으로 말하면 내 코드가 DRY가 아니기 때문에 더 나은 방법이 있어야합니다.

(이 작품의 맥락은 내가 R 패키지를 개발하고있어,이 코드는 source를 통해 주요 파일로로드 보조 파일에있을 것입니다.)이 질문은 How to limit the scope of the variables used in a script?하지만 관련이

거기에 대한 대답은 내 문제를 해결하지 못합니다.

Answer 1

당신은 그 사용 R6Class 패키지 다음과 같은 매우 거친 코드처럼 뭔가를해야만 시뮬레이션 할 수 있습니다 :

Privates <- R6Class("Privates", 
       public=list(
        readSetting = function(key) { 
         private$settings[[key]] 
        }, 
        writeSetting = function(key,value) { 
         private$settings[[key]] <<- value 
        } 
        ), 
       private=list(
        settings = list() 
       ) 
) 
a <- Privates$new() 
a$writeSetting("a",4) 
a$readSetting("a") 

가 직접 a$setting 작동하지 않을 설정 O를 읽고.