Перекрывающиеся временные ряды с R

Question

Мой фрейм данных df имеет следующие столбцы: токен (фактор), дата (POSIXct), количество (целое число).

> head(df,3)
  token       date             count
1 foo  10/1/2011 12:00:00 AM     6
2 bar 10/12/2011 12:00:00 AM    24
3 baz 10/14/2011 12:00:00 AM     4

Я знаю, как построить временной ряд для фактора 'foo', например, qplot(date, count, data=df[df$token == "foo",], geom="line");.Но как мне отобразить временные ряды всех факторов на одном и том же графике, каждая линия фактора отличается цветом?Баз) против а даты?В основном рассчитывает на ось Y и даты на оси X.

Answer 1

У меня есть data.frame, который выглядит следующим образом (я использовал reshape::melt для получения данных от широкого до длинного формата):

> head(big)
             Taxa    variable value sites
1      Coleoptera 15.4.-30.4.    92   Low
2      Orthoptera 15.4.-30.4.     2   Low
3     Heteroptera 15.4.-30.4.    NA   Low
4       Homoptera 15.4.-30.4.    NA   Low
5 Auchenorrhyncha 15.4.-30.4.    NA   Low
6      Neuroptera 15.4.-30.4.    NA   Low

И я использовал код ggplot2 ниже, чтобы создать это изображение

ggplot(big, aes(x = droplevels(Taxa), fill = sites, y = value)) + 
        geom_bar(position = "dodge") + 
        facet_wrap(~ variable) +
        scale_x_discrete(name = "Taksoni") +
        scale_y_continuous(name = "Abundanca") +
        scale_fill_discrete(name = "Vzorčna \n mesta") +
        opts(axis.text.x = theme_text(angle = 90))

Answer 2

На этот вопрос сложно ответить без воспроизводимого примера, но что-то вроде qplot(date,count,data=df,group=token) может работать.