这似乎是一个持续的问题。我看到了几次这样的消息,我尝试了人们提供的所有不同解决方案。但是对我来说没有任何用。
运行时我的图表不会显示:(

这是我的ui.R

## ui.R
require('rCharts')
require('shiny')
require("quantmod")
require("TTR")
require("stringr")
require('lubridate')
options(RCHART_LIB = 'polycharts')

shinyUI(pageWithSidebar(
  headerPanel('test'),
  sidebarPanel(p('test')
  ),
  mainPanel(
    showOutput('graph',lib='polycharts')
  )
))

这是我的服务器
#Dependencies
require('rCharts')
require('shiny')
require("quantmod")
require("TTR")
require("stringr")
require('lubridate')

#functions
SYM<-function (x,loc='yahoo') {
  getSymbols(x,src=loc)
  return(get(x))}

data.setup<-function(data,loc='yahoo',start.date=Sys.Date()-months(1),
                     end.date=Sys.Date()) {
  getSymbols(data,src=loc)
  x<-as.data.frame(window(SYM(data,loc=loc),
                          start=as.character(start.date),
                          end=as.character(end.date)))
  x$dates<-row.names(x)
  return(return(x))
}

## server.r
shinyServer(function(input, output) {
  output$graph <- renderChart2({
    a<-data.setup('AAPL')
    m1 <- mPlot(x = 'dates', y = c("AAPL.High", "AAPL.Low"), type = "Line", data = a)
    m1$set(dom = 'graph')
    return(m1)
  })
})

*我的主要问题是我不明白showOutput函数的工作原理。
showOutput中的库指的是什么?我找不到任何说明这一点的指南。
对于R中的环境,我还是一个新手。非常感谢您针对此问题的答案!

最佳答案

由于OP使用showOutput,因此lib = "morris"行需要使用mPlot。有关库的完整列表,请参见README。或者,您也可以通过键入m1$lib获得库的名称。

关于r - R:rCharts和Shiny,运行时不会显示图表,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/23378491/

10-11 04:22