Merge pull request #95 from lawinslow/master

Fixing wtr.heatmap.layers x-axis location issue

Author: lawinslow

DESCRIPTION

@@ -1,7 +1,7 @@
 Package: rLakeAnalyzer
 Title: Lake Physics Tools
 Maintainer: Luke Winslow <lawinslow@gmail.com>
-Version: 1.11.3
+Version: 1.11.4
 Author: Luke Winslow, Jordan Read, Richard Woolway, Jennifer Brentrup, Taylor
     Leach, Jake Zwart, Sam Albers, Doug Collinge
 Description: Standardized methods for calculating common important derived

R/wtr.heatmap.layers.R

@@ -107,7 +107,8 @@ wtr.heatmap.layers <- function(wtr, ...){
                                graphics::lines(x=wtr.dates,y=wtr.all$top, col="gray50", lwd = 2)
                                graphics::lines(x=wtr.dates,y=wtr.all$bottom,col="gray80", lwd = 2)
                                graphics::axis(side = 2)
-                               graphics::axis(side = 3, labels=format(datestoshow, ttformat), at = datestoshow, pos = c(min(depths)), tck = -0.03)})
+                               #axis.Date(side=1, x=wtr.dates, at=datestoshow, format=ttformat)
+                               graphics::axis(side = 1, labels=format(datestoshow, ttformat), at = datestoshow, pos = c(max(depths)), tck = -0.03)})