Adding ability to pass optional arguments to snomadr() via opts=list()...