<?xml version="1.0" encoding="UTF-8"?>
<?xml-stylesheet type="text/xsl" media="screen" href="/~d/styles/rss2full.xsl"?><?xml-stylesheet type="text/css" media="screen" href="http://feeds.feedburner.com/~d/styles/itemcontent.css"?><rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:wfw="http://wellformedweb.org/CommentAPI/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:atom="http://www.w3.org/2005/Atom" xmlns:sy="http://purl.org/rss/1.0/modules/syndication/" xmlns:slash="http://purl.org/rss/1.0/modules/slash/" xmlns:itunes="http://www.itunes.com/dtds/podcast-1.0.dtd" xmlns:rawvoice="http://www.rawvoice.com/rawvoiceRssModule/" xmlns:creativeCommons="http://backend.userland.com/creativeCommonsRssModule" xmlns:feedburner="http://rssnamespace.org/feedburner/ext/1.0" version="2.0">

<channel>
	<title>Stubborn Mule</title>
	
	<link>http://www.stubbornmule.net</link>
	<description>Obstinately objective</description>
	<lastBuildDate>Tue, 22 May 2012 10:21:30 +0000</lastBuildDate>
	<language>en</language>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
	<generator>http://wordpress.org/?v=3.3.2</generator>
<!-- podcast_generator="Blubrry PowerPress/4.0" -->
	<itunes:summary>Mule Bites is the Stubborn Mule podcast. The Stubborn Mule
is a blog exploring economics, science, politics, the environment
and just about anything that can be subject to some objective
analysis.</itunes:summary>
	<itunes:author>Stubborn Mule</itunes:author>
	<itunes:explicit>clean</itunes:explicit>
	<itunes:image href="http://www.stubbornmule.net/blog/wp-content/MuleAvatar600.jpg" />
	<itunes:owner>
		<itunes:name>Stubborn Mule</itunes:name>
		<itunes:email>seancarmody@gmail.com</itunes:email>
	</itunes:owner>
	<managingEditor>seancarmody@gmail.com (Stubborn Mule)</managingEditor>
	<copyright>http://creativecommons.org/licenses/by-sa/3.0/</copyright>
	<itunes:subtitle>Sound bites from the Stubborn Mule</itunes:subtitle>
	<itunes:keywords>economics, politics, technology, environment, analysis, data</itunes:keywords>
	<image>
		<title>Stubborn Mule</title>
		<url>http://www.stubbornmule.net/blog/wp-content/MuleAvatar144.jpg</url>
		<link>http://www.stubbornmule.net</link>
	</image>
	<itunes:category text="News &amp; Politics" />
		<atom10:link xmlns:atom10="http://www.w3.org/2005/Atom" rel="self" type="application/rss+xml" href="http://feeds.feedburner.com/StubbornMule" /><feedburner:info uri="stubbornmule" /><atom10:link xmlns:atom10="http://www.w3.org/2005/Atom" rel="hub" href="http://pubsubhubbub.appspot.com/" /><creativeCommons:license>http://creativecommons.org/licenses/by-sa/2.0/</creativeCommons:license><feedburner:emailServiceId>StubbornMule</feedburner:emailServiceId><feedburner:feedburnerHostname>http://feedburner.google.com</feedburner:feedburnerHostname><item>
		<title>Spotify in Australia</title>
		<link>http://feedproxy.google.com/~r/StubbornMule/~3/DZXNnSj1Wnc/</link>
		<comments>http://www.stubbornmule.net/2012/05/spotify-in-australia/#comments</comments>
		<pubDate>Tue, 22 May 2012 10:21:30 +0000</pubDate>
		<dc:creator>Stubborn Mule</dc:creator>
				<category><![CDATA[music]]></category>

		<guid isPermaLink="false">http://www.stubbornmule.net/?p=4940</guid>
		<description><![CDATA[A very short post today! Finally one of the major music streaming services is available in Australia (I have complained about the limited options for music streaming down under here before). Spotify has now launched in Australia. I have signed up to investigate the service, so it is a bit early to give an opinion [...]]]></description>
			<content:encoded><![CDATA[<p></p><p>A very short post today!</p>
<p>Finally one of the major music streaming services is available in Australia (I have complained about the <a href="http://www.stubbornmule.net/2011/05/online-music-going-backwards-in-australia/">limited options for music streaming down under here before</a>). <a href="https://www.spotify.com/au/">Spotify</a> has now launched in Australia. I have signed up to investigate the service, so it is a bit early to give an opinion on how good it is, but I know it is very popular in Europe and the US.</p>
<p>I would like to see other services opening up in Australia, including Slacker, Rhapsody and Pandora, but given that all of these have been around for longer that Spotify, I will not be holding my breath.</p>
<img src="http://feeds.feedburner.com/~r/StubbornMule/~4/DZXNnSj1Wnc" height="1" width="1"/>]]></content:encoded>
			<wfw:commentRss>http://www.stubbornmule.net/2012/05/spotify-in-australia/feed/</wfw:commentRss>
		<slash:comments>1</slash:comments>
		<feedburner:origLink>http://www.stubbornmule.net/2012/05/spotify-in-australia/</feedburner:origLink></item>
		<item>
		<title>Problem Pies</title>
		<link>http://feedproxy.google.com/~r/StubbornMule/~3/r7V2QFkCSPc/</link>
		<comments>http://www.stubbornmule.net/2012/05/problem-pies/#comments</comments>
		<pubDate>Sat, 12 May 2012 11:04:37 +0000</pubDate>
		<dc:creator>Stubborn Mule</dc:creator>
				<category><![CDATA[charts]]></category>
		<category><![CDATA[finance]]></category>

		<guid isPermaLink="false">http://www.stubbornmule.net/?p=4921</guid>
		<description><![CDATA[Last month the IMF published their latest Global Financial Stability Report. A colleague, who knows I rarely approve of pie charts*, drew my attention to the charts on page 27 of Chapter 3 of the report, which I have reproduced here (click on the image to enlarge).  Here the authors of the report have decided to [...]]]></description>
			<content:encoded><![CDATA[<p></p><p>Last month the IMF published their <a href="http://www.imf.org/External/Pubs/FT/GFSR/2012/01/pdf/text.pdf">latest Global Financial Stability Report</a>. A colleague, who knows I rarely approve of pie charts*, drew my attention to the charts on page 27 of Chapter 3 of the report, which I have reproduced here (click on the image to enlarge).<span style="text-align: center;"> </span></p>
<p style="text-align: center;"><a href="http://www.stubbornmule.net/blog/wp-content/imf-large.jpg"><img class="size-full wp-image-4924 aligncenter" title="IMF &quot;Pie Chart&quot;" src="http://www.stubbornmule.net/blog/wp-content/imf-small.jpg" alt="" width="500" height="257" /></a></p>
<p>Here the authors of the report have decided to attempt some graphical improvisation, taking the pie chart and extending it. Over time some inspired new chart designs have been developed, but these have been rare. More often the result is inferior to using an established technique. While I do not wish to discourage innovation, the results should always be tested before being foisted on an unsuspecting audience.</p>
<p>The aim of this pair of charts is to illustrate the dwindling supply of &#8220;safe assets&#8221; in the form of highly rated sovereign debt as a result of the global financial crisis. For example, at the end of 2007, 68% of advanced economies boasted a AAA Standard &amp; Poor&#8217;s credit rating (left hand chart, outer red arc) but  by January 2012 this proportion had fallen to 52% (left hand chart, inner red sector).</p>
<p>The heart of each chart is a conventional pie chart showing the current distribution of country ratings. Taken in isolation, either one of these would be a reasonable chart. But moving beyond a single pie chart, comparing the Advanced Economies chart to the Emerging Markets chart is not so easy. Edward Tufte&#8217;s adage from <a href="http://amzn.to/9QlFZk">The Visual Display of Quantitative Information</a> comes to mind: &#8220;the only worse design than a pie chart is several of them&#8221;. The crime against charting here is made particularly egregious with the choice of a colour scheme for ratings that is not consistent across the two charts!</p>
<p>If that wasn&#8217;t bad enough, the design comes right off the rails with the outer charts. These are a form of annular pie chart, but the alignment of each segment is shifted in an attempt to make the pre-crisis figure more readily comparable to the post-crisis figure for each rating. The result is highly confusing: it takes a while to work out exactly what is going on. Messing with the alignment of the outer chart also makes it harder to compare one rating to another. Even the decision to position the 2012 data in the middle and the 2007 data on the outside is a mistake. My eye expects a flow from the centre of the circle outwards rather than from outside in. An informal, if statistically insignificant, survey suggests that I am not the only one with this expectation.</p>
<p>The aim of any data visualisation is to provide easy access to the information. Understanding the IMF report&#8217;s chart is just too much work. A simple table of figures would have been easier to understand. But there are also more conventional charts that would do a better job. The chart below is an example of the &#8220;small multiples&#8221; technique. This involves a grid of similar charts which are readily compared as certain parameters are varied. In this case, scanning the charts horizontally reveals changes through time and vertically the differences between advanced economies and emerging markets.</p>
<p style="text-align: center;"><a href="http://www.stubbornmule.net/blog/wp-content/ratings-multiples.png"><img class="aligncenter size-full wp-image-4927" title="Ratings multiple charts" src="http://www.stubbornmule.net/blog/wp-content/ratings-multiples.png" alt="" width="480" height="436" /></a><strong>Sovereign ratings from before the crisis (2007) to now (2012)</strong></p>
<p>Some space could have been saved by restricting the vertical axis to a 0% to 70% range, but with the full 0% to 100% range the proportions for each rating are more readily grasped.</p>
<p>The small multiples chart is a vast improvement on the IMF original, and is a good illustration of the fact that choosing the right chart makes it far easier to visualise the patterns in your data.</p>
<p>* One of the few pie charts I do approve of is <a href="http://www.stubbornmule.net/blog/wp-content/pie.png">this one</a> (I have seen this one in <a href="http://www.tineye.com/search/04db3944378161e64f5875ad8f0c0d4b7a7da048/">many places</a>, but I am not sure of the original source).</p>
<img src="http://feeds.feedburner.com/~r/StubbornMule/~4/r7V2QFkCSPc" height="1" width="1"/>]]></content:encoded>
			<wfw:commentRss>http://www.stubbornmule.net/2012/05/problem-pies/feed/</wfw:commentRss>
		<slash:comments>7</slash:comments>
		<feedburner:origLink>http://www.stubbornmule.net/2012/05/problem-pies/</feedburner:origLink></item>
		<item>
		<title>Goodhart’s Law</title>
		<link>http://feedproxy.google.com/~r/StubbornMule/~3/OA4EDhKNxss/</link>
		<comments>http://www.stubbornmule.net/2012/04/goodharts-law/#comments</comments>
		<pubDate>Mon, 23 Apr 2012 12:53:25 +0000</pubDate>
		<dc:creator>Stubborn Mule</dc:creator>
				<category><![CDATA[economics]]></category>

		<guid isPermaLink="false">http://www.stubbornmule.net/?p=4910</guid>
		<description><![CDATA[Another post and another Law, but this time no mathematics is involved. Imagine you are running a team of salespeople and, as a highly motivated manager, you are working on strategies to improve the performance of your team. After a close study of your team&#8217;s client call reports you realise that the high performers in [...]]]></description>
			<content:encoded><![CDATA[<p></p><p><a href="http://www.stubbornmule.net/blog/wp-content/target.jpg"><img class="alignright size-medium wp-image-4911" title="Dart Target" src="http://www.stubbornmule.net/blog/wp-content/target-300x223.jpg" alt="" width="300" height="223" /></a>Another post and another Law, but this time no mathematics is involved.</p>
<p>Imagine you are running a team of salespeople and, as a highly motivated manager, you are working on strategies to improve the performance of your team. After a close study of your team&#8217;s client call reports you realise that the high performers in the team consistently meet with their clients more frequently than the poor performers. Eureka! You now have a plan: you set targets for the number of times your team should meet with clients each week. Bonuses will depend upon performance against these targets. Confident that your new client call metric is highly correlated with sales performance, is objective and easily measurable, you sit back and wait.</p>
<p>Six months later, it is time to review the results. Initially you are pleased to discover that a number of your poor performers have achieved very good scores relative to your new targets. Most of the high performers have done well also, although you are a little disappointed that your best salesperson came nowhere near the &#8220;stretch target&#8221; you set. You then begin to review the sales results and find them very puzzling: despite the high number of client meetings, the results for most of your poor performers are worse than ever. Not only that, your top salesperson has had a record quarter. After you have worked out whether you can wriggle out of the commitment you made to link bonuses to your new metric, you would do well to reflect on the fact that you have fallen victim to <a href="http://en.wikipedia.org/wiki/Goodhart's_law">Goodhart&#8217;s Law</a>.</p>
<p>According to Goodhart&#8217;s Law, the very act of targeting a proxy (client meetings) to drive a desired outcome (sales performance) undermines the relationship between the proxy and the target. In the client meeting example, the relationship clearly broke down because your team immediately realised it was straightforward to &#8220;game&#8221; the metric, recording many meetings without actually doing a better job of selling. Your highest performer was probably too busy doing a good job to waste their clients&#8217; time with unnecessary meetings.</p>
<p>The Law was first described in 1975 by Charles Goodhart in a paper delivered to the Reserve Bank of Australia. It had been observed that there was a close relationship between money supply and interest rates and, on this basis, the Bank of England began to target money supply levels by setting short-term interest rates. Almost immediately, the relationship between interest rates and money supply broke down. While the reason for the breakdown was loosening of controls on bank lending rather than salespeople gaming targets, the label &#8220;Goodhart&#8217;s Law&#8221; caught on.</p>
<p>Along with its close relatives <a href="http://en.wikipedia.org/wiki/Campbell%27s_Law">Campbell&#8217;s Law</a> and the <a href="http://en.wikipedia.org/wiki/Lucas_critique">Lucas Critique</a>, Goodhart&#8217;s Law has been used to explain a broad range of phenomena, far removed from its origins in monetary policy. In 18th century Britain, a crude form of poll tax was levied based on the number of windows on every house. The idea was that the number of windows would be correlated with the number of people living in the house. It did not take long for householders to begin bricking up their windows. A more apocryphal example is the tale of the <a href="http://www.econlife.com/2012/04/04/government-guidelines-and-unintended-consequences/">Soviet-era nail factory</a>. Once central planners set targets for the weight of nail output, artful factory managers met their target by making just one nail, but an enormous and very heavy nail.</p>
<p>Much like the <a href="http://www.econlib.org/library/Enc/UnintendedConsequences.html">Law of Unintended Consequences</a>, of which it is a special case, Goodhart&#8217;s Law is one of those phenomena that, once you learn about it, you cannot help seeing it at work everywhere.</p>
<img src="http://feeds.feedburner.com/~r/StubbornMule/~4/OA4EDhKNxss" height="1" width="1"/>]]></content:encoded>
			<wfw:commentRss>http://www.stubbornmule.net/2012/04/goodharts-law/feed/</wfw:commentRss>
		<slash:comments>10</slash:comments>
		<feedburner:origLink>http://www.stubbornmule.net/2012/04/goodharts-law/</feedburner:origLink></item>
		<item>
		<title>Benford’s Law</title>
		<link>http://feedproxy.google.com/~r/StubbornMule/~3/0-vB-G4s43E/</link>
		<comments>http://www.stubbornmule.net/2012/04/benfords-law/#comments</comments>
		<pubDate>Mon, 16 Apr 2012 11:58:24 +0000</pubDate>
		<dc:creator>Stubborn Mule</dc:creator>
				<category><![CDATA[mathematics]]></category>
		<category><![CDATA[fraud]]></category>
		<category><![CDATA[R]]></category>
		<category><![CDATA[statistics]]></category>

		<guid isPermaLink="false">http://www.stubbornmule.net/?p=4878</guid>
		<description><![CDATA[Here is a quick quiz. If you visit the Wikipedia page List of countries by GDP, you will find three lists ranking the countries of the world in terms of their Gross Domestic Product (GDP), each list corresponding to a different source of the data. If you pick the list according to the CIA (let&#8217;s [...]]]></description>
			<content:encoded><![CDATA[<p></p><p>Here is a quick quiz. If you visit the Wikipedia page <a href="http://en.wikipedia.org/wiki/List_of_countries_by_GDP_(nominal)">List of countries by GDP</a>, you will find three lists ranking the countries of the world in terms of their Gross Domestic Product (GDP), each list corresponding to a different source of the data. If you pick the list according to the CIA (let&#8217;s face it, the CIA just sounds more exciting than the IMF or the World Bank), you should have a list of figures (denominated in US dollars) for 216 countries. Ignore the fact that the European Union is in the list along with the individual counties, and think about the first digit of each of the GDP values. What proportion of the data points start with 1? How about 2? Or 3 through to 9?</p>
<p>If you think they would all be about the same, you have not come across <a href="http://en.wikipedia.org/wiki/Benford's_law">Benford&#8217;s Law</a>. In fact, far more of the national GDP figures start with 1 than any other digit and fewer start with 9 than any other digit. The columns in the chart below shows the distribution of the leading digits (I will explain the dots and bars in a moment).</p>
<p style="text-align: center;"><a href="http://www.stubbornmule.net/blog/wp-content/gdp1.png"><img class="aligncenter size-full wp-image-4881" title="GDP (leading digits)" src="http://www.stubbornmule.net/blog/wp-content/gdp1.png" alt="" width="350" height="350" /></a><strong style="text-align: center;">Distribution of leading digits of GDP for 216 countries (in US$)</strong></p>
<p>This phenomenon is not unique to GDP. Indeed <a href="http://www.jstor.org/discover/10.2307/984802?uid=3737536&amp;uid=2&amp;uid=4&amp;sid=47698879600917">a 1937 paper</a> described a similar pattern of leading digit frequencies across a baffling array of measurements, including areas of rivers, street addresses of &#8220;American men of Science&#8221; and numbers appearing in front-page newspaper stories. The paper was titled &#8220;The Law of Anomalous Numbers&#8221; and was written by Frank Benford, who thereby gave his name to the phenomenon.</p>
<p>Benford&#8217;s Law of Anomalous Numbers states that that for many datasets, the proportion of data points with leading digit <em>n</em> will be approximated by</p>
<p style="text-align: center;">log<sub>10</sub>(<em>n</em>+1) &#8211; log<sub>10</sub>(<em>n</em>).</p>
<p> So, around 30.1% of the data should start with a 1, while only around 4.6% should start with a 9. The horizontal lines in the chart above show these theoretical proportions. It would appear that the GDP data features more leading 2s and fewer leading 3s than Benford&#8217;s Law would predict, but it is a relatively small sample of data, so some variation from the theoretical distribution should be expected.</p>
<p>As a variation of the usual tests of Benford&#8217;s Law, I thought I would choose a rather modern data set to test it on: Twitter follower numbers. Fortunately, there is an R package perfectly suited to this task: <a href="http://cran.r-project.org/web/packages/twitteR/">twitteR</a>. With twitteR installed, I looked at all of the twitter users who follow @<a href="http://twitter.com/stubbornmule">stubbornmule</a> and recorded how many users follow each of <em>them</em>. With only a relatively small follower base, this gave me a set of 342 data points which follows Benford&#8217;s Law remarkably well.</p>
<p> ;</p>
<p style="text-align: center;"><a href="http://www.stubbornmule.net/blog/wp-content/stubbornmule.png"><img class="aligncenter size-full wp-image-4886" title="Leading digits stubbornmule" src="http://www.stubbornmule.net/blog/wp-content/stubbornmule.png" alt="" width="350" height="350" /></a> <strong style="text-align: center;">Distribution of leading digits of follower counts</strong></p>
<p>As a measure of how well the data follows Benford&#8217;s Law, I have adopted the approach described by Rachel Fewster in her excellent paper <a href="http://amstat.tandfonline.com/doi/abs/10.1198/tast.2009.0005?journalCode=utas20">A Simple Explanation of Benford&#8217;s Law</a>. For the statistically-minded, this involves defining a chi-squared statistic which measures &#8220;badness&#8221; of Benford fit. This statistic provides a &#8220;<em>p</em> value&#8221; which you can think of as the probability that Benford&#8217;s Law could produce a distribution that looks like your data set. The follower-count for @<a href="http://twitter.com/stubbornmule">stubbornmule</a> is a very high 0.97, which shows a very good fit to the law. By way of contrast, if those 342 data points had a uniform distribution of leading digits, the <em>p</em> value would be less than 10<sup>-15</sup>, which would be a convincing violation of Benford&#8217;s Law.</p>
<p>Since so many data sets do follow Benford&#8217;s Law, this kind of statistical analysis has been used to detect fraud. If you were a budding Enron-style accountant set on falsifying your company&#8217;s accounts, you may not be aware of Benford&#8217;s Law. As a result, you may end up inventing too many figures starting with 9 and not enough starting with 1. Exactly this style of analysis is described in the 2004 paper <a href="http://svn2.assembla.com/svn/miscenaleas/publicidadoficial/benford/The-Effective-Use-Of-Benford's-Law-To-Assist-In-Detecting-Fraud-In-Accounting-Data.pdf">The Effective Use of Benford’s Law to Assist in Detecting Fraud in Accounting Data</a> by Durtshi, Hillison and Pacini.</p>
<p>By this point, you are probably asking one question: why does it work? It is an excellent question, and a surprisingly difficult and somewhat controversial one. At current count, an <a href="http://www.benfordonline.net/">online bibliography of papers on Benford Law</a> lists 657 papers on the subject. For me, the best explanation is Fewster&#8217;s &#8220;simple explanation&#8221; which is based her &#8220;Law of the Stripey Hat&#8221;. However simple it may be, it warrants a blog post of its own, so I will be keeping you in suspense a little longer. In the process, I will also explain some circumstances in which you should not expect Benford&#8217;s Law to hold (as an example, think about phone numbers in a telephone book).</p>
<p>In the meantime, having gone to the trouble of adapting <a href="http://www.stat.auckland.ac.nz/~fewster/benford/index.html">Fewster&#8217;s R Code</a> to produce charts testing how closely twitter follower counts fit Benford&#8217;s Law, I feel I should share a few more examples. My personal twitter account, @<a href="http://twitter.com/seancarmody">seancarmody</a>, has more followers than @<a href="http://twitter.com/stubbornmule">stubbornmule</a> and the pattern of leading digits in my followers&#8217; follower counts also provides a good illustration of Benford&#8217;s Law.</p>
<p><a href="http://www.stubbornmule.net/blog/wp-content/seancarmody2.png"><img class="aligncenter size-full wp-image-4897" title="seancarmody Benford" src="http://www.stubbornmule.net/blog/wp-content/seancarmody2.png" alt="" width="350" height="350" /></a></p>
<p>One of my twitter friends, @<a href="http://twitter.com/stilgherrian">stilgherrian</a>, has even more followers than I do and so provides an even larger data set.</p>
<p><a href="http://www.stubbornmule.net/blog/wp-content/stilgherrian.png"><img class="aligncenter size-full wp-image-4895" title="Stilgherrian followers" src="http://www.stubbornmule.net/blog/wp-content/stilgherrian.png" alt="" width="350" height="350" /></a></p>
<p>Even though the bars seem to follow the Benford pattern quite well here, the <em>p</em> value is a rather low 5.5%. This reflects the fact that the larger the sample, the closer the fit should be to the theoretical frequencies if the data set really follows Benford&#8217;s Law. This result appears to be largely due to more leading 1s than expected and fewer leading 2s. To get a better idea of what is happening to the follower counts of stilgherrian&#8217;s followers, below is a density* histogram of the follower counts on a log<sub>10</sub> scale.</p>
<p>There are a few things we can glean from this chart. First, the spike at zero represents accounts with only a single follower, accounting around 1% of stilgherrian&#8217;s followers (since we are working on a log scale, the followers with no followers of their own do not appear on the chart at all). Most of the data is in the range 2 (accounts with 100 followers) to 3 (accounts with 1000 followers). Between 3 and 4 (10,000 followers), the distribution falls of rapidly. This suggests that the deviation from Benford&#8217;s Law is due to a fair number users with a follower count in the 1000-1999 range (I am one of those myself), but a shortage in the 2000-2999 range. Beyond that, the number of data points becomes too small to have much of an effect.</p>
<p style="text-align: center;"><a href="http://www.stubbornmule.net/blog/wp-content/stilgherrian-hist.png"><img class="aligncenter size-full wp-image-4896" title="stilgherrian Histogram" src="http://www.stubbornmule.net/blog/wp-content/stilgherrian-hist.png" alt="" width="350" height="350" /></a><strong>Histogram of follower counts of @stilgherrian&#8217;s followers</strong></p>
<p>Of course, the point of this analysis is not to suggest that there is anything particularly meaningful about the follower counts of twitter users, but to highlight the fact that even the most peculiar of data sets found &#8220;in nature&#8221; is likely to yield to the power of Benford&#8217;s Law.</p>
<p>* A density histogram scales the vertical axis to ensure that the histogram covers a region of area one rather than the frequency of occurrences in each bin.</p>
<img src="http://feeds.feedburner.com/~r/StubbornMule/~4/0-vB-G4s43E" height="1" width="1"/>]]></content:encoded>
			<wfw:commentRss>http://www.stubbornmule.net/2012/04/benfords-law/feed/</wfw:commentRss>
		<slash:comments>22</slash:comments>
		<feedburner:origLink>http://www.stubbornmule.net/2012/04/benfords-law/</feedburner:origLink></item>
		<item>
		<title>Pressure Drop</title>
		<link>http://feedproxy.google.com/~r/StubbornMule/~3/rxXN4Yyex1I/</link>
		<comments>http://www.stubbornmule.net/2012/03/pressure-drop/#comments</comments>
		<pubDate>Tue, 27 Mar 2012 12:02:31 +0000</pubDate>
		<dc:creator>Stubborn Mule</dc:creator>
				<category><![CDATA[music]]></category>

		<guid isPermaLink="false">http://www.stubbornmule.net/?p=4856</guid>
		<description><![CDATA[On Saturday night I found myself in Melbourne at the first live performance in 30 years of the reggae band Pressure Drop. The last time Pressure Drop played I probably couldn&#8217;t have told you what reggae was. Although I would certainly have heard Eddy Grant&#8217;s Electric Avenue on the radio, I was a New Romantic [...]]]></description>
			<content:encoded><![CDATA[<p></p><p>On Saturday night I found myself in Melbourne at the first live performance in 30 years of the reggae band <a href="http://www.pressuredropband.org/">Pressure Drop</a>.</p>
<p>The last time Pressure Drop played I probably couldn&#8217;t have told you what reggae was. Although I would certainly have heard Eddy Grant&#8217;s <a href="http://en.wikipedia.org/wiki/Electric_Avenue_(song)">Electric Avenue</a> on the radio, I was a New Romantic at heart and was more inclined to listen to the likes of Adam and the Ants. At this point, in the interests of full disclosure, I should admit that Pressure Drop&#8217;s concert was the second of the weekend for me: I also saw <a href="http://t.co/zcEpbrzw">Adam Ant at the Enmore Theatre</a> the night before.</p>
<p>Since my New Romantic period, I have learned to appreciate <a href="http://themusicblogs.com.au/2009/concerts/lee-perry-opera-house/">reggae and dub</a>, but that doesn&#8217;t explain why I came to be in the audience at the Caravan Music Club. The real reason was that Pressure Drop&#8217;s guitarist is Bill Mitchell, macroeconomist, Modern Monetary Theory (MMT) pioneer and the man behind <a href="http://bilbo.economicoutlook.net/blog/">Billy Blog</a>.</p>
<p>Bill and I first came into contact in 2008 when we both blogged about alternative Olympic medal tallies (my post is <a href="http://www.stubbornmule.net/2008/08/olympics-by-gdp/">here</a> and Bill&#8217;s is <a href="http://www.billmitchell.org/sport/medal_tally_2008.html">here</a>). I then became very interested in Bill&#8217;s expositions on the importance a country&#8217;s monetary system has for understanding the possibilities for fiscal policy. Bill&#8217;s ideas were the inspiration of many of my posts, such as <a href="http://www.stubbornmule.net/2010/02/greece-debt-crisis/">Blame Greece&#8217;s Debt Crisis on the Euro</a> and <a href="http://www.stubbornmule.net/2009/07/park-the-debt-truck/">Park the Debt Truck</a> and I eventually came to know Bill in person after attending a couple of <a href="http://e1.newcastle.edu.au/coffee/">CofFEE conferences</a>.</p>
<p>Bill&#8217;s academic interests extend from the workings of money, to concerns about full employment and equity (my only <a href="http://www.stubbornmule.net/2010/12/job-guarantee/">podcast</a> to date featured Bill explaining his idea of a job guarantee, which is underpinned by an understanding of MMT). Since reggae has its roots in concerns about social justice, it came as no real surprise to learn that Bill had once played reggae. Then last year the band started rehearsing again and these rehearsals culminated in the release of a new CD, <a href="http://www.pressuredropband.org/?page_id=260">aLIVE 2011</a>. I was keen to hear the results and I suspect I was one of the first to order a copy.</p>
<p><a href="http://www.stubbornmule.net/blog/wp-content/IMG_2467.jpg"><img class="aligncenter size-medium wp-image-4868" title="Pressure Drop" src="http://www.stubbornmule.net/blog/wp-content/IMG_2467-300x225.jpg" alt="" width="300" height="225" /></a></p>
<p style="text-align: center;"><strong>Pressure Drop</strong></p>
<p>Although Bill is based in Newcastle these days, Pressure Drop had always been a Melbourne band, so it was only natural that their return performance should be in Melbourne. I had been planning a trip to Melbourne for some time and fortuitously it coincided with the night of the concert. So it was that I found myself out at Oakleigh RSL on Saturday night.</p>
<p><a href="http://www.stubbornmule.net/blog/wp-content/IMG_2468.jpg"><img class="aligncenter size-medium wp-image-4857" title="Bill Mitchell" src="http://www.stubbornmule.net/blog/wp-content/IMG_2468-225x300.jpg" alt="" width="225" height="300" /></a></p>
<p style="text-align: center;"><strong>Bill Mitchell on guitar with Pressure Drop</strong></p>
<p>Before Pressure Drop and after I beat my brother at a game of pool, there was a two piece support act: Ross Hannaford (of <a href="http://en.wikipedia.org/wiki/Daddy_Cool_(band)">Daddy Cool</a> fame) and Bart Willoughby, the drummer from <a href="http://en.wikipedia.org/wiki/No_Fixed_Address">No Fixed Address</a>. I would hate to imagine how many years Brian has being playing guitar, but he is certainly able to coax beautiful sounds from those strings, apparently with no effort at all.</p>
<p>Once Pressure Drop came to the stage, it wasn&#8217;t long before dancing began. Bill had plenty of reverb on his guitar, but not so much as to hide the fact that he can play as well as he can blog (more than can be said for me). The band had a house full of enthusiastic supporters and they did not disappoint. The concert was great fun for all of us on the dance floor and it looked as though the band enjoyed themselves just as much. Don&#8217;t be surprised if Bill trades his professorial chair for a Fender on a permanent basis.</p>
<p>With the iPhone in hand, I managed to get a few photographs (the band has posted more <a href="http://www.pressuredropband.org/?page_id=429">here</a>) and even a couple of brief video clips which I have crudely spliced.</p>
<p><iframe src="http://www.youtube.com/embed/SOgmoW-cxHs" frameborder="0" width="500" height="284"></iframe></p>
<p>I&#8217;ll be keeping an eye out now to see whether Pressure Drop decide to take the band on the road and play in Sydney. I can&#8217;t be sure when I&#8217;ll be in Melbourne next.</p>
<p>UPDATE: here is a <a href="http://youtu.be/vTg-akm2Qbo">video of the entire concert</a> (1:40).</p>
<img src="http://feeds.feedburner.com/~r/StubbornMule/~4/rxXN4Yyex1I" height="1" width="1"/>]]></content:encoded>
			<wfw:commentRss>http://www.stubbornmule.net/2012/03/pressure-drop/feed/</wfw:commentRss>
		<slash:comments>7</slash:comments>
		<feedburner:origLink>http://www.stubbornmule.net/2012/03/pressure-drop/</feedburner:origLink></item>
		<item>
		<title>Bitcoin revisited</title>
		<link>http://feedproxy.google.com/~r/StubbornMule/~3/mq_xwuTmqmg/</link>
		<comments>http://www.stubbornmule.net/2012/03/bitcoin-revisited/#comments</comments>
		<pubDate>Mon, 05 Mar 2012 11:25:52 +0000</pubDate>
		<dc:creator>Stubborn Mule</dc:creator>
				<category><![CDATA[finance]]></category>
		<category><![CDATA[money]]></category>

		<guid isPermaLink="false">http://www.stubbornmule.net/?p=4843</guid>
		<description><![CDATA[Just over a year ago, I wrote about the digital &#8220;crypto-currency&#8221; Bitcoin. It has been an eventful year for Bitcoin. Designed to provide a secure yet anonymous, decentralised means for making payments online, the first Bitcoins were virtually minted in 2009. By early 2011, Bitcoin had begun to attract attention. Various sites, including the not-for-profit [...]]]></description>
			<content:encoded><![CDATA[<p></p><p>Just over a year ago, I wrote about the <a href="http://www.stubbornmule.net/2011/02/virtual-currency/">digital &#8220;crypto-currency&#8221; Bitcoin</a>. It has been an eventful year for Bitcoin.</p>
<p>Designed to provide a secure yet anonymous, decentralised means for making payments online, the first Bitcoins were virtually minted in 2009. By early 2011, Bitcoin had begun to attract attention. Various sites, including the not-for-profit champion of rights online, the Electronic Frontier Foundation (EFF), <a href="https://www.eff.org/deeplinks/2011/01/bitcoin-step-toward-censorship-resistant">began accepting Bitcoins as payment</a>. But when <a href="http://gawker.com/5805928/the-underground-website-where-you-can-buy-any-drug-imaginable">Gawker reported that Bitcoins could be used to buy drugs</a> on &#8220;underground&#8221; website Silk Road, interest in the currency exploded and within a few days, the price of Bitcoins soared to almost $30.</p>
<p>This kind of attention was unwelcome for some, and shortly afterwards <a href="https://www.eff.org/deeplinks/2011/06/eff-and-bitcoin">EFF announced that they would no longer be accepting Bitcoins</a>, fearing that this would be construed as an endorsement of the now controversial currency. Around the same time, <a href="http://thenextweb.com/insider/2011/06/15/close-to-us500k-stolen-in-first-major-bitcoin-theft/">the first major theft of Bitcoins was reported</a> and the Bitcoin exchange rate fell sharply.</p>
<p><a href="http://www.stubbornmule.net/blog/wp-content/btc.png"><img class="aligncenter size-full wp-image-4845" title="Bitcoin price history" src="http://www.stubbornmule.net/blog/wp-content/btc.png" alt="Bitcoin price history" width="450" height="450" /></a></p>
<p style="text-align: center;"><strong>Bitcoin Exchange Rate</strong></p>
<p>More recently, <a href="http://arstechnica.com/business/news/2012/03/bitcoins-worth-228000-stolen-from-customers-of-hacked-webhost.ars?clicked=related_right">another high-profile theft</a> has caused ructions in the Bitcoin economy, prompting e-payments provider and PayPal competitor, <a href="https://www.paxum.com/payment/index.php?view=views/index.xsl">Paxum</a>, to abandon the Bitcoin experiment, which in turn <a href="http://www.betabeat.com/2012/02/13/bitcoin-exchange-tradehill-suspends-trading/">forced one of the larger Bitcoin &#8220;exchanges&#8221; to shut down</a>. The anonymity of Bitcoin is a design feature, but it also makes it almost impossible to trace thieves once they have their virtual hands on Bitcoins.</p>
<p>How much damage this does to the fledgling currency remains to be seen, but it certainly makes for a volatile currency. The free-floating Australian dollar is a reasonably volatile real-world currency but, as is evident in the chart below, Bitcoin volatility is an order of magnitude higher. That in itself is reason enough for any online business to think twice about accepting Bitcoins.</p>
<p style="text-align: center;"><a href="http://www.stubbornmule.net/blog/wp-content/vols.png"><img class="aligncenter size-full wp-image-4844" title="Bitcoin volatility" src="http://www.stubbornmule.net/blog/wp-content/vols.png" alt="Bitcoin volatility" width="450" height="450" /></a><strong><span style="text-align: center;">Rolling 30 day volatility (annualised)</span></strong></p>
<p>Whatever its future, Bitcoin is a fascinating experiment and, even if it does not survive, digital currencies of one form or another are surely here to stay.</p>
<p>Data sources: <a href="http://bitcoincharts.com/charts/mtgoxUSD#tgCzm1g10zm2g25zv">Bitcoin charts</a>, Bloomberg.</p>
<img src="http://feeds.feedburner.com/~r/StubbornMule/~4/mq_xwuTmqmg" height="1" width="1"/>]]></content:encoded>
			<wfw:commentRss>http://www.stubbornmule.net/2012/03/bitcoin-revisited/feed/</wfw:commentRss>
		<slash:comments>4</slash:comments>
		<feedburner:origLink>http://www.stubbornmule.net/2012/03/bitcoin-revisited/</feedburner:origLink></item>
		<item>
		<title>Bristol Pound</title>
		<link>http://feedproxy.google.com/~r/StubbornMule/~3/fBZLC9eNYrE/</link>
		<comments>http://www.stubbornmule.net/2012/02/bristol-pound/#comments</comments>
		<pubDate>Wed, 22 Feb 2012 09:42:41 +0000</pubDate>
		<dc:creator>Stubborn Mule</dc:creator>
				<category><![CDATA[finance]]></category>
		<category><![CDATA[money]]></category>

		<guid isPermaLink="false">http://www.stubbornmule.net/?p=4835</guid>
		<description><![CDATA[Recently, a colleague drew my attention to the &#8220;Bristol Pound&#8220;, an example of a &#8220;local currency&#8220;.   Ah yes, I said, that&#8217;s been around for a few years now. Embarrassingly, I later realised I was thinking about the &#8220;Brixton Pound&#8220;. Having attended many concerts at the legendary Brixton Academy (Nick Cave, Ministry and the Sugarcubes among [...]]]></description>
			<content:encoded><![CDATA[<p></p><p>Recently, a colleague drew my attention to the &#8220;<a href="http://bristolpound.org/">Bristol Pound</a>&#8220;, an example of a &#8220;<a href="http://en.wikipedia.org/wiki/Local_currency">local currency</a>&#8220;.   Ah yes, I said, that&#8217;s been around for a few years now. Embarrassingly, I later realised I was thinking about the &#8220;<a href="http://brixtonpound.org/">Brixton Pound</a>&#8220;. Having attended many concerts at the legendary Brixton Academy (Nick Cave, Ministry and the Sugarcubes among them), I really should have known the difference between Bristol and Brixton!</p>
<p>There are now a number of local currencies in Britain. The first to appear in recent years was the  &#8221;<a href="http://www.transitiontowntotnes.org/totnespound/home">Totnes Pound</a>&#8220;, launched in March 2007. According to their website, the benefits of the Totnes Pound are:</p>
<ul>
<li>To build resilience in the local economy by keeping money circulating in the community and building new relationships</li>
<li>To get people thinking and talking about how they spend their money</li>
<li>To encourage more local trade and thus reduce food and trade miles</li>
<li>To encourage tourists to use local businesses</li>
</ul>
<p>The aims of the Brixton Pound, the Bristol Pound and the other local currencies are essentially the same. As far as I can tell, the take up of these currencies to date has been modest, but the Bristol Pound represents an interesting new development. Not only does it have a far slicker website, but it also offers payment by mobile phone. Perhaps most significantly, according to the <a href="http://bristolpound.org/index.php?com=pages&amp;page=34">FAQ</a>, &#8221;Business members that pay business rates to Bristol City Council will be able to pay in Bristol Pounds.&#8221;</p>
<p>A key tenet of &#8220;Modern Monetary Theory&#8221; is that the value of <a href="http://www.stubbornmule.net/2009/12/how-money-works/">fiat money</a> is not underpinned by gold or any other commodity; rather its value derives from the government levying tax in that currency. Since almost everyone has to pay tax at some point, this creates a base level of demand for the currency. So, perhaps the fact that the Bristol City Council is supporting the Bristol Pound will enhance its take-up prospects. It would be even more interesting if the council decided that they would <strong>only</strong> accept Bristol Pounds as payment for rates.</p>
<img src="http://feeds.feedburner.com/~r/StubbornMule/~4/fBZLC9eNYrE" height="1" width="1"/>]]></content:encoded>
			<wfw:commentRss>http://www.stubbornmule.net/2012/02/bristol-pound/feed/</wfw:commentRss>
		<slash:comments>11</slash:comments>
		<feedburner:origLink>http://www.stubbornmule.net/2012/02/bristol-pound/</feedburner:origLink></item>
		<item>
		<title>More on the Hottest 100</title>
		<link>http://feedproxy.google.com/~r/StubbornMule/~3/C1C5vfuR-w0/</link>
		<comments>http://www.stubbornmule.net/2012/01/more-on-the-hottest-100/#comments</comments>
		<pubDate>Fri, 27 Jan 2012 10:29:58 +0000</pubDate>
		<dc:creator>Stubborn Mule</dc:creator>
				<category><![CDATA[australia]]></category>
		<category><![CDATA[music]]></category>

		<guid isPermaLink="false">http://www.stubbornmule.net/?p=4800</guid>
		<description><![CDATA[Following on from the last post on the Hottest 100, I received a few tweets from @mjdart demanding a deeper dive into the data. One of his questions was Of artists charting in at least 5 yrs, are Oz artists higher represented? I decided to broaden the questions to look at artists with at least [...]]]></description>
			<content:encoded><![CDATA[<p></p><p>Following on from the last post on the Hottest 100, I received a few tweets from @<a href="https://twitter.com/#!/mjdart">mjdart</a> demanding a deeper dive into the data. One of his questions was</p>
<blockquote><p>Of artists charting in at least 5 yrs, are Oz artists higher represented?</p></blockquote>
<p>I decided to broaden the questions to look at artists with at least five tracks in Hottest 100s (so artists with two tracks in one year and one track in three other years would be in). On this criterion, Australia still comes out on top.</p>
<p><a href="http://www.stubbornmule.net/blog/wp-content/fivep.png"><img class="aligncenter size-full wp-image-4818" title="Five plus artists" src="http://www.stubbornmule.net/blog/wp-content/fivep.png" alt="" width="480" height="450" /></a></p>
<p style="text-align: center;"><strong>Number of artists with at least 5 &#8220;Hot&#8221; tracks</strong></p>
<p>In the last post, I complained that 2010 data is currently missing from Wikipedia. It seems that this is because <a href="http://www.stubbornmule.net/2012/01/hottest-100-for-2011/#comment-27689">Wikipedia is yet to get permission from the ABC</a>. I have decided to risk the wrath of Auntie and have posted the full chart in the table at the bottom of the post. Having pieced it together, I have updated my original chart to include 2010.</p>
<p><a href="http://www.stubbornmule.net/blog/wp-content/series1.png"><img class="aligncenter size-full wp-image-4819" title="Hottest 100 with 2010" src="http://www.stubbornmule.net/blog/wp-content/series1.png" alt="" width="530" height="850" /></a></p>
<p>As you can see, 2010 was a good year for Australian artists. It also turns out that the artist with the most Hottest 100 tracks is also Australian: Powderfinger. Here are all the artists with at least 10 Hottest 100 tracks.</p>
<div align="center">
<table class="Data3">
<thead>
<tr>
<th style="text-align: left;">Artist</th>
<th style="text-align: right;">Count</th>
<th style="text-align: left;">Country</th>
</tr>
</thead>
<tbody>
<tr>
<td>Powderfinger</td>
<td align="right">22</td>
<td>Australia</td>
</tr>
<tr>
<td>Foo Fighters</td>
<td align="right">20</td>
<td>United States</td>
</tr>
<tr>
<td>Grinspoon</td>
<td align="right">17</td>
<td>Australia</td>
</tr>
<tr>
<td>Silverchair</td>
<td align="right">17</td>
<td>Australia</td>
</tr>
<tr>
<td>Muse</td>
<td align="right">16</td>
<td>United Kingdom</td>
</tr>
<tr>
<td>The Living End</td>
<td align="right">16</td>
<td>Australia</td>
</tr>
<tr>
<td>Regurgitator</td>
<td align="right">15</td>
<td>Australia</td>
</tr>
<tr>
<td>Pearl Jam</td>
<td align="right">14</td>
<td>United States</td>
</tr>
<tr>
<td>Placebo</td>
<td align="right">14</td>
<td>United Kingdom</td>
</tr>
<tr>
<td>You Am I</td>
<td align="right">14</td>
<td>Australia</td>
</tr>
<tr>
<td>Green Day</td>
<td align="right">13</td>
<td>United States</td>
</tr>
<tr>
<td>Something for Kate</td>
<td align="right">13</td>
<td>Australia</td>
</tr>
<tr>
<td>Eskimo Joe</td>
<td align="right">12</td>
<td>Australia</td>
</tr>
<tr>
<td>Garbage</td>
<td align="right">12</td>
<td>United States</td>
</tr>
<tr>
<td>Red Hot Chili Peppers</td>
<td align="right">12</td>
<td>United States</td>
</tr>
<tr>
<td>Hilltop Hoods</td>
<td align="right">11</td>
<td>Australia</td>
</tr>
<tr>
<td>Radiohead</td>
<td align="right">11</td>
<td>United Kingdom</td>
</tr>
<tr>
<td>Spiderbait</td>
<td align="right">11</td>
<td>Australia</td>
</tr>
<tr>
<td>The White Stripes</td>
<td align="right">11</td>
<td>United States</td>
</tr>
<tr>
<td>The Whitlams</td>
<td align="right">11</td>
<td>Australia</td>
</tr>
<tr>
<td>Wolfmother</td>
<td align="right">11</td>
<td>Australia</td>
</tr>
<tr>
<td>Beck</td>
<td align="right">10</td>
<td>United States</td>
</tr>
<tr>
<td>Ben Harper</td>
<td align="right">10</td>
<td>United States</td>
</tr>
<tr>
<td>Jebediah</td>
<td align="right">10</td>
<td>Australia</td>
</tr>
<tr>
<td>Metallica</td>
<td align="right">10</td>
<td>United States</td>
</tr>
<tr>
<td>Rage Against the Machine</td>
<td align="right">10</td>
<td>United States</td>
</tr>
<tr>
<td>The Strokes</td>
<td align="right">10</td>
<td>United States</td>
</tr>
</tbody>
</table>
</div>
<p>UPDATE:</p>
<p>@<a href="https://twitter.com/#!/mjdart">mjdart</a> asked another question which I thought I should also answer:</p>
<blockquote><p>@<a href="https://twitter.com/#!/stubbornmule">stubbornmule</a> If you assign 100 pts for #1 thru 1 pt for #100 each year, is Oz proportion higher/lower? eg Oz filling out top or bottom 50?</p></blockquote>
<p>To answer this, I assigned 100 points for the top spot, 99 points for the second and so on down to one point for last place. I summed the score for each country and then scaled it by dividing by 50.5. This odd choice arises because 100 + 99 + 98 + &#8230; + 2 + 1 = 5050 and so dividing by 50.5 would give a score of 100 for a country that managed to win every spot in the top 100. This makes the score directly comparable to a simple count of places in the top 100. So, how does this weighted score compare to a simple count? The answer, evident in the chart below is not much! So, each country&#8217;s artists must be fairly evenly spread through the top 100 over time.</p>
<p><a href="http://www.stubbornmule.net/blog/wp-content/dodge2.png"><img class="aligncenter size-full wp-image-4828" title="Hottest 100 country and score" src="http://www.stubbornmule.net/blog/wp-content/dodge2.png" alt="" width="530" height="500" /></a></p>
<p>Finally, here is the complete listing of the 2010 Hottest 100, including country of origin. If you are feeling brave, you may wish to update Wikipedia. Just keep in mind, the list may be deleted again if the ABC does not provide permission for the list to be published!</p>

<table id="wp-table-reloaded-id-10-no-1" class="wp-table-reloaded wp-table-reloaded-id-10">
<thead>
	<tr class="row-1 odd">
		<th class="column-1">Rank</th><th class="column-2">Title</th><th class="column-3">Artist</th><th class="column-4">Country</th>
	</tr>
</thead>
<tbody>
	<tr class="row-2 even">
		<td class="column-1">1</td><td class="column-2">Big Jet plane</td><td class="column-3">Angus &amp; Julia Stone</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-3 odd">
		<td class="column-1">2</td><td class="column-2">Rock It</td><td class="column-3">Little Red</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-4 even">
		<td class="column-1">3</td><td class="column-2">Dance The Way I Feel</td><td class="column-3">Ou Est Le Swimming Pool</td><td class="column-4">England</td>
	</tr>
	<tr class="row-5 odd">
		<td class="column-1">4</td><td class="column-2">Plans</td><td class="column-3">Birds Of Tokyo</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-6 even">
		<td class="column-1">5</td><td class="column-2">Fall At Your Feet</td><td class="column-3">Boy &amp; Bear</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-7 odd">
		<td class="column-1">6</td><td class="column-2">Teenage Crime</td><td class="column-3">Adrian Lux</td><td class="column-4">Sweden</td>
	</tr>
	<tr class="row-8 even">
		<td class="column-1">7</td><td class="column-2">Fuck You!</td><td class="column-3">Cee Lo Green</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-9 odd">
		<td class="column-1">8</td><td class="column-2">Tokyo (Vampires &amp; Wolves)</td><td class="column-3">The Wombats</td><td class="column-4">England</td>
	</tr>
	<tr class="row-10 even">
		<td class="column-1">9</td><td class="column-2">Magic Fountain</td><td class="column-3">Art Vs. Science</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-11 odd">
		<td class="column-1">10</td><td class="column-2">Somebody To Love Me {Ft. Boy George &amp; Andrew Wyatt}</td><td class="column-3">Mark Ronson &amp; The Business Intl.</td><td class="column-4">England</td>
	</tr>
	<tr class="row-12 even">
		<td class="column-1">11</td><td class="column-2">ABC News Theme {Remix}</td><td class="column-3">Pendulum</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-13 odd">
		<td class="column-1">12</td><td class="column-2">Rapunzel</td><td class="column-3">Drapht</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-14 even">
		<td class="column-1">13</td><td class="column-2">Clap Your Hands</td><td class="column-3">Sia</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-15 odd">
		<td class="column-1">14</td><td class="column-2">Runaway {Ft. Pusha T}</td><td class="column-3">Kanye West</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-16 even">
		<td class="column-1">15</td><td class="column-2">Barbara Streisand</td><td class="column-3">Duck Sauce</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-17 odd">
		<td class="column-1">16</td><td class="column-2">Mace Spray</td><td class="column-3">The Jezabels</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-18 even">
		<td class="column-1">17</td><td class="column-2">Bang Bang Bang {Ft. MNDR &amp; Q-Tip}</td><td class="column-3">Mark Ronson &amp; The Business Intl.</td><td class="column-4">England</td>
	</tr>
	<tr class="row-19 odd">
		<td class="column-1">18</td><td class="column-2">There’s Nothing In The Water We Can’t Fight</td><td class="column-3">Cloud Control</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-20 even">
		<td class="column-1">19</td><td class="column-2">Crave You {Ft. Giselle}</td><td class="column-3">Flight Facilities</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-21 odd">
		<td class="column-1">20</td><td class="column-2">Sunday Best</td><td class="column-3">Washington</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-22 even">
		<td class="column-1">21</td><td class="column-2">Undercover MartynU</td><td class="column-3">Two Door Cinema Club</td><td class="column-4">Northern Ireland</td>
	</tr>
	<tr class="row-23 odd">
		<td class="column-1">22</td><td class="column-2">Jellylegs</td><td class="column-3">Children Collide</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-24 even">
		<td class="column-1">23</td><td class="column-2">Addicted</td><td class="column-3">Bliss N Eso</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-25 odd">
		<td class="column-1">24</td><td class="column-2">Talking Like I’m Falling Down Stairs</td><td class="column-3">Sparkadia</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-26 even">
		<td class="column-1">25</td><td class="column-2">Eyes Wide Open</td><td class="column-3">Gotye</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-27 odd">
		<td class="column-1">26</td><td class="column-2">Not In Love {Ft. Robert Smith}</td><td class="column-3">Crystal Castles</td><td class="column-4">Canada</td>
	</tr>
	<tr class="row-28 even">
		<td class="column-1">27</td><td class="column-2">You’ve Got The Dirtee Love {Live}</td><td class="column-3">Florence &amp; The Machine/Dizzee Rascal</td><td class="column-4">England</td>
	</tr>
	<tr class="row-29 odd">
		<td class="column-1">28</td><td class="column-2">Radar Detector</td><td class="column-3">Darwin Deez</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-30 even">
		<td class="column-1">29</td><td class="column-2">It Can Wait {Ft. Owl Eyes}</td><td class="column-3">Illy</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-31 odd">
		<td class="column-1">30</td><td class="column-2">O.N.E</td><td class="column-3">Yeasayer</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-32 even">
		<td class="column-1">31</td><td class="column-2">Bloodbuzz Ohio</td><td class="column-3">The National</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-33 odd">
		<td class="column-1">32</td><td class="column-2">Pumped Up Kicks</td><td class="column-3">Foster The People</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-34 even">
		<td class="column-1">33</td><td class="column-2">Solitude Is Bliss</td><td class="column-3">Tame Impala</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-35 odd">
		<td class="column-1">34</td><td class="column-2">Punching In A Dream</td><td class="column-3">The Naked And Famous</td><td class="column-4">New Zealand</td>
	</tr>
	<tr class="row-36 even">
		<td class="column-1">35</td><td class="column-2">The Bike Song {Ft. Kyle Falconer &amp; Spank Rock}</td><td class="column-3">Mark Ronson &amp; The Business Intl.</td><td class="column-4">England</td>
	</tr>
	<tr class="row-37 odd">
		<td class="column-1">36</td><td class="column-2">Opposite Of Adults</td><td class="column-3">Chiddy Bang</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-38 even">
		<td class="column-1">37</td><td class="column-2">Doncamatic {Ft. Daley}</td><td class="column-3">Gorillaz</td><td class="column-4">England</td>
	</tr>
	<tr class="row-39 odd">
		<td class="column-1">38</td><td class="column-2">Young Blood</td><td class="column-3">The Naked And Famous</td><td class="column-4">New Zealand</td>
	</tr>
	<tr class="row-40 even">
		<td class="column-1">39</td><td class="column-2">Revolution</td><td class="column-3">John Butler Trio</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-41 odd">
		<td class="column-1">40</td><td class="column-2">Baby, I’m Getting Better</td><td class="column-3">Gyroscope</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-42 even">
		<td class="column-1">41</td><td class="column-2">Down By The River</td><td class="column-3">Bliss N Eso</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-43 odd">
		<td class="column-1">42</td><td class="column-2">On Melancholy Hill</td><td class="column-3">Gorillaz</td><td class="column-4">England</td>
	</tr>
	<tr class="row-44 even">
		<td class="column-1">43</td><td class="column-2">We No Speak Americano</td><td class="column-3">Yolanda Be Cool</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-45 odd">
		<td class="column-1">44</td><td class="column-2">Baptism</td><td class="column-3">Crystal Castles</td><td class="column-4">Canada</td>
	</tr>
	<tr class="row-46 even">
		<td class="column-1">45</td><td class="column-2">Rabbit Song</td><td class="column-3">Boy &amp; Bear</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-47 odd">
		<td class="column-1">46</td><td class="column-2">Way Back Home</td><td class="column-3">Bag Raiders</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-48 even">
		<td class="column-1">47</td><td class="column-2">Wild At Heart</td><td class="column-3">Birds Of Tokyo</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-49 odd">
		<td class="column-1">48</td><td class="column-2">Witchcraft</td><td class="column-3">Pendulum</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-50 even">
		<td class="column-1">49</td><td class="column-2">Easy To Love</td><td class="column-3">The Jezabels</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-51 odd">
		<td class="column-1">50</td><td class="column-2">One Life Stand</td><td class="column-3">Hot Chip</td><td class="column-4">England</td>
	</tr>
	<tr class="row-52 even">
		<td class="column-1">51</td><td class="column-2">Ambling</td><td class="column-3">Yeasayer</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-53 odd">
		<td class="column-1">52</td><td class="column-2">Overpass</td><td class="column-3">The John Steel Singers</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-54 even">
		<td class="column-1">53</td><td class="column-2">Reflections</td><td class="column-3">Bliss N Eso</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-55 odd">
		<td class="column-1">54</td><td class="column-2">Holidays {Ft. Alan Palomo}</td><td class="column-3">Miami Horror</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-56 even">
		<td class="column-1">55</td><td class="column-2">Giving Up The Gun</td><td class="column-3">Vampire Weekend</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-57 odd">
		<td class="column-1">56</td><td class="column-2">Bring Night</td><td class="column-3">Sia</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-58 even">
		<td class="column-1">57</td><td class="column-2">Kickstarts</td><td class="column-3">Example</td><td class="column-4">England</td>
	</tr>
	<tr class="row-59 odd">
		<td class="column-1">58</td><td class="column-2">The Suburbs</td><td class="column-3">Arcade Fire</td><td class="column-4">Canada</td>
	</tr>
	<tr class="row-60 even">
		<td class="column-1">59</td><td class="column-2">Rich Kids</td><td class="column-3">Washington</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-61 odd">
		<td class="column-1">60</td><td class="column-2">My Eagle</td><td class="column-3">Children Collide</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-62 even">
		<td class="column-1">61</td><td class="column-2">Jackson’s Last Stand</td><td class="column-3">Ou Est Le Swimming Pool</td><td class="column-4">England</td>
	</tr>
	<tr class="row-63 odd">
		<td class="column-1">62</td><td class="column-2">Hold On</td><td class="column-3">Angus and Julia Stone</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-64 even">
		<td class="column-1">63</td><td class="column-2">Ready To Start</td><td class="column-3">Arcade Fire</td><td class="column-4">Canada</td>
	</tr>
	<tr class="row-65 odd">
		<td class="column-1">64</td><td class="column-2">Jona Vark</td><td class="column-3">Gypsy &amp; The Cat</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-66 even">
		<td class="column-1">65</td><td class="column-2">One Step</td><td class="column-3">Dead Letter Circus</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-67 odd">
		<td class="column-1">66</td><td class="column-2">Audience =</td><td class="column-3">Cold War Kids</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-68 even">
		<td class="column-1">67</td><td class="column-2">Holiday</td><td class="column-3">Vampire Weekend</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-69 odd">
		<td class="column-1">68</td><td class="column-2">Dog {Ft. Lisa Mitchell}</td><td class="column-3">Andy Bull</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-70 even">
		<td class="column-1">69</td><td class="column-2">Watercolour</td><td class="column-3">Pendulum</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-71 odd">
		<td class="column-1">70</td><td class="column-2">Paper Romance</td><td class="column-3">Groove Armada</td><td class="column-4">England</td>
	</tr>
	<tr class="row-72 even">
		<td class="column-1">71</td><td class="column-2">Piper’s Song</td><td class="column-3">Gypsy &amp; The Cat</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-73 odd">
		<td class="column-1">72</td><td class="column-2">I Can Talk</td><td class="column-3">Two Door Cinema Club</td><td class="column-4">Northern Ireland</td>
	</tr>
	<tr class="row-74 even">
		<td class="column-1">73</td><td class="column-2">Time To Wander</td><td class="column-3">Gypsy &amp; The Cat</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-75 odd">
		<td class="column-1">74</td><td class="column-2">Lucidity</td><td class="column-3">Tame Impala</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-76 even">
		<td class="column-1">75</td><td class="column-2">Coming Around</td><td class="column-3"> Hungry Kids Of Hungary</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-77 odd">
		<td class="column-1">76</td><td class="column-2">Radioactived</td><td class="column-3">Kings Of Leon</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-78 even">
		<td class="column-1">77</td><td class="column-2">Shutterbugg {Ft. Cutty}</td><td class="column-3">Big Boi</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-79 odd">
		<td class="column-1">78</td><td class="column-2">Stylo {Ft. Bobby Womack and Mos Def}</td><td class="column-3">Gorillaz</td><td class="column-4">England</td>
	</tr>
	<tr class="row-80 even">
		<td class="column-1">79</td><td class="column-2">Slow Motion Slow Motion</td><td class="column-3">Little Red</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-81 odd">
		<td class="column-1">80</td><td class="column-2">Howlin’ For You Howlin’ For You</td><td class="column-3">The Black Keys</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-82 even">
		<td class="column-1">81</td><td class="column-2">Echoes Echoes</td><td class="column-3">Klaxons</td><td class="column-4">England</td>
	</tr>
	<tr class="row-83 odd">
		<td class="column-1">82</td><td class="column-2">Tighten Up Tighten Up</td><td class="column-3">The Black Keys</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-84 even">
		<td class="column-1">83</td><td class="column-2">Modern Man Modern Man</td><td class="column-3">Arcade Fire</td><td class="column-4">Canada</td>
	</tr>
	<tr class="row-85 odd">
		<td class="column-1">84</td><td class="column-2">The Hardest Part The Hardest Part</td><td class="column-3">Washington</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-86 even">
		<td class="column-1">85</td><td class="column-2">I Feel Better I Feel Better</td><td class="column-3">Hot Chip</td><td class="column-4">England</td>
	</tr>
	<tr class="row-87 odd">
		<td class="column-1">86</td><td class="column-2">Queensland Queensland</td><td class="column-3">Evil Eddie</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-88 even">
		<td class="column-1">87</td><td class="column-2">The Saddest Thing I Know The Saddest Thing I Know</td><td class="column-3">Birds Of Tokyo</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-89 odd">
		<td class="column-1">88</td><td class="column-2">Monster {Ft. JAY-Z, Rick Ross, Nicki Minaj &amp; Bon Iver}</td><td class="column-3">Kanye West</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-90 even">
		<td class="column-1">89</td><td class="column-2">Barricade Barricade</td><td class="column-3">Interpol</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-91 odd">
		<td class="column-1">90</td><td class="column-2">Finally See Our Way Finally See Our Way</td><td class="column-3">Art Vs. Science</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-92 even">
		<td class="column-1">91</td><td class="column-2">Northcote (So Hungover)</td><td class="column-3">The Bedroom Philosopher</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-93 odd">
		<td class="column-1">92</td><td class="column-2">I Can ChangeI Can Change</td><td class="column-3">LCD Soundsystem</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-94 even">
		<td class="column-1">93</td><td class="column-2">Anyone’s Ghost Anyone’s Ghost</td><td class="column-3">The National</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-95 odd">
		<td class="column-1">94</td><td class="column-2">Time To Smile Time To Smile</td><td class="column-3">Xavier Rudd</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-96 even">
		<td class="column-1">95</td><td class="column-2">The High Road The High Road</td><td class="column-3">Broken Bells</td><td class="column-4">United States</td>
	</tr>
	<tr class="row-97 odd">
		<td class="column-1">96</td><td class="column-2">Go Do Go Do</td><td class="column-3">Jonsi</td><td class="column-4">Iceland</td>
	</tr>
	<tr class="row-98 even">
		<td class="column-1">97</td><td class="column-2">Sleepwalker</td><td class="column-3">Parkway Drive</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-99 odd">
		<td class="column-1">98</td><td class="column-2">Spanish Sahara</td><td class="column-3">Foals</td><td class="column-4">England</td>
	</tr>
	<tr class="row-100 even">
		<td class="column-1">99</td><td class="column-2">BigBig</td><td class="column-3">Dead Letter Circus</td><td class="column-4">Australia</td>
	</tr>
	<tr class="row-101 odd">
		<td class="column-1">100</td><td class="column-2">Neutron Star Collision (Love Is Forever)</td><td class="column-3">Muse</td><td class="column-4">England</td>
	</tr>
</tbody>
</table>

<img src="http://feeds.feedburner.com/~r/StubbornMule/~4/C1C5vfuR-w0" height="1" width="1"/>]]></content:encoded>
			<wfw:commentRss>http://www.stubbornmule.net/2012/01/more-on-the-hottest-100/feed/</wfw:commentRss>
		<slash:comments>1</slash:comments>
		<feedburner:origLink>http://www.stubbornmule.net/2012/01/more-on-the-hottest-100/</feedburner:origLink></item>
		<item>
		<title>Hottest 100 for 2011</title>
		<link>http://feedproxy.google.com/~r/StubbornMule/~3/kgzV3ZfTa9A/</link>
		<comments>http://www.stubbornmule.net/2012/01/hottest-100-for-2011/#comments</comments>
		<pubDate>Thu, 26 Jan 2012 11:49:24 +0000</pubDate>
		<dc:creator>Stubborn Mule</dc:creator>
				<category><![CDATA[australia]]></category>
		<category><![CDATA[music]]></category>
		<category><![CDATA[hottest100]]></category>
		<category><![CDATA[R]]></category>

		<guid isPermaLink="false">http://www.stubbornmule.net/?p=4772</guid>
		<description><![CDATA[Another year, another Australia Day. Another Australia Day, another Triple J Hottest 100. And that, of course, means an excellent excuse to  set R to work on the chart data. For those outside Australia, the Hottest 100 is a chart of the most popular songs of the previous year, as voted by the listeners of [...]]]></description>
			<content:encoded><![CDATA[<p></p><p>Another year, another Australia Day. Another Australia Day, another <a href="http://en.wikipedia.org/wiki/Triple_J_Hottest_100">Triple J Hottest 100</a>. And that, of course, means an excellent excuse to  set R to work on the chart data.</p>
<p>For those outside Australia, the Hottest 100 is a chart of the most popular songs of the previous year, as voted by the listeners of the radio station Triple J. The tradition began in 1991, but initially people voted for their favourite song of all time. From 1993 onwards, the poll took its current form* and was restricted to tracks released in the year in question.</p>
<p>Since the Hottest 100 Wikipedia pages include country of origin**, I thought I would see whether there is any pattern in whose music Australians like best. Since it is Australia Day, it is only appropriate that we are partial to Australian artists and they typically make up close to half of the 100 entries. Interestingly, in the early 90s, Australian artists did not do so well. The United Kingdom has put in a good showing over the last two years, pulling ahead of the United States. Beyond the big three, Australia, UK and US, the pickings get slim very quickly, so I have only included Canada and New Zealand in the chart below.</p>
<p><a href="http://www.stubbornmule.net/blog/wp-content/series.png"><img class="aligncenter size-full wp-image-4784" title="Hottest 100 by country" src="http://www.stubbornmule.net/blog/wp-content/series.png" alt="" width="530" height="850" /></a></p>
<p style="text-align: center;"><strong>Number of Hottest 100 tracks by Country</strong></p>
<p>If you have excellent eyesight, you may notice that 2010 is missing from the chart. For some reason, this is the only year which does not include the full chart listing on the Wikipedia page. There is a link to a list on the ABC website, but unfortunately it does not include the country of origin. Maybe a keen Wikipedian reading this post will help by updating the page.</p>
<p>I make no great claims for the sophistication or the insight of this analysis: it was really an excuse to learn about using the <a href="http://cran.r-project.org/web/packages/XML/index.html">XML package</a> for R to pull data from tables in web pages.</p>
<div style="overflow: auto;">
<div class="geshifilter">
<pre class="r geshifilter-R" style="font-family: monospace;"><a href="http://inside-r.org/r-doc/base/require"><span style="color: #003399; font-weight: bold;">require</span></a><span style="color: #009900;">(</span><a href="http://inside-r.org/packages/cran/XML">XML</a><span style="color: #009900;">)</span>
<a href="http://inside-r.org/r-doc/base/require"><span style="color: #003399; font-weight: bold;">require</span></a><span style="color: #009900;">(</span><a href="http://inside-r.org/packages/cran/ggplot2">ggplot2</a><span style="color: #009900;">)</span>
<a href="http://inside-r.org/r-doc/base/require"><span style="color: #003399; font-weight: bold;">require</span></a><span style="color: #009900;">(</span>reshape2<span style="color: #009900;">)</span>

results &lt;- <a href="http://inside-r.org/r-doc/base/data.frame"><span style="color: #003399; font-weight: bold;">data.frame</span></a><span style="color: #009900;">(</span><span style="color: #009900;">)</span>
col.names &lt;- <a href="http://inside-r.org/r-doc/base/c"><span style="color: #003399; font-weight: bold;">c</span></a><span style="color: #009900;">(</span><span style="color: #0000ff;">"year"</span><span style="color: #339933;">,</span> <span style="color: #0000ff;">"rank"</span><span style="color: #339933;">,</span> <span style="color: #0000ff;">"title"</span><span style="color: #339933;">,</span> <span style="color: #0000ff;">"artist"</span><span style="color: #339933;">,</span> <span style="color: #0000ff;">"country"</span><span style="color: #009900;">)</span>

<span style="color: #666666; font-style: italic;"># Skip 2010: full list is missing from Wikipedia page</span>
years &lt;- <a href="http://inside-r.org/r-doc/base/c"><span style="color: #003399; font-weight: bold;">c</span></a><span style="color: #009900;">(</span><span style="color: #cc66cc;">1993</span>:<span style="color: #cc66cc;">2009</span><span style="color: #339933;">,</span> <span style="color: #cc66cc;">2011</span><span style="color: #009900;">)</span>

<span style="color: #000000; font-weight: bold;">for</span> <span style="color: #009900;">(</span>year <span style="color: #000000; font-weight: bold;">in</span> years<span style="color: #009900;">)</span> <span style="color: #009900;">{</span>
    base.url &lt;- <span style="color: #0000ff;">"http://en.wikipedia.org/wiki/Triple_J_Hottest_100,"</span>
    year.url &lt;- <a href="http://inside-r.org/r-doc/base/paste"><span style="color: #003399; font-weight: bold;">paste</span></a><span style="color: #009900;">(</span>base.url<span style="color: #339933;">,</span> year<span style="color: #339933;">,</span> sep=<span style="color: #0000ff;">"_"</span><span style="color: #009900;">)</span>
    tables &lt;- readHTMLTable<span style="color: #009900;">(</span>year.url<span style="color: #339933;">,</span> stringsAsFactor=<span style="color: #000000; font-weight: bold;">FALSE</span><span style="color: #009900;">)</span>
    table.len &lt;- <a href="http://inside-r.org/r-doc/base/sapply"><span style="color: #003399; font-weight: bold;">sapply</span></a><span style="color: #009900;">(</span>tables<span style="color: #339933;">,</span> <a href="http://inside-r.org/r-doc/base/length"><span style="color: #003399; font-weight: bold;">length</span></a><span style="color: #009900;">)</span>
    <a href="http://inside-r.org/packages/cran/hot">hot</a> &lt;- <a href="http://inside-r.org/r-doc/base/cbind"><span style="color: #003399; font-weight: bold;">cbind</span></a><span style="color: #009900;">(</span>year=year<span style="color: #339933;">,</span> tables<span style="color: #009900;">[</span><span style="color: #009900;">[</span><a href="http://inside-r.org/r-doc/base/which"><span style="color: #003399; font-weight: bold;">which</span></a><span style="color: #009900;">(</span>table.len==<span style="color: #cc66cc;">4</span><span style="color: #009900;">)</span><span style="color: #009900;">]</span><span style="color: #009900;">]</span><span style="color: #009900;">)</span>
    <a href="http://inside-r.org/r-doc/base/names"><span style="color: #003399; font-weight: bold;">names</span></a><span style="color: #009900;">(</span><a href="http://inside-r.org/packages/cran/hot">hot</a><span style="color: #009900;">)</span> &lt;- col.names
    results &lt;- <a href="http://inside-r.org/r-doc/base/rbind"><span style="color: #003399; font-weight: bold;">rbind</span></a><span style="color: #009900;">(</span>results<span style="color: #339933;">,</span> <a href="http://inside-r.org/packages/cran/hot">hot</a><span style="color: #009900;">)</span>
<span style="color: #009900;">}</span>

<span style="color: #666666; font-style: italic;"># Remap a few countries</span>
results$country<span style="color: #009900;">[</span>results$country==<span style="color: #0000ff;">"Australia [1]"</span><span style="color: #009900;">]</span> &lt;- <span style="color: #0000ff;">"Australia"</span>
results$country<span style="color: #009900;">[</span>results$country==<span style="color: #0000ff;">"England"</span><span style="color: #009900;">]</span> &lt;- <span style="color: #0000ff;">"United Kingdom"</span>
results$country<span style="color: #009900;">[</span>results$country==<span style="color: #0000ff;">"Scotland"</span><span style="color: #009900;">]</span> &lt;- <span style="color: #0000ff;">"United Kingdom"</span>
results$country<span style="color: #009900;">[</span>results$country==<span style="color: #0000ff;">"Wales"</span><span style="color: #009900;">]</span> &lt;- <span style="color: #0000ff;">"United Kingdom"</span>
results$country<span style="color: #009900;">[</span>results$country==<span style="color: #0000ff;">"England, Wales"</span><span style="color: #009900;">]</span> &lt;-<span style="color: #0000ff;">"United Kingdom"</span>

<span style="color: #666666; font-style: italic;"># Countries to plot</span>
top5 &lt;- <a href="http://inside-r.org/r-doc/base/c"><span style="color: #003399; font-weight: bold;">c</span></a><span style="color: #009900;">(</span><span style="color: #0000ff;">"Australia"</span><span style="color: #339933;">,</span> <span style="color: #0000ff;">"United States"</span><span style="color: #339933;">,</span> <span style="color: #0000ff;">"United Kingdom"</span><span style="color: #339933;">,</span>
  <span style="color: #0000ff;">"Canada"</span><span style="color: #339933;">,</span> <span style="color: #0000ff;">"New Zealand"</span><span style="color: #009900;">)</span>

<span style="color: #666666; font-style: italic;"># Create a colourful ggplot chart</span>
plt &lt;- <a href="http://inside-r.org/packages/cran/ggplot">ggplot</a><span style="color: #009900;">(</span><a href="http://inside-r.org/r-doc/base/subset"><span style="color: #003399; font-weight: bold;">subset</span></a><span style="color: #009900;">(</span>results<span style="color: #339933;">,</span> country %in% top5<span style="color: #009900;">)</span><span style="color: #339933;">,</span>
    aes<span style="color: #009900;">(</span><a href="http://inside-r.org/r-doc/base/factor"><span style="color: #003399; font-weight: bold;">factor</span></a><span style="color: #009900;">(</span>year<span style="color: #009900;">)</span><span style="color: #339933;">,</span> fill=<a href="http://inside-r.org/r-doc/base/factor"><span style="color: #003399; font-weight: bold;">factor</span></a><span style="color: #009900;">(</span>country<span style="color: #009900;">)</span><span style="color: #009900;">)</span><span style="color: #009900;">)</span>
plt &lt;- plt + geom_bar<span style="color: #009900;">(</span><span style="color: #009900;">)</span> + facet_grid<span style="color: #009900;">(</span>country ~ .<span style="color: #009900;">)</span>
plt &lt;- plt + labs<span style="color: #009900;">(</span>x=<span style="color: #0000ff;">""</span><span style="color: #339933;">,</span> y=<span style="color: #0000ff;">""</span><span style="color: #009900;">)</span> + opts<span style="color: #009900;">(</span>legend.position = <span style="color: #0000ff;">"none"</span><span style="color: #009900;">)</span></pre>
</div>
</div>
<p><a title="Created by Pretty R at inside-R.org" href="http://www.inside-r.org/pretty-r">Created by Pretty R at inside-R.org</a></p>
<p>UPDATE: there is a little bit more analysis in this <a href="http://www.stubbornmule.net/2012/01/more-on-the-hottest-100/">follow-up post</a>.</p>
<p>* Since the shift to single year charts, there have been two all-time Hottest 100s: 1998 and 2009.</p>
<p>** There are some country combinations, such as &#8220;Australia/England&#8221;, but the numbers are so small I have simply excluded them from the analysis.</p>
<img src="http://feeds.feedburner.com/~r/StubbornMule/~4/kgzV3ZfTa9A" height="1" width="1"/>]]></content:encoded>
			<wfw:commentRss>http://www.stubbornmule.net/2012/01/hottest-100-for-2011/feed/</wfw:commentRss>
		<slash:comments>3</slash:comments>
		<feedburner:origLink>http://www.stubbornmule.net/2012/01/hottest-100-for-2011/</feedburner:origLink></item>
		<item>
		<title>Have wheelchair, will travel…probably</title>
		<link>http://feedproxy.google.com/~r/StubbornMule/~3/D-7wOq2Ra4w/</link>
		<comments>http://www.stubbornmule.net/2012/01/have-wheelchair/#comments</comments>
		<pubDate>Fri, 20 Jan 2012 11:29:49 +0000</pubDate>
		<dc:creator>zebra</dc:creator>
				<category><![CDATA[health]]></category>

		<guid isPermaLink="false">http://www.stubbornmule.net/?p=4724</guid>
		<description><![CDATA[Spending couple of weeks down the south coast of New South Wales, spotting dolphins and echidnas, has slowed down my blogging. Fortunately, regular contributor James Glover has once more come to the rescue with a guest post. This time his topic is wheelchairs and air-travel. Perhaps you&#8217;ve heard of a recent court case in which [...]]]></description>
			<content:encoded><![CDATA[<p></p><p><em>Spending couple of weeks down the south coast of New South Wales, spotting dolphins and echidnas, has slowed down my blogging. Fortunately, regular contributor James Glover has once more come to the rescue with a guest post. This time his topic is wheelchairs and air-travel.</em></p>
<p>Perhaps you&#8217;ve heard of a recent court case in which a wheelchair user, Sheila King, <a href="http://www.abc.net.au/rampup/articles/2012/01/15/3408459.htm">took Jetstar to court</a> (and lost) on the basis of the Disabilities Discrimination Act? If you are a wheelchair user and you book a flight on one of our airline carriers then a fairly obvious thing won&#8217;t happen. Unlike say a bus you won&#8217;t be able to board the aircraft in your chair and be strapped in for the journey. What actually happens is that when making the booking you tick a box (or tell the booker on the phone) that you are in a wheelchair. If there are seats available for wheelies when you get to the airport you will give up your chair and be made to use a specially designed &#8220;wheelchair&#8221; (its a chair, it has wheels) that is designed to be fit the narrow corridor of most planes which I am sure you are aware of &#8211; their narrowness, for you, only apparent when the person ahead of you is blocking the aisle loading 3 pieces of carry on luggage into the overhead lockers while chatting to their new friends in the seat they are meant to occupy. We all suffer this situation. These &#8220;wheelchairs&#8221; are not designed to be used without help, they are more like children&#8217;s toy carts and cannot be operated by the user as the wheels are very small and low down. For a wheelchair user to be taken out of their wheelchair in a public place can be quite discombobulating. Many wheelchair users develop a personal relationship with their chair &#8211; it is after all a place you spend many of your waking hours.</p>
<p>Digression. The very first time I was in a wheelchair outside the confines of a hospital ward (it was a hospital wheelchair but is the exact same model I now own, like I said it is personal) I was being pushed by none other than the proprietor of this very website! Without going into the details let&#8217;s just say it was a pretty dramatic event and we both learned a valuable lesson in wheelchair use and the wheelchair repair workshop at the hospital was kept busy. But I digress.</p>
<p>So here is the thing. According to <a href="http://www.newdisability.com/wheelchairstatistics.htm">Google</a> about 1% of the population uses wheelchairs. And a Jetstar plane has about 200 seats so they expect to get about 2 wheelchair users on average per flight. So what is the problem with only allowing this same number on each flight, as some airlines do? Well the problem is that statistically wheelchair users don&#8217;t travel in pairs and sometimes there will be less than 2 users and sometimes there will be more. Just as if you toss 10 coins sometimes there will be fewer than 5 heads (the average or expected number) and sometimes there will be more. Only on average will there be 5. In fact it is a simple problem to work out the probability of there being, say, <em>n</em> wheelchair users, given the average of 1% on a 200 seat plane. This is called the Binomial Distribution. If you have access to Excel then the function Binomdist(n,200,1%) will tell you this probability. Before I give you some numbers I admit that the overall population average may not be the same as the average flying on planes. It may be less than 1% due to wheelchair users being put off flying. But maybe on some routes it is higher: but I am guessing the annual &#8220;snowbird&#8221; migration of retired people from the northern United States to Florida at the start of Winter would track above the 1% rate.</p>
<p>So here are the Binomial probability figures.</p>
<div align="center">
<table class="Data3">
<thead>
<tr>
<th>Count</th>
<th>Probability</th>
</tr>
</thead>
<tbody>
<tr>
<td>0</td>
<td style="text-align: right;">13%</td>
</tr>
<tr>
<td>1</td>
<td style="text-align: right;">27%</td>
</tr>
<tr>
<td>2</td>
<td style="text-align: right;">27%</td>
</tr>
<tr>
<td>3</td>
<td style="text-align: right;">18%</td>
</tr>
<tr>
<td>4</td>
<td style="text-align: right;">9%</td>
</tr>
<tr>
<td>5</td>
<td style="text-align: right;">4%</td>
</tr>
<tr>
<td>6+</td>
<td style="text-align: right;">2%</td>
</tr>
</tbody>
</table>
<p style="padding-top: 18px;"><strong>Binomial Probabilities (N=200, p=1%)</strong></p>
</div>
<p>For example, assuming a 1% chance of any given passenger a 200 hundred seat plane being in a wheelchair, the probability that there will be exactly 4 wheelchair passengers wanting seats is 9%. To work out the probability of a passenger being denied a seat on their preferred flight, we will assume that we&#8217;re dealing with an airline where more than two wheelchair passenges book on a flight, then at least on passenger will have to change their travel plans. From the table above, the chance of the flight only having 0, 1 or 2 wheelchair passengers totals 68%, so there&#8217;s a 32% chance that there will be at least one wheelchair passenger who cannot fly. For any one wheelchair passenger, there is a (<em>n</em>-1)/(<em>n</em>+1<em>)</em> chance of being bumped if <em>n</em> other wheelchair passengers book on the flight. Weighting that by the probably that there are <em>n</em> passengers and adding it up for all <em>n</em>&gt;1 gives a probability of 27%. As a frequent flyer in a wheelchair, you can expect to miss out on a seat quite regularly! [Note: these calculations have been updated: the editor's "corrections" were undone. Ed.]</p>
<p>I am quite fortunate now that I no longer need to travel in my wheelchair. But as I still use a walking stick I wait for everyone else to get off the plane. You sit there, looking behind you to see if everyone else has left. But there are always these strange people who seem to sit there at the back of the plane and wait for 10 minutes or more, after everyone has disembarked, before even moving. You wonder why the airline staff don&#8217;t just hurry them off? I assume they aren&#8217;t disabled because they are sitting at the back of the plane. If airlines really had a problem with the extra time that getting wheelies off the plane then they could make this up by just moving these people along.</p>
<p>When I first read about this case my initial response was that being disabled and traveling is a bit of challenge anyway and you just get on with it. But the more I thought about it I wondered if the airlines just took it for granted that wheelchair users would change their plans to fit in with the rules. I am glad Sheila King took the issue up!</p>
<img src="http://feeds.feedburner.com/~r/StubbornMule/~4/D-7wOq2Ra4w" height="1" width="1"/>]]></content:encoded>
			<wfw:commentRss>http://www.stubbornmule.net/2012/01/have-wheelchair/feed/</wfw:commentRss>
		<slash:comments>18</slash:comments>
		<feedburner:origLink>http://www.stubbornmule.net/2012/01/have-wheelchair/</feedburner:origLink></item>
	</channel>
</rss>

