Archive for July, 2010

CO2 Emitted by Selected Vehicles

Thursday, July 29th, 2010

rotated

This chart tells a story, doesn’t it?

The approximate value for Lear Jet CO2 emissions is thanks to a calculation on http://benzzo.co.tv/learjet-fuel-consumption and is based on values from the DOE site http://www.eia.doe.gov/ Here is the Entrance script for producing the chart:


    plot rotatedbarchart
      skyblue bar,
      all axislabels,
      datalabels right
    with
      no collar
      no outlines
      baroverlap 0
      barwidth .85
      barseparation 5
      no sides
      no xaxis
      no labels x
      no ticks x
      scale x 0 1800 600
      frame insets 175 40 85 0
    select
      `grams_per_km`,name, concat(grams_per_km, ' g/km')
      from co2_emissions
    union
    select
      1766, 'Lear Jet', concat(1766, ' g/km')
      order by grams_per_km
;

Finally, here’s sample data for the various cars:
“grams_per_km”,”name”
“383″,”Escalade”
“346″,”Hummer”
“324″,”Corvette”
“268″,”Escalade Hybrid”
“198″,”Mercedes Benz clc class”
“140″,”BMW Series 1″
“167″,”Subaru Forester”
“148″,”Accord”
“119″,”Volvo v70″
“119″,”Ford Fusion”
“116″,”Ford Fiesta”
“104″,”Toyota Prius”
“101″,”Honda Insight”

Counting Cases of H1N1

Friday, July 16th, 2010

flu

The CDC site, http://www.cdc.gov/flu/weekly/, has a chart I thought could use a make-over, and this is the result. The Entrance version is easier to read, and titles on the two vertical axes don’t collide with the axis labels.

Reducing chart clutter makes the shape of the H1N1 counts clearer:

better

The script for the top chart is here and the script for the bottom one is here

I started the scripts with Charts | Make a stacked bar chart… and then tuned up a few things. As you can see, the Tango Desktop colors LIGHT SKYBLUE and LIGHT TANGOORANGE work well together.

Finally, here is the CSV data (which can be imported using Entrance Tools | Import file or URL..)