R 找不到函数"write.vector" - 我该怎么办？

Question

我是r中的新人。当使用代码时，我得到了错误"konnte函数"write.vector"不finden"(找不到函数"write.vector")。代码看起来像这样:写。向量(x,")。写代码的人(去年夏天)说，她不需要为此安装任何类型的包。

我搜索了这个问题，发现了这个:错误:无法找到函数…在R ?我检查了这里提到的东西，但它没有帮助。拼写是正确的，因为我只是复制粘贴了代码，这对其他人来说很有效。此外，我不知道我可以安装哪个软件包，可能会丢失。我没有找到任何与help.search("some.function")或find有关的。当使用RSiteSearch("some.function")时，我发现:http://finzi.psych.upenn.edu/R/library/quantable/html/write.vector.html，这也没有帮助我解决我的问题。

Answer 1

如果有帮助的话，这是我在错误之前使用的代码:

Stanzen von Rasterstack mit Stadtgrenze Köln
#libraries
    library(raster)
    library(rgdal)
    library(nortest)
    install.packages("sp", dependencies=TRUE)
    #test if installed, if not install it.
    library(sp)
    if(!require(quantable, quiet = TRUE))
      install.packages("quntable")
    library(quantable)
    setwd("d:/Users/paulb/Desktop/Uni/Bachelorarbeit/R/GeoTiffs")
    ## polygon with crop-extend ##
    files <- list.files("d:/Users/paulb/Desktop/Uni/Bachelorarbeit/R/GeoTiffs", include.dirs = F, full.names =
                          T)
    shape_data <- readOGR("d:/Users/paulb/Desktop/Uni/Bachelorarbeit/R/Shapefiles/VerwaltungsgrenzeKoeln/VerwaltungsgrenzeKoeln.shp",
                          stringsAsFactors=FALSE)
    plot(shape_data)
    ## load tif files ##
    infiles = list.files(path=getwd(),
                         pattern="*.tif$|*.TIF$")
    ## Filenames with desired suffix and output place ##
    outfiles = file.path("d:/Users/paulb/Desktop/Uni/Bachelorarbeit/R/Cologne_Rasterstack",
                         paste0(basename(tools::file_path_sans_ext(infiles)),
                                ".tif"))
    outfiles[outfiles == -9999] <- NA #alle -9999 auf NA setzen, wenn nötig
    ## crop and output settings (compression and datatype)
    for (i in seq_along(infiles)) {
      r = crop(stack(infiles[i]), shape_data)
      writeRaster(r, filename=outfiles[i],
                  bylayer=FALSE,
                  format="GTiff",
                  options="COMPRESS=ZIP",
                  x, NAflag=-9999,
                  overwrite=TRUE)
    }
    dataType(r)
    View(r)
    # load files
    files <- list.files("d:/Users/paulb/Desktop/Uni/Bachelorarbeit/R/Cologne_Rasterstack", include.dirs = F, full.names = T)
    #stack raster
    rasterstack <- stack(lapply(files, raster))
    r <- rasterstack
    r[] <- 1:length(r)
    ## crop and mask
    r2 <- crop(r, extent(shape_data))
    r3 <- mask(r2, shape_data)
    plot(r2)
    rc <- crop(rasterstack, extent(r3))
    rcm <- mask(rc, shape_data)
    as.vector(rcm)
    x <- as.vector(rcm)
    plot(rcm)
    write.vector(x, "d:/Users/paulb/Desktop/Uni/Bachelorarbeit/R/GeoTiffs/Vector_Cologne")

Answer 2

正如@Duck在评论中所说，找不到它的原因是包含该函数的包没有安装或加载。快速的谷歌搜索告诉我它是可量化的，所以我们可以检查它是否已经安装，并使用下面的代码加载它:

#test if installed, if not install it.
if(!require(quantable, quiet = TRUE))
  install.packages("quantable")
library(quantable)