Hands-On Data Science for Marketing

Engagement rates by sales channel

Let's take a look at another example. We will analyze how engagement rates differ by different sales channels. Take a look at the following code:

## - Engagement Rates by Sales Channel ##engagementRateBySalesChannel <- df %>%   group_by(Sales.Channel) %>%  summarise(Count=n(), NumEngaged=sum(Engaged)) %>%  mutate(EngagementRate=NumEngaged/Count*100.0)

The result looks as follows:

It will be easier to understand this result with a visualization. You can use the following code to visualize this data:

ggplot(engagementRateBySalesChannel, aes(x=Sales.Channel, y=EngagementRate)) + geom_bar(width=0.5, stat="identity") ...