데이터 프레임 목록에서 모든 데이터 프레임의 특정 열을 호출하십시오.

Question

데이터 프레임 목록에서 모든 데이터 프레임의 특정 열을보고하고자합니다. 어떤 아이디어? 내 코드는 다음과 같습니다.

# Create dissimilarity matrix 
df.diss<-dist(t(df[,6:11])) 

mds.table<-list() # empty list of values 
for(i in 1:6){ # For Loop to iterate over a command in a function 
    a<-mds(pk.diss,ndim=i, type="ratio", verbose=TRUE,itmax=1000) 
    mds.table[[i]]<-a # Store output in empty list 
} 

이제 여기서 제가 문제가 있습니다. 값을 저장 한 후에는 목록에서 모든 데이터 프레임의 특정 열을 호출 할 수 없습니다.

# This function should call every $stress column from each data frame. 
lapply(mds.table, function(x){ 
    mds.table[[x]]$stress 
    }) 

다시 한번 감사드립니다!

Answer 1

당신은 매우 가까이 :

set.seed(1) 
l_df <- lapply(1:5, function(x){ 
    data.frame(a = sample(1:5,5), b = sample(1:5,5)) 
}) 

lapply(l_df, function(x){ 
    x[['a']] 
}) 

[[1]] 
[1] 2 5 4 3 1 

[[2]] 
[1] 2 1 3 4 5 

[[3]] 
[1] 5 1 2 4 3 

[[4]] 
[1] 3 5 2 1 4 

[[5]] 
[1] 5 3 4 2 1