Jak mogę `print` lub` cat` przy użyciu równoległego

Question

Jeśli wywołać funkcję za pomocą parSapply, wówczas instrukcje print, message lub cat wewnątrz tej funkcji nie wydają się wyprowadzać na konsolę.

Mój proces trwa bardzo długo, więc potrzebuję sposobu na zobaczenie postępu i uzyskanie wyników wyjściowych po ich wykonaniu. Czy są jakieś specjalne polecenia, które pozwolą mi drukować na konsoli z równoległego procesu?

Przykład:

library(parallel) 

oneloop = function(x) { 
    for(i in 1:50) { 
    a = rnorm(100000) 
    a = sort(a) 
    } 
    print(x) 
    message(x) 
    cat(x) 
} 

cl <- makeCluster(5) 
output = parSapply(cl, 1:10, oneloop) 
stopCluster(cl) 

Answer 1

Korzystanie outfile param w makeCluster można przekierować wyjście do pliku, a następnie sprawdzić, czy plik, aby zobaczyć, jak rozwija się Twój program.

Co ciekawe na komputerze z systemem Linux ustawienie go na "" powoduje wyjście do konsoli, ale to nie działa dla mnie na komputerze z systemem Windows. Plik wyjściowy działa na obu.

Answer 2

Używam makeCluster z outfile w systemie Windows z pakietem doParallel w wersji 1.0.8. Jestem w stanie ogonić outfile używając prostej komendy Powershell powershell Get-Content c:/path/to/log/mylog.txt -wait. Pracuje dla mnie.