Как обойти ошибку отказа в разрешении?

В следующем примере шейп-файл точки записывается на диск. Однако я получаю сообщение об ошибке, когда скрипт пытается записать шейп-файл в C:/. Хотя я могу писать на внешний жесткий диск (G:/). Ниже приведена ошибка, которую я получаю в R:

Ошибка в файле (out.name, "wb"): невозможно открыть соединение. Кроме того: Предупреждающее сообщение: В файле (out.name, "wb"): невозможно открыть файл 'c:/test.shp': Отказано в доступе

Как обойти или устранить эту ошибку?

# available from: cran.r-project.org/web/packages/shapefiles/shapefiles.pdf
# Samples of using the convert.to.shapefile function to write out simple shapefiles
# from basic R data.frames

require(shapefiles)
require(maptools)

dd <- data.frame(Id=c(1,2),X=c(3,5),Y=c(9,6))
ddTable <- data.frame(Id=c(1,2),Name=c("Item1","Item2"))
ddShapefile <- convert.to.shapefile(dd, ddTable, "Id", 1)
write.shapefile(ddShapefile, "C:/test", arcgis=T)
shape <- readShapePoints("C:/test")
plot(shape)