R/read_all_eyelines_parameters.R

read_all_eyelines_parameters <- function(messages){
  do.call(c, lapply( str_filter(messages, '^settings (\\{.+\\})'), function(str){
    jsonlite::fromJSON(str[[2]])
  }))
}
LIKANblk/eyelinesOnline documentation built on May 23, 2019, 10:33 p.m.