diff --git a/R/utils.RunModel.R b/R/utils.RunModel.R index 56cc789eff045cc3bc0d2f76dff4c944ba8db42d..9f5bb678da6ecfcbdca1107a461ad83338d6e7a2 100644 --- a/R/utils.RunModel.R +++ b/R/utils.RunModel.R @@ -49,6 +49,7 @@ OutputsModelQsim <- function(InputsModel, OutputsModel, IndPeriod_Run) { dfQsim <- cbind(data.frame(DatesR = InputsModel[[1]]$DatesR[IndPeriod_Run]), do.call(cbind,lQsim) / attr(InputsModel, "TimeStep")) dfQsim <- as.Qm3s(dfQsim) + rownames(dfQsim) <- NULL return(dfQsim) } @@ -159,6 +160,7 @@ merge.GRiwrmOutputsModel <- function(x, y, ...) { }) attributes(y) <- y_attributes attr(y, "Qm3s") <- rbind(attr(x, "Qm3s"), attr(y, "Qm3s")) + rownames(attr(y, "Qm3s")) <- NULL return(y) }