syou6162 https://blog.hatena.ne.jp/syou6162/ yasuhisa's blog https://www.yasuhisay.info/ R 昨日のコードをリファクタリングしました。forが二つも入っていて、消せるのに消さないとかTsukuba.R的にあれだったので。 getrankfunction <- function(dataset){ rankfunction <- function(population){ #任意のデータ型を入れられるのは、listのみなので、仕方なくlistでscoreを生成 s <- c() p <- list() for(i in seq(length(population))){ s[i] <- scorefunction(population[i][[1]],dataset) p[i] <- p… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fwww.yasuhisay.info%2Fentry%2F20080825%2F1219663122" title="リファクタリングとか - 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 2008-08-25 20:18:42 rich https://www.yasuhisay.info/entry/20080825/1219663122 1.0 100%