任何人都知道为什么这段代码不起作用?我只是得到一个空白页面。这段代码不是来自我。这是教程代码,并在我看过的视频中工作。
x = c(rnorm(5), runif(5))
y = rep(c('a','b'), each = 5)
microbenchmark(
by(x, y, mean)
)
Unit: microseconds
expr min lq mean median uq max neval
by(x, y, mean) 266.648 284.1415 300.5616 292.702 306.256 671.369 100
microbenchmark(
tapply(x,y,mean)
)
Unit: microseconds
expr min lq mean median uq max neval
tapply(x, y, mean) 83.108 85.584 92.65721 87.3725 97.2045 284.738 100