Department for redundancy department results of staff survey questionnaire

2013-06-28

I’ve just received the following in a local newsletter.

[![Survey results](http://chrisbeeley.net/wp-content/uploads/2013/06/2013-06-28-15.07.09.jpg)](http://chrisbeeley.net/wp-content/uploads/2013/06/2013-06-28-15.07.09.jpg)

Figure 1: The first figure

It’s reasonably clear, so it passes the first test, but really the decimal places are redundant, as are the frequency counts. Much nicer in a bar chart, of course:

<pre class="brush: r; title: ; notranslate" title="">

barplot(c(23.6, 24.2, 26.4, 20.2, 6.2),
    names.arg = c("Not at all", "Not entirely", "Ambivalent", "Somewhat", "Very"),
    col = heat.colors(5), ylab="%", main = "Happiness with new PDPR procedure")

[![Survey bar chart](http://chrisbeeley.net/wp-content/uploads/2013/06/Survey.png)](http://chrisbeeley.net/wp-content/uploads/2013/06/Survey.png)

Voila!