### Get path to example source
examplePath <-
system.file("extdata", package="rock");
### Read a souce coded with the Qualitative Network Approach
qnaExample <-
rock::parse_source(
file.path(
examplePath,
"network-example-1.rock"
)
);
rock::get_codeIds_from_qna_codings(
qnaExample
);
Run the code above in your browser using DataLab