为什么拒绝打开我的文件?

时间:2017-04-07 18:53:55

标签: r permissions shiny

以下是我的R Shiny App的代码:

library(shiny)
library(leaflet)
library(nycflights13)
library(DT)

r_colors <- rgb(t(col2rgb(colors()) / 255))
names(r_colors) <- colors()

parguera <- read.csv("C:/Users/Anatoly/Documents/Collatz/RenameLater/RenameLater/MapsAndSuch")
#monaisland <-
#islacatalina <-

ui <- fluidPage(
  titlePanel("NOAA Caribbean Coral Data"),
  leafletOutput("mymap"),
  p(),
  actionButton("laparguera", "La Parguera Data"),
  actionButton("mona", "Mona Island Data"),
  actionButton("isla", "Isla Catalina Data"),
  DT::dataTableOutput('tbl')
)

server <- function(input, output, session) {

  output$mymap <- renderLeaflet({
    leaflet() %>%
      addTiles() %>%
      addMarkers(lat = 17.95, lng = - 67.05, popup = "La Parguera ") %>%
      addMarkers(lat = 18.00, lng = -67.50, popup = "Mona Island") %>%
      addMarkers(lat = 18.2, lng = -69.00, popup = "Isla Catalina")
    })
  observeEvent(input$laparguera, {
    output$tbl <- DT::renderDataTable(DT::datatable(parguera, options = list(pagelength = 25)))
  })
}

shinyApp(ui, server)

当我运行它时,它表示权限被拒绝。

当我在CSV文件中注释读取行时,它可以工作,所以我认为问题出在那里。

为什么会这样?

谢谢。

1 个答案:

答案 0 :(得分:0)

虽然我不熟悉这个工具,但也许你的文件“路径”应该是“C:\ Users \ Anatoly ...而不是”C:/ Users / Anatoly /...."