Rでfor文の進行状況を表示

はじめに

計算に数分～数時間かかるfor文を実行するとき進行状況を確認したい場合がある。Rにおけるプログレスバーの表示方法について調べたので、備忘録として記事を残しておく。

tcltkパッケージ

プログレスバーの表示にはtcltkパッケージを使えばできる。以下、サンプルコード

library(tcltk)

n <- 1000
pb <- txtProgressBar(min = 1, max = n, style = 3)

a <- c()
for(i in 1:n){
  setTxtProgressBar(pb, i)
  a <- c(a, i^2)
  Sys.sleep(0.1) #あまりに表示が早すぎるためにわざと遅延させている。
}

Rのコンソールの表示は以下の様になる。

おわりに

こうした簡単な Tips でも、アウトプットする癖をつけていきたいと思う。