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