由于搜索路径上的名称冲突,如何在R中取消屏蔽函数

# 导入read.csv函数
read.csv <- function(file, header=TRUE, sep=",", quote="\"", dec=".", fill=FALSE, strip.white=TRUE, col.names=NULL, as.is=TRUE, nrows=NULL) {
    if (missing(file)) {
        stop("Missing file argument. Please specify a file to read from.")
    }
    if (is.character(file) && length(file) > 1) {
        stop("Multiple file arguments not allowed. Please specify only one file to read from.")
    }
    if (!is.character(file) || length(file) == 0) {
        stop("File argument must be a character vector containing the name of the file to read from.")
    }
    if (!file.exists(file)) {
        stop(paste0("File '", file, "' does not exist."))
    }
    if (isTRUE(missing(header))) {
        header <- FALSE
    }
    if (isTRUE(missing(sep))) {
        sep <- ","
    }
    if (isTRUE(missing(quote))) {
        quote <- "\"