gvisColumnChart多個yvar

Question

我使用閃亮和googleVis來製作一個小應用程序。我想用4個yvars創建一個帶有gvisColumnChart的colomn圖表。圖例顯示了4個變量，但圖表中只有一個變量（小節）。在這種情況下，圖表中只出現「Courbature」的條形。

這裏是我的代碼：

output$energie = renderGvis({ 
     gvisColumnChart(dataProfil, 
     xvar = "Date", 
     yvar = c("Courbature", "Sommeil", "Stress", "Energie")) 
}) 

dataProfil是一個CSV文件，如下所示：

Date Energie Courbature Sommeil Stress Entrainement  
2014-03-15 6  1   9  3  Pratique de rugby 
2014-03-18 3  6   3  4  Pratique de rugby 
2014-03-20 8  3   8  8  Pratique de rugby 
2014-03-21 6  7   5  5  Musculation niveau 2  
2014-03-25 6  2   6  6  Pratique de rugby 
2014-03-28 3  3   3  6  Pratique de rugby 

Answer 1

這對我的作品

dataProfil <- read.table(text = "Date Energie Courbature Sommeil Stress Entrainement  
2014-03-15 6  1   9  3  'Pratique de rugby' 
2014-03-18 3  6   3  4  'Pratique de rugby' 
2014-03-20 8  3   8  8  'Pratique de rugby' 
2014-03-21 6  7   5  5  'Musculation niveau 2'  
2014-03-25 6  2   6  6  'Pratique de rugby' 
2014-03-28 3  3   3  6  'Pratique de rugby'" 
         , stringsAsFactors = FALSE, header = TRUE) 
require(googleVis) 
runApp(list(
    ui = bootstrapPage(
    htmlOutput("energie") ), 
    server = function(input, output) { 
    output$energie = renderGvis({ 
     gvisColumnChart(dataProfil, 
         xvar = "Date", 
         yvar = c("Courbature", "Sommeil", "Stress", "Energie")) 
    }) } 
))