Jump to content

File:2010 canterbury aftershocks by depth.svg

Page contents not supported in other languages.
This is a file from the Wikimedia Commons
From Wikipedia, the free encyclopedia

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

Summary

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

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

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

Captions

Add a one-line explanation of what this file represents

Items portrayed in this file

depicts

8 September 2010

image/svg+xml

3258ae429e9589255274775812053b51913380e7

46,616 byte

434 pixel

578 pixel

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) {{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

The following page uses this file:

Metadata