새 열의 데이터 프레임의 첫 번째 행을 (목록으로) 변환하고 첫 번째 행을 삭제합니다.

Question

25 개의 데이터 프레임으로 구성된 목록이 있는데 각 데이터 프레임의 첫 번째 행을 첫 번째 행을 열로 변환하고 첫 번째 행을 삭제하고 싶습니다. 행. 여기

목록에 포함 된 내 dataframes 두 가지의 예 : 어떤 도움

[[24]] 
        V1  V2  V3 V4     V5 V6 
1 01/10/1979 09:00:00 153.392 50 (G) calc 12/09/1980 07:15:00 85003 
2 01/10/1980 09:00:00 143.276 50 (G) calc 07/02/1981 14:00:00 85003 
3 01/10/1981 09:00:00 149.138 200 (V) calc 20/11/1981 05:00:00 85003 
[...] 

[[25]] 
        V1  V2  V3 V4     V5 V6 
1 01/10/1972 09:00:00 77.277 200 (V) calc 02/12/1972 04:15:00 94001 
2 01/10/1973 09:00:00 94.340 200 (V) calc 19/01/1974 13:45:00 94001 
3 01/10/1974 09:00:00 116.410 200 (V) calc 08/12/1974 01:30:00 94001 
[....] 

감사를 다음과 같이

[[24]] 
        V1  V2  V3 V4     V5 
1    85003  NA         
2 01/10/1979 09:00:00 153.392 50 (G) calc 12/09/1980 07:15:00 
3 01/10/1980 09:00:00 143.276 50 (G) calc 07/02/1981 14:00:00 
4 01/10/1981 09:00:00 149.138 200 (V) calc 20/11/1981 05:00:00 
[...] 

[[25]] 
        V1  V2  V3 V4     V5 
1    94001  NA         
2 01/10/1972 09:00:00 77.277 200 (V) calc 02/12/1972 04:15:00 
3 01/10/1973 09:00:00 94.340 200 (V) calc 19/01/1974 13:45:00 
4 01/10/1974 09:00:00 116.410 200 (V) calc 08/12/1974 01:30:00 
[....] 

내 최종 출력이되어야한다.

Answer 1

우리는 사용할 수 lapply

lst1 <- lapply(lst, function(x) transform(x, V6 = V1[1])[-1,])