審美錯誤

Question

我的情節有問題（R Studio + Shiny）。

錯誤：

聽http://127.0.0.1:7444
警告：錯誤：美學長度必須為 1 或與數據 (14) 相同：x、y、顏色
堆棧跟蹤（最里面在先）：
68：輸出$plot6th
1：運行應用

腳本/應用程序：

https://github.com/futer/japan_telecom/

自述文件是如何吃午飯。

第二個問題......我已經制作了6個動作按鈕，但我不知道如何制作：點擊按鈕1，只顯示情節1等......

如果有人幫助我，我會很高興。

Answer 1

您生成圖表的方法是錯誤的； 您應該將 data.frame 轉換為長格式，然后生成圖表。 由於整個應用程序太大而無法在此處發布，因此我准備了如何處理要處理的數據框的摘錄：

Vectorize(require)(package = c("dplyr", "tidyr", "ggplot2", "zoo"),
                   character.only = TRUE)

# Sourced from within the app
df %>% 
  gather(key = indicator, value = value, -Date) %>% 
  # Scale is just an example
  mutate(valueScld = scale(value)) %>% 
  # Chart definition
  ggplot(aes(x = Date, y = value, group = indicator, colour = indicator)) +
  scale_x_date(date_breaks = "4 years") +
  geom_line()

然后，您將開始獲得類似於所需圖表的內容：

我會進一步建議你看看這篇關於在ggplot2生成圖形的基本文章； 轉換數據框后，處理美學會很簡單。 在您的代碼中，您將geom_line定義了x次，每次都針對每個組，這不是要走的路。