In: Computer Science
This is R language
# Return vector with uppercase version of message elements in log entries
# Apply extract_caps function on logs
code
solution
//output
//copyable code
vapply(logs, `[[`, c('details','message'),FUN.VALUE=character(1))
toupper(vapply(logs, `[[`, c('details','message'),FUN.VALUE=character(1)))
# Apply extract_caps function on logs
extract_caps<-function(x){
toupper(x$details$message)
}
vapply(logs,extract_caps,FUN.VALUE=character(1))