Update op_parser.R

JGCRI · Aug 24, 2015 · 702d9b3 · 702d9b3
1 parent ab77d2a
commit 702d9b3
Showing 1 changed file with 1 addition and 6 deletions.
diff --git a/R/outputplotter/op_parser.R b/R/outputplotter/op_parser.R
@@ -299,13 +299,8 @@ matchdata <- function( d_sim, d_obs ) {
   if( CTAG_FIELD %in% names( d_sim ) ) {
     d_sim[ CTAG_FIELD ] <- NULL
   }
-  #  print(system.time({
-  #    d_sim <- merge( d_sim, cmap, by=COMPONENT_FIELD, all = TRUE )
-  #  }))
-  #  print(system.time({
   d_sim <- dplyr::left_join( d_sim, cmap, by=COMPONENT_FIELD )
-  #  }))
-
+
   warn_unmatched( d_sim, CTAG_FIELD, COMPONENT_FIELD )
 
   # Comparison data is basically the same, except that we have to match the data's