Eixo X síncrono para vários anos de vendas com ggplot
Tenho 1417 dias de dados de venda de 01/01/2012 até o presente (20/11/2015). Não consigo descobrir como ter um eixo de um ano (1 de janeiro a 31 de dezembro) e as vendas de cada ano na mesma janela de um ano, mesmo ao usar o ggplotcolor = as.factor(Year)
opção.
O total de vendas é do tipoint
head(df$Total.Sales)
[1] 495 699 911 846 824 949
e eu usei olubridate
pacote para extrair Year da variável Day original.
df$Day <- as.Date(as.numeric(df$Day), origin="1899-12-30")
df$Year <- year(df$Day)
Mas porque Day contém as informações do ano
sample(df$Day, 1)
[1] "2012-05-05"
O ggplot ainda representa graficamente três anos em vez de sincronizá-los com o mesmo período de tempo (um ano completo):
g <- ggplot(df, aes(x = Day, y = Total.Sales, color = as.factor(Year))) +
geom_line()