In[]:=
data=SortEntityValue,{"Name","ReleaseDate","ProductionBudget"},#1[[2]]<#2[[2]]&;ts=TimeSeries[data[[All,3]],{data[[All,2]]}];DateListPlot[tsdata[[All,1]],LabelingFunction(Placed[{Last@#3,Last@#1},Tooltip]&),PlotMarkersAutomatic,PlotLabelStyle[Framed["Star Wars Films Production Costs"],16,Blue,BackgroundLighter[Yellow]],ImageSizeMedium]
Out[]=
