<p>рдбреАрдУрдПрдорд╕реА рдкреИрдХреЗрдЬ рдХреЗ рд╕рд╛рде рдкреНрд░реЛрдЧреНрд░реЗрд╕рдмрд╛рд░?</p>

рдХреЛ рдирд┐рд░реНрдорд┐рдд 18 рдЕрдкреНрд░реИрд▓ 2016  ┬╖  3рдЯрд┐рдкреНрдкрдгрд┐рдпрд╛рдБ  ┬╖  рд╕реНрд░реЛрдд: r-lib/progress

рдХреНрдпрд╛ рдкреНрд░рдЧрддрд┐ рдкреИрдХреЗрдЬ рдбреАрдУрдПрдорд╕реА рдкреИрдХреЗрдЬ рдХреЗ рд▓рд┐рдП рднреА рдЙрдкрдпреБрдХреНрдд рд╣реИ?

рд╕рдмрд╕реЗ рдЙрдкрдпреЛрдЧреА рдЯрд┐рдкреНрдкрдгреА

рдпрд╛ рд╕рдорд╛рдирд╛рдВрддрд░ рдкреИрдХреЗрдЬ? рдпрджрд┐ рдирд╣реАрдВ, рддреЛ рдЗрд╕ рд╕реБрд╡рд┐рдзрд╛ рдХреЗ рд▓рд┐рдП +1 рдХрд░реЗрдВред

рд╕рднреА 3 рдЯрд┐рдкреНрдкрдгрд┐рдпрд╛рдБ

рдпрд╛ рд╕рдорд╛рдирд╛рдВрддрд░ рдкреИрдХреЗрдЬ? рдпрджрд┐ рдирд╣реАрдВ, рддреЛ рдЗрд╕ рд╕реБрд╡рд┐рдзрд╛ рдХреЗ рд▓рд┐рдП +1 рдХрд░реЗрдВред

рдореБрдЭреЗ рдпрдХреАрди рдирд╣реАрдВ рд╣реИ рдХрд┐ рдЗрд╕реЗ рд▓рд╛рдЧреВ рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рдИрдорд╛рдирджрд╛рд░ рд╣реЛрдиреЗ рдХреЗ рд▓рд┐рдП рдХреНрдпрд╛ рдХрд░рдирд╛ рд╣реЛрдЧрд╛ред рдЙрджрд╛рд╣рд░рдг рдХреЗ рд▓рд┐рдП рд╕рдорд╛рдирд╛рдВрддрд░ рдХреЗ рд▓рд┐рдП, рдХрд┐рд╕реА рдХреЛ рд╡рд╛рдкрд╕ рд╕рдВрд╡рд╛рдж рдХрд░рдиреЗ рдХреЗ рд▓рд┐рдП рд╕рдорд╛рдирд╛рдВрддрд░ рдХреА рдЖрд╡рд╢реНрдпрдХрддрд╛ рд╣реЛрдЧреА, рдХрд┐рддрдирд╛ рдХрд╛рдо рдкрд╣рд▓реЗ рд╣реА рдХрд┐рдпрд╛ рдЬрд╛ рдЪреБрдХрд╛ рд╣реИред рдХреНрдпрд╛ рдпрд╣ рд╕рдВрднрд╡ рднреА рд╣реИ?

@gaborcsardi рдореИрдВрдиреЗ рдХреБрдЫ рдЦреЛрдЬ рдХреА рд╣реИ рдФрд░ рдЬреЛ рдореИрдВрдиреЗ рдкрд╛рдпрд╛ рд╣реИ рд╡рд╣ рдирд┐рдореНрдирд▓рд┐рдЦрд┐рдд рд╣реИ:

library("foreach")
library("doParallel")
library("progress")

registerDoParallel(parallel::makeCluster(7, outfile = ""))

pb <- progress_bar$new(
            format = " [:bar] :percent in :elapsed",
            total = 30, clear = FALSE, width = 80, force = T)
a <- foreach (i  = 1:30) %dopar% {
    pb$tick()
    Sys.sleep(0.5)
}


pb <- txtProgressBar(title = "Iterative training", min = 0, max = 30, style = 3)

foreach (i  = 1:30) %dopar% {
    setTxtProgressBar(pb, i)
    Sys.sleep(0.5)
}

stopCluster(cl)

txtProgressBar рдХреЗрд╡рд▓ рддрднреА рдХрд╛рдо рдХрд░рддрд╛ рд╣реИ рдЬрдм рдЯрд╛рдЗрдк 2 рдпрд╛ 3 рд╣реЛред рдлрд╝рдВрдХреНрд╢рди рдХреЗ рдореИрдиреБрдЕрд▓ рдХреЗ рдЕрдиреБрд╕рд╛рд░:

рд╢реИрд▓реА = 1 рдФрд░ рд╢реИрд▓реА = 2 рдХреЗрд╡рд▓ рдЪрд╛рд░ рдХреА рдПрдХ рдкрдВрдХреНрддрд┐ рджрд┐рдЦрд╛рддрд╛ рд╣реИред рд╡реЗ рдЙрд╕ рд╢реИрд▓реА рдореЗрдВ рднрд┐рдиреНрди рд╣реЛрддреЗ рд╣реИрдВ = 2 рд╣рд░ рдмрд╛рд░ рд░реЗрдЦрд╛ рдХреЛ рдлрд┐рд░ рд╕реЗ рдЦреАрдВрдЪрддрд╛ рд╣реИ, рдЬреЛ рдЙрдкрдпреЛрдЧреА рд╣реЛрддрд╛ рд╣реИ рдпрджрд┐ рдЕрдиреНрдп рдХреЛрдб R рдХрдВрд╕реЛрд▓ рдкрд░ рд▓рд┐рдЦ рд░рд╣реЗ рд╣реЛрдВред рд╢реИрд▓реА = 3 рджреНрд╡рд╛рд░рд╛ рд╢реНрд░реЗрдгреА рдХреЗ рдЕрдВрдд рдХреЛ рдЪрд┐рд╣реНрдирд┐рдд рдХрд░рддрд╛ рд╣реИ | рдФрд░ рдмрд╛рд░ рдХреЗ рджрд╛рдпреАрдВ рдУрд░ рдкреНрд░рддрд┐рд╢рдд рджреЗрддрд╛ рд╣реИред

рдореБрдЭреЗ рд▓рдЧрддрд╛ рд╣реИ рдХрд┐ txtProgressBar рдХрд╛рдо рдХрд░рдиреЗ рдХрд╛ рдХрд╛рд░рдг рдпрд╣ рд╣реИ рдХрд┐ рдХреНрд▓рд╕реНрдЯрд░ рдмрдирд╛рддреЗ рд╕рдордп outfile = "" рдореМрдЬреВрдж рд╣реИред

рдореБрдЭреЗ рд▓рдЧрддрд╛ рд╣реИ рдХрд┐ рд╕реНрдЯрд╛рдЗрд▓ 2 рдХреЗ рд▓рд┐рдП txtProgressBar рдирдХрд▓ рдХрд░рдиреЗ рд╕реЗ рдпрд╣ рд╣рд▓ рд╣реЛ рдЬрд╛рдПрдЧрд╛ред

рдХреНрдпрд╛ рдпрд╣ рдкреГрд╖реНрда рдЙрдкрдпреЛрдЧреА рдерд╛?
0 / 5 - 0 рд░реЗрдЯрд┐рдВрдЧреНрд╕

рд╕рдВрдмрдВрдзрд┐рдд рдореБрджреНрджреЛрдВ

gaborcsardi picture gaborcsardi  ┬╖  7рдЯрд┐рдкреНрдкрдгрд┐рдпрд╛рдБ

hudon picture hudon  ┬╖  4рдЯрд┐рдкреНрдкрдгрд┐рдпрд╛рдБ

dougmitarotonda picture dougmitarotonda  ┬╖  8рдЯрд┐рдкреНрдкрдгрд┐рдпрд╛рдБ

hadley picture hadley  ┬╖  44рдЯрд┐рдкреНрдкрдгрд┐рдпрд╛рдБ

pssguy picture pssguy  ┬╖  20рдЯрд┐рдкреНрдкрдгрд┐рдпрд╛рдБ