Cách áp dụng hàm trung bình trên các thành phần của danh sách trong R

Question

Tôi có danh sách và tôi muốn sử dụng lapply() để tính giá trị trung bình của các thành phần của nó. Ví dụ, đối với mặt hàng thứ bảy trong danh sách tôi có:

>list[[7]] 
[1] 1 1 1 1 1 1 1 1 1 1 

và đầu ra của tôi nên là:

> mean(temp[[7]][1:10]) 
[1] 1 

Nhưng khi tôi sử dụng lapply() như dưới đây kết quả sẽ là cái gì khác. Tôi nên làm gì?

> lapply(list[[7]][1:10],mean) 
[[1]] 
[1] 1 

[[2]] 
[1] 1 
. 
. 
. 
[[10]] 
[1] 1 

Answer 1

Để lấy giá trị trung bình của phần tử thứ 7 của danh sách, chỉ cần sử dụng mean(list[[7]]). Để lấy giá trị trung bình của từng phần tử trong danh sách, hãy sử dụng lapply(list,mean). Và đó là một ý tưởng thực sự tồi khi gọi danh sách của bạn list.

Answer 2

xem xét sử dụng sapply thay vì lapply.

# sample data 
a<- 1:3 
dat <- list(a, a*2, a*3) 

# sapply gives a tidier output 
> sapply(dat, mean) 
[1] 2 4 6 

> lapply(dat, mean) 
[[1]] 
[1] 2 

[[2]] 
[1] 4 

[[3]] 
[1] 6 

---

Ngoài ra, bạn có thể muốn xem xét gói plyr. This question cũng làm tốt công việc giải thích các chức năng * áp dụng khác nhau