The notes in Chapter 17 - Programming metadata is missing the slash before object. For example it looks like this in the online distribution URL on the test site
doc$dataset$dataTable$physical$distribution$online$url <- paste0(mn@endpoint,
"/object/",
data_id)