bugfix> r > 投稿

私のデータ:

   Country       Year  FY_sales Truck_type       GDP     Inflation_Rate Unemployment_Rate
 1  France 2007-05-25  2064543        LCV 2663112510266    1.488073528       7.659999847
 2  France 2007-05-25   460552     MCV/CV 2663112510266    1.488073528       7.659999847
 3  France 2007-05-25    58940        HCV 2663112510266    1.488073528       7.659999847

私はこのようにプロットしたい:

私はgdpについてプロットしました:

ggplot(data,aes(Year,gdp))+geom_line()+geom_point()

しかし、同じプロットでgdp、インフレ、失業が必要です。

回答 2 件
  • 私はこのようなことをします

    library(data.table)
    setDT(dt)
    dataGraf <- rbind(data[ ,.(Year, value = Unemployment_Rate, Type = "Unemployment_Rate")],
                      data[ ,.(Year, value = Inflation_Rate, Type = "Inflation_Rate")],
                      data[ ,.(Year, value = GDP, Type = "GDP")])
    ggplot(dataGraf,aes(Year, value, color = Type))+geom_line()+geom_point()
    
    

  • これはあなたを助けるための簡単な例です

    set.seed(5)
    # example data
    dt = data.frame(id = 1:4,
                    x = runif(4),
                    y = runif(4),
                    z = runif(4))
    library(tidyverse)
    dt %>%
      gather(var, value, -id) %>%        # reshape data
      ggplot(aes(id, value, col=var))+   # plot using different colour for each variable
      geom_point()+
      geom_line()
    
    

あなたの答え