もうカツ丼はいいよな

ので同じ過ちを避けるためメモ。 他のいくつかのapply系関数でも似たようなことが起こる(みんな内部でlapply呼んでたりするので)。 問題はsapplyに与える関数の返り値にnamesを設定していると起こる。 例示のため引数をnamesに設定した値を返す関数を定義する。 f <- function(x){ y <- numeric(1) names(y) <- x y } > f(…