単体テストというものの有難味が分かり始めた。Rでの単体テストフレームワークであるRUnitの使い方をメモる。 テスト駆動開発なので、まずはテストを書く。 test.func1 <- function(){ checkEquals(func1(), 1, "func1 : NG") } test.func2 <- function(){ c…

結果は同じだけど、実行時間は大分違う。 x <- matrix(0, nrow=100, ncol=100) system.time(for(j in 1:10000)for(i in 1:100)x[0,i] <- 1) ## user system elapsed ## 2.203 0.037 2.321 system.time(for(j in 1:10000)x[0,] <- 1) ## user system elapsed …