for c in ( AvgLandTemp ) return encode( condense + over $t ansi(imageCrsDomain(c[ansi("2001-01":"2001-12")], ansi)) using c[ansi($t)], "png")