barplot(t(p),col = 1:19, main=title,
xlab="date", ylab="size (MiB)")
legend(par("usr")[1]+xinch(5),par("usr")[4]-yinch(0.1),legend=colnames(t),
barplot(t(p),col = 1:19, main=title,
xlab="date", ylab="size (MiB)")
legend(par("usr")[1]+xinch(5),par("usr")[4]-yinch(0.1),legend=colnames(t),