0144132人目の素数さん垢版 | 大砲2017/10/09(月) 00:27:22.71ID:1+Fkporl >>142 大したことではないけど 0から始まるので本数とindexを補正して b <- function(){which.max(sapply(0:100, a))-1} の方が正確だと思います。