함수에 변수 이름을 전달하고 루프 내에서 출력하십시오.

Question

이 질문에 대한 변형이있는 것 같지만 루프 및 이름 지정 및 출력 파일에있는 상황을 해결하지 못하는 것 같습니다. 어떻게 생각하니?

for(j in 1:3) { 
    for(k in 1:17){ 
     extract_[j]km <- extract(RasterStack, SpatialPolygonsDataFrame_[j]km, layer=[k], nl=1, df=TRUE) 
    } 
} 

추출 기능은 래스터 패키지에서 가져온 것입니다. 나는 이미 일련의 RasterStacks와 SpatialPolygon을 만들었고, 이것을 몇개의 파라미터를 가지는 함수 ("추출")에 건네주고 싶습니다. 몇개의 파라미터는 루프를 조작하고 출력에 라벨을 붙이고 싶습니다. 이것은 BASH의 산들 바람입니다. 그러나 R에서 이것을 이해할 수는 없습니다.

궁극적으로 문자열을 전달하고 싶지만, another post은 거기에있는 것처럼 보입니다.

EDIT : 원래 위의 함수를 단일 데이터 프레임으로 게시했습니다. 실제로는 래스터 패키지 (궁극적으로는 데이터 프레임 임)에서 지정된 개체입니다.

Answer 1

저스틴 (Justin)이 지적했듯이,리스트 작업은 많은 명명 된 변수가있는 작업 영역을 엉망으로 만드는 것보다 R의 구조와 더 유사합니다. 작업 공간에 많은 것을 가지고 있으면 다음에 "알 수있는"객체가있을 때 신속하게 작업하기가 어려워집니다.

당신의 방법 : 개인적으로

for(j in 1:3) { 
assign(
    paste("extract",j,"km",sep=""), # or paste0 to avoid need for sep="" 
    function(
      get(
       paste("data",j,"km",sep="") 
       ) 
      ) 
    ) 
} 

, 나는 나는 목록에 데이터 객체로 변환하는 방법과 그 목록의 모든 요소에 함수를 실행하는 방법을 보여, 그래서 아래 목록 작업을 선호합니다. 이런 방식으로 작업하면 대개 "get"및 "assign"방식으로 문자열을 사용할 필요가 없습니다.

# just converting your variables to a list  
data.list <- mget(grep("data",ls(),value=TRUE),envir=.GlobalEnv) 

# then output results 
result.list <- lapply(data.list,your_function)