Issue237

[erosquesada]

Now the function takes into account the differences in low-hierarchies mentioned here.
This allow to process data belonging to low-hierarchies having no FMid, and hence allow breaking the code in functions relying on this basis (e.g. those in RDBESvisualise package). The code was written in dplyr, then translated in data.table.
Please @nmprista or @Kasia-MIR to check ahead of merging. @Kasia-MIR, once this is merged we can proceed.

[Kasia-MIR]

first check:
`

RDBESdataObject

library(RDBEScore)
library(data.table)
H1 <- createRDBESDataObject(input = "./TableFormat141025/All_H/2025_10_14_125156.zip", Hierarchy = 1)

use createTableOfRDBESIds

H1_ids <- createTableOfRDBESIds(H1)

#check 1
#BVid without BVfishid
case1 <-H1_ids[is.na(H1_ids$BVid) & !is.na(H1_ids$BVfishId),]
if(nrow(case1)!=0){
stop("Error: BVfishId without BVid")
}
case2 <-H1_ids[!is.na(H1_ids$BVid) & is.na(H1_ids$BVfishId),]
if(nrow(case2)!=0){
stop("Error: BVid without BVfishId")
}
`

[Kasia-MIR]

Fixed bug with BVfishId.