lapply - columns를 나누고 표준 편차를 계산합니다.

Question

저는 10 개의 data.frames로 목록을 얻었고 각 data.frame에 대해 두 개의 열을 나누고 상대 표준 편차를 계산해야합니다.

lapply를 사용하고 싶습니다. 여기

목록에 포함 된 data.frame 중 하나의 예를

:

df <- read.table(text = 'X Y 
2  4 
5  3 
1  2 
7  1 
4  2 
6  1', header = TRUE) 

내 모든 10 data.frames에 대한 lapply 다음과 같은 작업을 수행 할 수 있습니다

ratio <- df$X/df$Y 
sd <- sd(ratio) 

Answer 1

list을 lapply으로 반복하고 관심있는 열을 추출한 다음 '비율'을 얻기 위해 나눈 다음 해당 비율로 sd을 수행하면됩니다.

lapply(lst, function(x) {ratio <- x$X/x$Y 
         sd(ratio) }) 

는 'LST는'data.frame의의 list입니다 (너무 한 단계에서 수행 될 수있다).