编辑标准R文件

我是R方面的新手，我想编辑R标准文件。我特别想编辑plot.TukeyHSD。如果我在R中键入它的名称，我可以看到源代码

> plot.TukeyHSD
function (x, ...) 
{
   for (i in seq_along(x)) 
   {
     xi <- x[[i]][, -4L, drop = FALSE]
     yvals <- nrow(xi):1L
     dev.hold()
     on.exit(dev.flush())
     plot(c(xi[, "lwr"], xi[, "upr"]), rep.int(yvals, 2L), 
     type = "n", axes = FALSE, xlab = "", ylab = "", main = NULL, ...)
      axis(1, ...)
    axis(2, at = nrow(xi):1, labels = dimnames(xi)[[1L]], 
        srt = 0, ...)
    abline(h = yvals, lty = 1, lwd = 0.5, col = "lightgray")
    abline(v = 0, lty = 2, lwd = 0.5, ...)
    segments(xi[, "lwr"], yvals, xi[, "upr"], yvals, ...)
    segments(as.vector(xi), rep.int(yvals - 0.1, 3L), as.vector(xi), 
       rep.int(yvals + 0.1, 3L), ...)
    title(main = paste0(format(100 * attr(x, "conf.level"), 
        digits = 2L), "% family-wise confidence level\n"), 
        xlab = paste("Differences in mean levels of", names(x)[i]))
    box()
    dev.flush()
    on.exit()
    }
}

>plot.TukeyHSD
函数（x，…）
{
对于（沿（x）的顺序i）
{
席先生与复制和粘贴代码和编辑它的心脏的内容是一个永久的变化。@ Tyelrimkk是的，我想要一个永久的改变，把你的自定义功能放在一个单独的R脚本中，并在一开始就把它发送出去。或者你也可以用定制的功能来组成你自己的包。