Created
February 22, 2019 20:15
-
-
Save troyhill/7753317b0fa815d524aa3f5ff1d7d319 to your computer and use it in GitHub Desktop.
rainfall formula exploration
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
# script to explore the SFWMD's rainfall formula | |
a <- list.files("C:/RDATA/rainfall_formula/", pattern = "\\.txt$", full.names = TRUE) | |
rain <- read.delim(a[4], skip = 1) | |
head(rain) | |
pet <- read.delim(a[3], skip = 1) | |
head(pet) | |
outStage <- read.delim(a[1], skip = 4) | |
outStage_names <- read.delim(a[1], skip = 1) | |
names(outStage) <- names(outStage_names) | |
outFlow <- read.delim(a[2], skip = 6) | |
outFlow_names <- read.delim(a[2], skip = 1) | |
names(outFlow) <- names(outFlow_names) | |
head(outFlow) | |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment