学习简书文章撰写

知道了怎样斜体加粗文字
还知道了怎样加删除线
学习了插入图片

6442D593-4636-42DF-8515-7250B59B87C3.jpeg

还学会了编辑代码块

> fivenum
function (x, na.rm = TRUE) 
{
    xna <- is.na(x)
    if (any(xna)) {
        if (na.rm) 
            x <- x[!xna]
        else return(rep.int(NA, 5))
    }
    x <- sort(x)
    n <- length(x)
    if (n == 0) 
        rep.int(NA, 5)
    else {
        n4 <- floor((n + 3)/2)/2
        d <- c(1, n4, (n + 1)/2, n + 1 - n4, n)
        0.5 * (x[floor(d)] + x[ceiling(d)])
    }
}
<bytecode: 0x000000000edef680>
<environment: namespace:stats>