Strategic Thinking - Automated In R: December 2012