Я бы добавил это в комментарии, но у меня еще нет прав ...
Я не думаю, что вы на самом деле хотите изменить данные, но, как упоминалось в комментариях, это легкоспособы сделать это.
Если вы просто пытаетесь отобразить многомерные данные в виде графика и просто не знакомы с синтаксисом библиотеки, попробуйте код ниже ...
df <- data.frame(Date = c('2018/04/02','2018/04/02','2018/04/02','2018/04/02','2018/04/02','2018/05/02','2018/05/02','2018/05/02','2018/06/02','2018/06/02','2018/06/02','2018/06/02'),
Market = c('Indonesia','Australia','India','USA','Germany','India','Japan','Russia','Austria','Swiss','USA','Indonesia'),
Quantity = c(1000,500,300,500,200,400,400,457,260,700,1200,400),
stringsAsFactors = F)
plotly::ggplotly(
ggplot2::ggplot(df, ggplot2::aes(x=Market, y=Quantity)) +
ggplot2::geom_col(ggplot2::aes(fill=Market))+
ggplot2::facet_grid(~Date,scale='free_x') +
ggthemes::theme_tufte()
)