R：rChartsとShiny：人力車のプロットは表示されません

Question

ggplot2を使って光沢のある基本を手に入れた後、rChartsを試しています。しかし、私はRickshawグラフを表示することはできません。どんな助けでも大いに感謝します。簡単にそれを取る - 私はこれに使用を取得しています;）

### ui 

library(shiny) 
require(devtools) 
install_github('rCharts', 'ramnathv') 
# moved from lower down so call to `showOutput` would not fail 
library(rCharts) 
library(rattle) 

shinyUI(

    pageWithSidebar(

    headerPanel("Rickshaw test"), 

    sidebarPanel(

     selectInput("variable", 
        "Choice is arbitrary:", 
        c("Choice 1", "Choice 2") 
       ) 
    ), 

    mainPanel(

    showOutput("plot", "Rickshaw") 
    ) 
) 
) 

### server 


data(weather) 
w = weather 

dateToSeconds = function (date) { 

    date = as.POSIXct(as.Date(date), origin = "1970-01-01") 
    as.numeric(date) 
} 

w$Date = dateToSeconds(w$Date) 

shinyServer(function(input, output) { 

    output$mpgPlot = renderChart({ 

    rs = Rickshaw$new()  
    rs$layer(MinTemp ~ Date, 
      data = w, 
      type = "line")  
    return(rs)  
    }) 
}) 

Answer 1

主な問題はshowOutput、renderChartとシャイニー呼び出しは、すべて同じプロットIDを参照する必要があるということです。私はこれに基づいてコードを修正し、それは動作します。誰もが参照できるコードは次のとおりです

UPDATE githubから最新バージョンのrChartをインストールしていることを確認してください。

## server.R 
library(shiny) 
library(rCharts) 
library(rattle) 
data(weather) 
w = weather 

dateToSeconds = function (date) { 
    date = as.POSIXct(as.Date(date), origin = "1970-01-01") 
    as.numeric(date) 
} 

w$Date = dateToSeconds(w$Date) 
shinyServer(function(input, output) { 

    output$plot = renderChart({ 
    rs = Rickshaw$new()  
    rs$layer(MinTemp ~ Date, data = w, type = "line") 
    rs$set(dom = "plot") 
    return(rs)  
    }) 
}) 

## ui.R 
library(shiny) 
library(rCharts) 
library(rattle) 

shinyUI(pageWithSidebar(
    headerPanel("Rickshaw test"), 
    sidebarPanel(
    selectInput("variable", "Choice is arbitrary:", 
     c("Choice 1", "Choice 2") 
    ) 
), 
    mainPanel( 
    showOutput("plot", "Rickshaw") 
) 
)) 

Answer 2

私はこれが答えではなく、フォーマットとコメントではないかなり確信しています。あなたのコードを実行し、（私はプロット行うには、任意の方向を与えるように見える何のコマンドを見ていないので、意外いないようでした）何も出力を取得していない後、私はこの気象データを使用して実行しました：

rPlot(MaxTemp ~ Sunshine , data = w, type = 'point') 

rPlot(MinTemp ~ Date, 
     data = w, 
     type = "line") 

を輝くを得ましたサーバーは、実行中のFirefoxのインスタンスにプロットを送信します。

sessionInfo() 
R version 3.0.0 RC (2013-03-31 r62463) 
Platform: x86_64-apple-darwin10.8.0 (64-bit) 

locale: 
[1] en_US.UTF-8/en_US.UTF-8/en_US.UTF-8/C/en_US.UTF-8/en_US.UTF-8 

attached base packages: 
[1] grDevices datasets splines graphics utils  stats  methods base  

other attached packages: 
[1] rattle_2.6.27 rCharts_0.3.51 shiny_0.6.0  rms_3.6-3  Hmisc_3.10-1 
[6] survival_2.37-4 sos_1.3-5  brew_1.0-6  lattice_0.20-15 

loaded via a namespace (and not attached): 
[1] bitops_1.0-5  caTools_1.14  cluster_1.14.4  colorspace_1.2-1 
[5] dichromat_2.0-0 digest_0.6.3  ggplot2_0.9.3.1 grid_3.0.0   
[9] gtable_0.1.2  httpuv_1.0.6.3  labeling_0.1  MASS_7.3-26  
[13] munsell_0.4  plyr_1.8   proto_0.3-10  RColorBrewer_1.0-5 
[17] reshape2_1.2.2  RJSONIO_1.0-1  scales_0.2.3  stringr_0.6.2  
[21] tools_3.0.0  whisker_0.1  xtable_1.7-1  yaml_2.1.7