0 ile matristeki matrisle değiştirin

Tüm sıfırları, NA'larla matriste değiştirmek için en etkili yol nedir?0 ile matristeki matrisle değiştirin

yapmam gerekenler:

my_matrix[my_matrix==0] <- NA

ben recommender sistemine (recommenderlab) için lazım. NA'ları doldurmak, öneri sistemi oluşturmakla aynı zaman alır.

DÜZENLEME 1:

sönük (my_matrix) ~ sıfır ~% 90 500000x500

kaynak

2015-05-19 Aleksandro M Granda

ben my_matrix 'düşünürdüm <[my_matrix!] - NA' daha hızlı olması için. (test edilmedi). Ayrıca, '? Replace' kontrol edebilirsiniz – akrun

' my_matrix' ne kadar büyük? Ben bir * 5000 * 5000' denedim ve system.tiime yöntemini kullanarak ve '! My_matrix' 0.470 vs 0.150 – akrun

idi Ben' replace' çözümünüzün @akrun nasıl çalışacağını merak ediyorum. 'yerine (my_matrix,% 0, NA içindeki my_matrix% 'si)' –

Yanıtlar ve bir kriter

my_matrix <- matrix(1:5e5, ncol=50) 
my_matrix[4000:5000, 3:10] <- 0 

library(microbenchmark) 
microbenchmark(
    insubset  = my_matrix[my_matrix %in% 0], 
    replace1  = replace(my_matrix, my_matrix %in% 0, NA), 
    replace2  = replace(my_matrix, which(my_matrix==0), NA), 
    Aleksandro = my_matrix[my_matrix==0] <- NA, 
    excloperator = my_matrix[!my_matrix] <- NA, 
    is.na  = is.na(my_matrix) <- which(my_matrix == 0) 
) 

Unit: milliseconds 
     expr  min  lq  mean median  uq  max neval 
    insubset 22.579762 22.890431 26.197510 23.453346 25.210976 151.957848 100 
    replace1 21.630386 23.621707 27.573375 25.643425 26.225683 104.389554 100 
    replace2 3.979487 4.069095 4.872796 4.159493 6.449839 8.887427 100 
    Aleksandro 12.787962 13.100210 14.837055 13.689376 14.098338 96.258866 100 
excloperator 11.894246 12.275969 13.541593 13.011391 15.144429 17.307862 100 
     is.na 7.642823 8.901978 15.7352 9.342954 10.13166 68.31235 100

kaynak

2015-05-19 15:34:51

@akrun, ~% 90 0s ile bir matris üzerinde denedim ve hala aynı sonuçları tutun: 'replace2' hala' Aleksandro' ve 'excloperator' gibi hızlı 3x. Neden daha hızlı? (Kullandığım matris budur: ln <- 5e5; my_matrix <- matrix (runif (50 * ln), nrow = ln); my_matrix <- değiştir (my_matrix, hangi (my_matrix <0.9), NA); ') – adilapapaya

@adilapapaya Test ettiğiniz için teşekkür ederiz. Bence, 'mantıksal bir matriks yerine pozisyonları alıyoruz' yerine – akrun

'replace2' en iyisi. Teşekkürler! –

0 ile matristeki matrisle değiştirin

cevap

İlgili konular