flightpathr

commit 8701e9de5c04e12a27721a0b2751bed7c80940f0
parent 9ef3188cb55cc466cab2f5f296705bd9eabaa9e8
Author: eamoncaddigan <eamon.caddigan@gmail.com>
Date:   Tue, 11 Oct 2016 09:50:24 -0400

Fixed as.data.frame.flighttrajectory

Diffstat:
M
R/createTrajectory.R
 | 
3
++-

1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/R/createTrajectory.R b/R/createTrajectory.R
@@ -93,5 +93,6 @@ is.flighttrajectory <- function(x) inherits(x, "flighttrajectory")
 #' @method as.data.frame flighttrajectory
 #' @export
 as.data.frame.flighttrajectory <- function(x) {
-  return(as.data.frame(as.list(x)))
+  class(x) <- NULL
+  return(as.data.frame(x))
 }