Analyze Retail Sales Data 

Here are the first few entries in a file of sales data in tab-separated-values format.

In[1]:=

X StringTake[Import["ExampleData/RetailSales.tsv", "Text"], 75]

Out[1]=

Import the data, interpreting dates and city names to yield computable date and city Entity objects.

In[2]:=

X data = SemanticImport["ExampleData/RetailSales.tsv", Automatic, "Rows"];

In[3]:=

X Take[data, 3]

Out[3]=

Gather the sales data by city.

In[4]:=

X dataByCity = GroupBy[data, (#[[2]]) & -> ({#[[1]], #[[3]]} &)];

Plot sales figures by city.

In[5]:=

X DateListPlot[dataByCity[[All]], PlotLegends -> Keys[dataByCity]]

Out[5]=