Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
COVID-19
models
Commits
1dabb9be
Commit
1dabb9be
authored
Apr 16, 2021
by
cylon-x
🤖
Browse files
Merge branch 'repo_update' of
https://git-r3lab.uni.lu/covid/models
into repo_update
parents
c97bfcb4
e4dcc048
Changes
1
Hide whitespace changes
Inline
Side-by-side
Integration/MINERVA_access/minerva_access_functions.R
View file @
1dabb9be
...
...
@@ -78,3 +78,13 @@ get_annotation <- function(references, selected_type) {
if
(
length
(
references
)
==
0
)
{
return
(
NA
)
}
with
(
data.frame
(
references
),
resource
[
type
==
selected_type
])
}
### A function retrieving element identifiers from a given MINERVA element set
get_component_annotations
<-
function
(
components
,
annotation_type
)
{
### Get MINERVA references as a named list
message
(
paste0
(
"Retrieving "
,
annotation_type
,
"identifiers for this MINERVA collection"
))
### Apply get_annotation function
mnv_refs
<-
sapply
(
fcomponents
$
map_elements
,
function
(
x
)
sapply
(
x
$
references
,
get_annotation
,
annotation_type
)
)
names
(
mnv_refs
)
<-
fcomponents
$
models
$
name
return
(
mnv_refs
)
}
\ No newline at end of file
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment