Make `opus_file()` return different test files

[philipp-baumann]

i.e. making opus_file() more useful. Add extra arg:

library("opusreader2")
# return more file paths
file <- opus_file(measurement = <vector-with-meas-names>)