Add a progress bar.
Add a progress bar.
progress(type = c("down", "up"), con = stdout())
type |
Type of progress to display: either number of bytes uploaded or downloaded. |
con |
Connection to send output too. Usually |
cap_speed <- config(max_recv_speed_large = 10000) # If file size is known, you get a progress bar: x <- GET("http://httpbin.org/bytes/102400", progress(), cap_speed) # Otherwise you get the number of bytes downloaded: x <- GET("http://httpbin.org/stream-bytes/102400", progress(), cap_speed)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.