File:2010 canterbury aftershocks by depth.svg

Original file(SVG file, nominally 578 × 434 pixels, file size: 46 KB)

Captions

Captions

Add a one-line explanation of what this file represents

Summary

edit
Description
English: Plot of 2010 Canterbury earthquake aftershocks by depth and time.

Author: Tayste Data source: GeoNet (NZ) License: GNU public domain, free content Software: R

Source code

# Plot of 2010 Canterbury earthquake aftershocks by depth and time.
# Author: Tayste
# License: GNU public domain, free content
# Software: R
#
# Data from GeoNet (New Zealand)
#   earthquakes.csv is the file returned by a query to:
#   http://magma.geonet.org.nz/resources/quakesearch/
#   Choose output format: CSV (Time, location, z, mag)

library(RSvgDevice)

quakes = read.csv('earthquakes.csv',row.names=NULL) # R gets confused by extra empty column (?)
names(quakes) = c(names(quakes)[-1],"QuakeTime") # Try to adjust for that.
stopifnot(all(quakes$ORI_YEAR == 2010)) # Check column names aligned with data
quakes$QuakeTime = with(quakes, ISOdatetime(ORI_YEAR, ORI_MONTH, ORI_DAY, ORI_HOUR, ORI_MINUTE, ORI_SECOND, tz="UTC"))
attr(quakes$QuakeTime,"tzone") = "NZ"

`%inrange%` <- function (x, limits) x >= limits[1] & x <= limits[2]
chch = subset(quakes, QuakeTime >= as.POSIXct("2010-09-04") & LONG %inrange% c(172,174) & LAT %inrange% c(-45,-42))

devSVG('2010_canterbury_aftershocks_by_depth.svg', width=8, height=6)  # inches
par(mar=c(6,6,3.1,0.2),cex=1)
with(chch, plot(QuakeTime, DEPTH, ylim=rev(range(DEPTH)), pch=16,cex=MAG^2/6, col=rgb(0.1,0.1,0.1,0.2),
  main="Canterbury aftershocks by Depth and Time",ylab="Depth (km)"))
title(sub="Data source: GeoNet")
dev.off()
Date 8 September 2010 (original upload date)
Source Transferred from en.wikipedia to Commons by Logan using CommonsHelper.
Author Tayste at English Wikipedia

Licensing

edit
Public domain This work has been released into the public domain by its author, Tayste at English Wikipedia. This applies worldwide.
In some countries this may not be legally possible; if so:
Tayste grants anyone the right to use this work for any purpose, without any conditions, unless such conditions are required by law.

Original upload log

edit
The original description page was here. All following user names refer to en.wikipedia.
  • 2010-09-08 03:41 Tayste 578×434× (46616 bytes) Plot of 2010 Canterbury earthquake aftershocks by depth and time. Author: Tayste Data source: GeoNet (NZ) License: GNU public domain, free content Software: R

File history

Click on a date/time to view the file as it appeared at that time.

Date/TimeThumbnailDimensionsUserComment
current03:18, 6 February 2011Thumbnail for version as of 03:18, 6 February 2011578 × 434 (46 KB)File Upload Bot (Magnus Manske) (talk | contribs) {{BotMoveToCommons|en.wikipedia|year={{subst:CURRENTYEAR}}|month={{subst:CURRENTMONTHNAME}}|day={{subst:CURRENTDAY}}}} {{Information |Description={{en|Plot of 2010 Canterbury earthquake aftershocks by depth and time. Author: Tayste Data source: GeoNet (N

There are no pages that use this file.

File usage on other wikis

The following other wikis use this file:

Metadata