Archive for January, 2012

Animierte Infografiken zur Schuldenkrise

Tuesday, January 17th, 2012
YouTube Preview Image YouTube Preview Image YouTube Preview Image YouTube Preview Image

Graphics – Before and After

Monday, January 16th, 2012

Here just two examples of graphs which were supposed to go into a report (left) and which got a little bit of a face lifting (right)… (data visualization)

SVG and Environmental Statistics

Monday, January 16th, 2012

I’ve build a neat SVG application. It uses data (via a direct database connection) from the UNEP Environmental Data Explorer (ex-GEO Data Portal). Lots of possibilities to play around with the data, for each variable some 40.000 data points.

HTML/CSS: Nice Boxes Around Your Elements

Thursday, January 12th, 2012

Nice examples for boxes around HTML elements here.

Excel: How to “Unpivot” a Table

Thursday, January 12th, 2012

How to convert this:

to this:

Great VisualBasic script for Excel which does exactly that:

Option Explicit
Sub MoveData()
Dim LC As Long, LRO As Long, NR As Long, HowMany As Long, a As Long, b As Long
Dim c As Range, rng As Range
Application.ScreenUpdating = False
LRO = Sheets("Output").Cells(Rows.Count, 1).End(xlUp).Row
If LRO > 1 Then Sheets("Output").Range("A2:E" & LRO).ClearContents
NR = 2
With Sheets("Input")
LC = .Cells(1, Columns.Count).End(xlToLeft).Column
For Each c In .Range("A2", .Range("A" & Rows.Count).End(xlUp))
Set rng = .Range(.Cells(c.Row, 3), .Cells(c.Row, LC))
HowMany = Application.WorksheetFunction.CountIf(rng, ">-10000")
If HowMany > 0 Then
.Range("A" & c.Row & ":C" & c.Row).Copy Sheets("Output").Range("A" & NR & ":A" & NR + HowMany - 1)
b = NR
For a = 4 To LC Step 1
If .Cells(c.Row, a).Value > -10000 Then
Sheets("Output").Range("D" & b) = .Cells(1, a)
Sheets("Output").Range("E" & b) = .Cells(c.Row, a)
b = b + 1
End If
Next a
NR = NR + HowMany
End If
Next c
End With
Application.ScreenUpdating = True
End Sub


The Story of Stuff

Thursday, January 5th, 2012

YouTube Preview Image

YouTube Preview Image

PopTech 2008: Saul Griffith on Energy Use

Tuesday, January 3rd, 2012