Checked content

File:US Seasonal Unemployment.svg


English: Chart of the seasonal US unemployment rate from the BLS statistics, showing mean, 95% interval and outliers. Puerto Rico has been removed from the data set. Source:
Date 12 December 2010
Source Own work
Author Autopilot


u <- read.table("", header=T, fill=T)
# Convert the months into fractional years
u$time <- u$year + (as.numeric(u$period) - 1) / 12
# Get just the measurement values (those that end in "03")
m <- u[grep("03$", u$series_id),]
# And ignore the ones that are in Puerto-rico, state code 43
m <- subset(m, series_id != "LASST43000003")
# make the year a factor
m$year <- as.factor(m$year)
# Aggregate all samples into a single year average
# leaving per-state data intact
v <- aggregate(m, list(year=m$year, series_id=m$series_id), mean)
# Aggregate all samples into a per-month average
m2 <- aggregate(m, list(year=m$year, period=m$period), mean, na.rm=T)
m2 <- m2[order(m2$time),]
#m2 <- aggregate(m, list(year=m$year), mean, na.rm=T)
# And generate the box plot for every state
        value ~ year,
        data = v,
        ylim = c(0,16),
        main = "US Seasonally Adjusted Unemployment",
        ylab = "Unemployment rate",
        xlab = "Year",
# Add the moving average line
        value ~ time,
        data = m2,
        col = "red",
        type = "l",
        ylim = c(0,16),
        xlim = c(1976,2011),
        main = "",
        xlab = "",
        ylab = "",
        axes = F
dev.copy(svg, "US Seasonal Unemployment.svg", width=8, height=6)


I, the copyright holder of this work, hereby publish it under the following licenses:
w:en:Creative Commons
attribution share alike
This file is licensed under the Creative Commons Attribution-Share Alike 3.0 Unported license.
You are free:
  • to share – to copy, distribute and transmit the work
  • to remix – to adapt the work
Under the following conditions:
  • attribution – You must attribute the work in the manner specified by the author or licensor (but not in any way that suggests that they endorse you or your use of the work).
  • share alike – If you alter, transform, or build upon this work, you may distribute the resulting work only under the same or similar license to this one.

GNU head Permission is granted to copy, distribute and/or modify this document under the terms of the GNU Free Documentation License, Version 1.2 or any later version published by the Free Software Foundation; with no Invariant Sections, no Front-Cover Texts, and no Back-Cover Texts. A copy of the license is included in the section entitled GNU Free Documentation License.

You may select the license of your choice.
The following pages on Schools Wikipedia link to this image (list may be incomplete):


A background to Schools Wikipedia

Wikipedia for Schools is one of SOS Children's many educational projects. SOS Children's Villages is there for the children in our care until they are ready for independence. Why not try to find out more about sponsoring a child?