Skip to content

Commit

Permalink
commit
Browse files Browse the repository at this point in the history
  • Loading branch information
marinakiweler committed Feb 6, 2019
1 parent 345ce68 commit 75eaba1
Show file tree
Hide file tree
Showing 4 changed files with 8 additions and 8 deletions.
1 change: 1 addition & 0 deletions .gitignore
Original file line number Diff line number Diff line change
@@ -1,3 +1,4 @@
inst/doc
.Rproj.user
.Rhistory
.RData
Expand Down
1 change: 0 additions & 1 deletion MARMoSET.Rproj
Original file line number Diff line number Diff line change
Expand Up @@ -17,4 +17,3 @@ StripTrailingWhitespace: Yes

BuildType: Package
PackageInstallArgs: --no-multiarch --with-keep.source
PackageRoxygenize: rd,collate,namespace
12 changes: 6 additions & 6 deletions R/term_matching_functions.R
Original file line number Diff line number Diff line change
Expand Up @@ -65,10 +65,10 @@ one_group_match_terms <- function(flat_json, term_matching_table, group_number)
assertive.types::assert_is_a_number(group_number)

### create new table
meta_data_table <- data.frame(term = term_matching_table[[2]],
value = NA)
meta_data_table <- data.frame(Term = term_matching_table[[2]],
Value = NA)

### get values
### get Values
for (this_row in 1:nrow(term_matching_table))
{
handle_type <- term_matching_table[[4]][[this_row]]
Expand All @@ -77,15 +77,15 @@ one_group_match_terms <- function(flat_json, term_matching_table, group_number)

if (handle_type == "list_path" && !is.null(handle) && handle != "?")
{
meta_data_table[["value"]][[this_row]] <- handle
meta_data_table[["Value"]][[this_row]] <- handle
}
else if (handle_type == "literal")
{
meta_data_table[["value"]][[this_row]] <- term_matching_table[[5]][[this_row]]
meta_data_table[["Value"]][[this_row]] <- term_matching_table[[5]][[this_row]]
}
else if (handle_type == "function")
{
meta_data_table[["value"]][[this_row]] <- gradient_as_string(flat_json, group_number)
meta_data_table[["Value"]][[this_row]] <- gradient_as_string(flat_json, group_number)
}
}
return(meta_data_table)
Expand Down
2 changes: 1 addition & 1 deletion README.md
Original file line number Diff line number Diff line change
Expand Up @@ -40,7 +40,7 @@ The c\# command line tool can be used in R with `generate_json()` to create a JS

This JSON file can also be created by using the MARMoSET.exe externally.

Due to the design of the RawFileReader the MARMoSET.exe and therefore this command is running as 64 bit code on Windows only. To use this package with another operating system, it is necessarry to already have the JSON file created. To open a JSON files in R the package `jsonlite` provides the function `fromJSON()`.
Due to the design of the RawFileReader the MARMoSET.exe and therefore this command is running as 64 bit code on Windows only. To use this package with another operating system, it is necessarry to already have the JSON file created. To open a JSON file in R the package `jsonlite` provides the function `fromJSON()`.

``` r
library(MARMoSET)
Expand Down

0 comments on commit 75eaba1

Please sign in to comment.