[Solved] ggplot chart, x=date, y= value, value

by 


d <- read.table(text=readClipboard(), header=TRUE, stringsAsFactors = T,
                na.strings="U")
df <- melt(d, id.var="date")
ggplot(aes(x=date, y=value), data = df) +
  geom_bar(aes(fill = variable), stat="identity", position = 'dodge')

bar chart

or

ggplot(aes(x=factor(date), y=value), data = df) +
  geom_bar(stat="identity", position = 'dodge') +
  facet_grid(variable~., scales="free_y", drop = F) +
  theme(axis.text.x = element_text(angle = 45, vjust = 1.1, hjust = 1.05))

faceting option

4

solved ggplot chart, x=date, y= value, value