View source: R/function_CompareFiles.R
CompareFiles | R Documentation |
Compare HYPE model files to identify any differences, typically used to check that no undesired changes were made when writing a new file.
CompareFiles(
x,
y,
type = c("AquiferData", "BasinOutput", "BranchData", "CropData", "DamData", "ForcKey",
"FloodData", "GeoClass", "GeoData", "Info", "LakeData", "MapOutput", "MgmtData",
"Optpar", "Par", "PointSourceData", "Obs", "Simass", "Subass", "TimeOutput", "Xobs"),
by = NULL,
compare.order = TRUE,
threshold = 1e-10,
...
)
x |
Path to a HYPE model file to read, or an existing list/data frame object for a HYPE model file.
File contents are compared to those of |
y |
Path to a HYPE model file to read, or an existing list/data frame object for a HYPE model file.
File contents are compared to those of |
type |
Character string identifying the type of HYPE model file. Used to determine appropriate read function. One of
|
by |
Character vector, names of columns in |
compare.order |
Logical, whether or not the order of the rows should be compared. If |
threshold |
Numeric, threshold difference for comparison of numeric values. Set to 0 to only accept identical values. |
... |
Other arguments passed on to functions to read the files to compare (e.g. |
CompareFiles
compares two HYPE model files and identifies any differences in values. The function reads two model files, compares
the values in columns with corresponding names, and returns a data frame consisting of rows/columns with any differences. Values that are
the same in both files are set to NA
. If numeric values in two columns aren't exactly the same, then the difference between the values will be taken
and compare to theshold
. If the difference is <= theshold
, then the values will be considered the equal and set to NA
.
The function is primarily intended as a check to ensure that no unintended changes were made when writing
model files using the various HYPEtools write functions. However, it can also be used to e.g. compare files between different model versions.
Returns invisibly a data frame containing rows and columns in which differences exist between x
and y
. Values that are the same in both
files are set to NA
. If the returned data frame has 0 row, then there were no differences between the files.
# Import demo model GeoData file, edit a SUBID
te1 <- ReadGeoData(filename = system.file("demo_model", "GeoData.txt", package = "HYPEtools"))
te1$SUBID[1] <- 1
# Compare with original file
te2 <- CompareFiles(system.file("demo_model", "GeoData.txt", package = "HYPEtools"), te1,
type = "GeoData")
te2
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.