1

我想使用fileInputR shiny 中的文件上传控件raster从光栅包中导入 ASCII 文件，对导入的光栅层进行一些数学运算，plot最后进行计算。当我尝试这个时，我收到以下错误：

.local(x, ...) 中的错误：列表没有“x”

有没有办法像raster使用 R 闪亮文件上传控件一样导入 ASCII 文件？由于我不知道如何在 R 中创建 ASCII 文件，您可以在此处下载一个以使示例可重现。

用户界面

library(shiny)
library(raster)

shinyUI(pageWithSidebar(

headerPanel("Header1"),

sidebarPanel(
fileInput('layer', 'Choose Layer', multiple=FALSE, accept='asc')
),

mainPanel(
plotOutput("mapPlot")
)
))

服务器.R

library(shiny)
library(raster)

shinyServer(function(input, output) {

output$mapPlot <- renderPlot({

inFile <- input$layer

if (is.null(inFile))
  return(NULL)

data <- raster(inFile)

plot(data)

})
})
4

1 回答 1

2

raster(inFile)应该是raster(inFile$datapath)。

于 2013-06-28T21:37:10.390 回答