(13) Animating time-series (seismograms)ΒΆ
Here we demonstrate how one can animate a time-series so that the line grows in length and the pen thickness and color/intensity changes as it is being written. The trick we use is to convert the line into a series of densely-spaced points, using the dpi of the desired movie to determine the point resolution. These points are then animated like other points. We use events to preprocess the three components of a seismogram from a 2020 earthquake in the Aleutians and then animate it using real time. The three components evolve over time in each subplot panel while the rest of the presentation includes a source map and some metadata, plus a timer and progress indicator.
#!/usr/bin/env bash
#
# Movie of seismic waveforms from 2020-10-06 Alaska earthquake
# Epicenter 54.851N 159.851W
# Depth 31.0 km
# UTC time 2020-10-06 05:54:50
# Recorded at station Dolgoi Island, Mount Dutton, Alaska
#
# USGS event page: https://earthquake.usgs.gov/earthquakes/eventpage/us6000c5zm/executive
#
# DEM: @earth_relief_06m
# Data: @waveform_AV.DOL.txt
#
# The data file @waveform_AV.DOL.txt contains 4 columns:
# UTC times, and three-component movement in east-west, north-south and up-down directions
#
# The finished movie is available in our YouTube channel as well:
# https://youtu.be/eq_-2nYYf-s
# The 66-sec, 1561 frame movie took ~15 minutes to render on a 24-core MacPro 2013.
# 0. Create an include file with key parameters
cat << EOF > inc.sh
TIME_RANGE=2020-10-06T05:55:10/2020-10-06T05:56:15
PLOT_DOMAIN=2020-10-06T05:55:10/2020-10-06T05:56:15/-2.6/2.8
DPI=200i
SPLINE=linear
EOF
# 1. Create a dense point-file from the waveform data
cat << EOF > pre.sh
gmt begin
# 1a. Create dense point-files from the waveform data components so we can animate the lines
gmt events @waveform_AV.DOL.txt -R\${PLOT_DOMAIN} -JX20cT/3.5c -Ar\${DPI} -i0,1+s1e-6,0 -f2T --GMT_INTERPOLANT=\${SPLINE} > E.txt
gmt events @waveform_AV.DOL.txt -R\${PLOT_DOMAIN} -JX20cT/3.5c -Ar\${DPI} -i0,2+s1e-6,0 -f2T --GMT_INTERPOLANT=\${SPLINE} > N.txt
gmt events @waveform_AV.DOL.txt -R\${PLOT_DOMAIN} -JX20cT/3.5c -Ar\${DPI} -i0,3+s1e-6,0 -f2T --GMT_INTERPOLANT=\${SPLINE} > Z.txt
# 1b. Setup the desired output times (24 frames per second)
gmt math -T\${TIME_RANGE}/24+i -o0 T --TIME_UNIT=s --FORMAT_CLOCK_OUT=hh:mm:ss.xxxxx = times.txt
# 1c. Lay down the static part of the subplot
gmt subplot begin 3x1 -Fs18.25c/3.5c -A -M0 -R\${PLOT_DOMAIN} -X5.5c -Y0.75c
gmt subplot set 0 -A"Z"
gmt plot @waveform_AV.DOL.txt -Bpxafg -Bsxa1D -Bpyaf -BWsrt -W0.5p,darkgray -i0,3+s1e-6
gmt subplot set 1 -A"N"
gmt plot @waveform_AV.DOL.txt -Bpxafg -Bsxa1D -Bpyaf -BWsrt -W0.5p,darkgray -i0,2+s1e-6
gmt subplot set 2 -A"E"
gmt plot @waveform_AV.DOL.txt -Bpxafg -Bsxa1D -Bpyaf -BWSrt -W0.5p,darkgray -i0,1+s1e-6
gmt subplot end
# 1d. Create location map and metadata
gmt text -R0/4.5/0/13 -Jx1c -F+j+f -B0 -X-5.25c -Y-0.5c <<- EOF
2.25 12.5 CM 18p 2020-10-06
2.25 11.7 CM 9p SE of Sand Point, Alaska
2.25 11 CM 10p 54.851@.N, 159.851@.W
2.25 10.5 CM 10p 31.0 km, Mw 5.9
2.25 10.0 CM 10p 2020-10-06 05:54:50 UTC
EOF
gmt grdimage -R190W/130W/30/75 @earth_relief_06m -Ba30+f -JM3.5c -I+d -Cterra --MAP_FRAME_TYPE=plain -X0.75c -Y0.5c -BWNbr --MAP_ANNOT_OBLIQUE=lat_parallel --FONT_ANNOT_PRIMARY=9p
echo 161.86W 55.15N | gmt plot -St0.2c -GBlack
echo 159.851W 54.851N | gmt plot -Sa0.25c -Gred -Wfaint
gmt meca -Sc2.5c -M -G110/168/255 -W0.5p -Yh+0.5c <<- EOF
-159.851 54.851 40.5 245 29 93 61 61 88 1.048 18
EOF
gmt end
EOF
# 2. Set up main movie script
cat << EOF > main.sh
gmt begin
gmt set FORMAT_DATE_MAP "o dd yyyy" FORMAT_CLOCK_MAP hh:mm FONT_ANNOT_PRIMARY +9p TIME_INTERVAL_FRACTION 0.01 FORMAT_CLOCK_MAP hh:mm:ss
gmt subplot begin 3x1 -Fs18.25c/3.5c -D -M0 -R\${PLOT_DOMAIN} -X5.5c -Y0.75c
gmt events Z.txt -Sc0.5p -Gred -Es+d0.5+r0.5 -Ms4+c1 -Mi0.5 -Mt+c0 -T\${MOVIE_COL0} -c
printf "%s -2.6\n%s 2.8\n" \${MOVIE_COL0} \${MOVIE_COL0} | gmt plot -W0.5p
gmt events N.txt -Sc0.5p -Ggreen -Es+d0.5+r0.5 -Ms4+c1 -Mi0.5 -Mt+c0 -T\${MOVIE_COL0} -c
printf "%s -2.6\n%s 2.8\n" \${MOVIE_COL0} \${MOVIE_COL0} | gmt plot -W0.5p
gmt events E.txt -Sc0.5p -Gblue -Es+d0.5+r0.5 -Ms4+c1 -Mi0.5 -Mt+c0 -T\${MOVIE_COL0} -c
printf "%s -2.6\n%s 2.8\n" \${MOVIE_COL0} \${MOVIE_COL0} | gmt plot -W0.5p
gmt subplot end
gmt end
EOF
# 3. Run the movie
gmt movie main.sh -Iinc.sh -Sbpre.sh -CHD -Ttimes.txt -Nanim13 -Lc0+jTR+o0.25/0.25c -Ls"Station: Dolgoi Island, Mount Dutton, Alaska"+jTL+o5.5c/0.25c -H8 -Pb+w0.4c+jBR -Fmp4 -V -W -Zs -M500,png --FORMAT_DATE_MAP=-