RDocumentation: mean
  • AI Chat
  • Code
  • Report
  • Beta
    Spinner
    if(!require('base')) {
        install.packages('base')
        library('base')
    }
    x <- c(0:10, 50)
    xm <- mean(x)
    c(xm, mean(x, trim = 0.10))