kwb-r / kwb.abimo Goto Github PK

# Define some reference input file
input_file <- "~/qt-projects/abimo/data/abimo_2019_mitstrassen.dbf"

# Define some reference config file
config_file <- "~/qt-projects/abimo/data/config.xml"

# Read input data from reference file
input_data <- foreign::read.dbf(input_file)

# Read configuration file into list
config <- read_config(config_file)

# Modify the input data by modifying the data frame...
# Take care! Make sure that integer columns keep integer, therefore use "L" here!
input_data$REGENJA <- 600L

# Modify the configuration by modifying the list...
config$Infiltrationsfaktoren$Dachflaechen <- 0.2

# Either run Abimo by giving the paths to the files
result1 <- run_abimo(input_file = input_file, config_file = config_file)

# Or run Abimo by giving the R data structures
result2 <- run_abimo(input_data = input_data, config = config)

# In each case, the result is a data frame, containing the data from the dbf 
# file that was written by the Abimo executable

# Let Abimo.exe output results of the Bagrov calculation
bagrov_lines <- kwb.abimo::run_abimo_command_line("--write-bagrov-table")

# Convert the text lines to a data frame
bagrov <- read.table(text = bagrov_lines, header = TRUE, sep = ",")

# source: http://st-on-it.blogspot.com/2010/01/how-to-move-folders-between-git.html
# First of all you need to have a clean clone of the source repository so we didn't screw the things up.

git clone https://github.com/amatzi/abimo

cd abimo
# After that you need to do some preparations on the source repository, nuking all the entries except the folder you need to move. Use the following command

git filter-branch --subdirectory-filter data -- -- all

# This will nuke all the other entries and their history, creating a clean git repository that contains only data and history from the directory you need. If you need to move several folders, you have to collect them in a single directory using the git mv command.

# You also might need to move all your content into some directory so it didn't conflict with the new repository when you merge it. Use commands like that

mkdir -p inst/extdata
git mv * inst/extdata/

# Once you've done commit your changes, but don't push!

git commit -m "Collected the data I need to move"

# This is all about the source repository preparations.
# Now go to your destination repository
cd .. 

git clone https://github.com/kwb-r/kwb.abimo

cd kwb.abimo/

# And here is the trick. You need to connect your source repository as a remote using a local reference.

git remote add abimo ../abimo/

# After that simply fetch the remote source, create a branch and merge it with the destination repository in usual way

git fetch abimo
git branch abimo remotes/abimo/master

git merge abimo --allow-unrelated-histories

# This is pretty much it, all your code and history were moved from one repository to another. All you need is to clean up a bit and push the changes to the server

git remote rm abimo
git branch -d abimo

git push origin master

# That's all. After that you can nuke the temporary source repository.

 ```
    </section>
    <section name="PotentielleVerdunstung">

        <item bezirke="15,16,18,19,20"     etp="807.767283333333" etps="606.903833333333" />
        <item bezirke="8,9,10,12,21,22,23" etp="807.767283333333" etps="606.903833333333" />
        <item bezirke="13,14,17"           etp="807.767283333333" etps="606.903833333333" />
        <item bezirke="2,3,4"              etp="807.767283333333" etps="606.903833333333" />
        <item bezirke="1,5,6,7,11"         etp="774" etps="606" />

        <!-- das ist der default wert (Bezirk=0) -->
        <item etp="807.767283333333" etps="606.903833333333" />

    </section>

    </section>

Warning: Codoc mismatches from documentation object 'extdata_file':
extdata_file
  Code: function(..., must_exist = TRUE, dbg = FALSE)
  Docs: function(...)
  Argument names in code not in docs:
    must_exist dbg