syou6162 https://blog.hatena.ne.jp/syou6162/ yasuhisa's blog https://www.yasuhisay.info/ R Loggerの引数にRの式そのまま書けるようにしたいなあと思った。そういうのって他にどういう関数があったかなあと思ったらsystem.timeがまさにそんな感じ。関数の定義を読む。 system.time <- function(expr, gcFirst = TRUE) { ppt <- function(y) { if(!is.na(y[4])) y[1] <- y[1] + y[4] if(!is.na(y[5])) y[2] <- y[2] + y[5] y[1:3] } if(!exists("proc.time")) return(rep(NA_real_, 5)) if(gcFi… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fwww.yasuhisay.info%2Fentry%2F20090220%2F1235056718" title="RにおけるLazy Evaluation - yasuhisa&#39;s blog" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2009-02-20 00:18:38 rich https://www.yasuhisay.info/entry/20090220/1235056718 1.0 100%