Error accessing record

When I try to access a zenodo record, even the examples, I get an error.

```
> library('zen4R')
> zenodo <- ZenodoManager$new()
> zenodo$getRecordByDOI("10.5281/zenodo.3378733")
Error in if (result$doi == doi) { : argument is of length zero
```