Tính trung bình hàng ngày trong R

Question

Nói rằng tôi có ma trận sau:

x1 = 1:288 
x2 = matrix(x1,nrow=96,ncol=3) 

Có một cách dễ dàng để có được giá trị trung bình của dòng 1: 24,25: 48,49: 72,73: 96 cho cột 2?

Về cơ bản tôi có chuỗi thời gian một năm và tôi phải tính trung bình một số dữ liệu sau mỗi 24 giờ.

Answer 1

Có.

Giả sử chúng ta có những ngày:

Days <- rep(1:4,each=24) 

bạn có thể làm một cách dễ dàng

tapply(x2[,2],Days,mean) 

Nếu bạn có một dataframe với một biến ngày, bạn có thể sử dụng một trong đó. Bạn có thể làm điều đó cho tất cả các biến cùng một lúc, sử dụng tổng hợp:

x2 <- as.data.frame(cbind(x2,Days)) 
aggregate(x2[,1:3],by=list(Days),mean) 

Hãy xem các tệp trợ giúp của các chức năng này để bắt đầu. Cũng đừng tìm kiếm ở đây, có khá một số câu trả lời thú vị khác trên vấn đề này:

• Aggregating daily content
• Compute means of a group by factor

PS: Nếu bạn đang đi để làm rất nhiều chuỗi thời gian, bạn nên hãy xem gói zoo (trên CRAN: http://cran.r-project.org/web/packages/zoo/index.html)

Answer 2

Cách nhỏ gọn và tính toán nhanh chóng để thực hiện việc này là định hình lại vectơ thành ma trận phù hợp và tính cột ans.

colMeans(matrix(x2[,2],nrow=24)) 

Answer 3

1) ts. Do đây là một chuỗi thời gian thường xuyên khoảng cách, chuyển nó sang một loạt ts và sau đó tổng hợp nó từ tần số từ 24 đến tần số 1:

> aggregate(ts(x2[, 2], freq = 24), 1, mean) 

cho:

Time Series: 
Start = 1 
End = 4 
Frequency = 1 
[1] 108.5 132.5 156.5 180.5 

2) sở thú. Ở đây nó đang sử dụng sở thú. Gói sở thú cũng có thể xử lý hàng loạt khoảng cách bất thường (nếu chúng ta cần mở rộng này). Dưới đây day.hour là số ngày (1, 2, 3, 4) cộng với giờ như là một phần nhỏ trong ngày để floor(day.hour) là chỉ số trong ngày:

> library(zoo) 
> day.hour <- seq(1, length = length(x2[, 2]), by = 1/24) 
> z <- zoo(x2[, 2], day.hour) 
> aggregate(z, floor, mean) 
    1  2  3  4 
108.5 132.5 156.5 180.5 

Nếu zz là sản phẩm sau đó coredata(zz) và time(zz) là các giá trị và thời gian, tương ứng, như các vectơ thông thường.