Thay thế giá trị NA bởi hàng có nghĩa

Question

Tôi muốn thay thế các giá trị NA của tôi từ một ma trận được mua lại bởi:

read.table(…) 

Những giá trị nên giá trị trung bình của hàng tương ứng.

tức là, hàng sau của bảng:

1 2 1 NA 2 1 1 2 

sẽ trở thành

1 2 1 1.43 2 1 2 

Cảm ơn bạn.

Answer 1

x[is.na(x)] <- mean(x, na.rm=TRUE) # for vectors or for a matrix as a whole 

t(apply(x, 1, function(xv) { xv[is.na(xv)] <- 
            mean(xv, na.rm=TRUE) 
           return(xv)} 
     )) # for a row-oriented sol'n 

Answer 2

a = c(NA, 1, 2, 3, 10) 
a[which(is.na(a)==TRUE)] = mean(a,na.rm = T) 

Answer 3

Dưới đây là một số dữ liệu mẫu.

m <- matrix(1:16, nrow=4) 
m[c(1,4,6,11,16)] <- NA 

Và đây là cách tôi điền vào các thông báo lỗi bằng phương tiện hàng.

k <- which(is.na(m), arr.ind=TRUE) 
m[k] <- rowMeans(m, na.rm=TRUE)[k[,1]] 

Dữ liệu của bạn sẽ ở trong data.frame; bạn sẽ phải chuyển đổi thành ma trận trước tiên bằng cách sử dụng as.matrix. Bạn có thể hoặc không muốn để nó ở định dạng đó; để chuyển đổi sử dụng trở lại as.data.frame.