Template Notebook
Generate

Twitter Analysis

Keyword:
"keyword"

twitter=ServiceConnect["Twitter"];​​data=twitter"TweetSearch","Query"
"keyword"
,MaxItems100;
Grid{DateHistogram[Normal[data[All,"CreationDate"]],Quantity[5,"Minutes"],PlotTheme{"Business","CoolColor"},ImageSizeMedium,PlotLabelStyle["Keyword Timeline",18,FontFamily"Source Sans Pro"]],​​Histogram[Normal[data[All,"Favorite Count"]],PlotTheme{"Business","CoolColor"},ImageSizeMedium,PlotLabelStyle["Favorite Count",18,FontFamily"Source Sans Pro"]]},Histogram[Normal[data[All,"Retweet Count"]],PlotTheme{"Business","CoolColor"},ImageSizeMedium,PlotLabelStyle["Retweet Count",18,FontFamily"Source Sans Pro"]],PieChartKeySort[Counts[Classify["Sentiment"][data[All,"Text"]]]],PlotTheme{"Web"},ImageSizeMedium,ChartStyle
,
,
,ChartLegendsAutomatic,PlotLabelStyle["Keyword Sentiment Analysis",18,FontFamily"Source Sans Pro"],Alignment{Center,Center}