       if (all(is.na(rvs$editedInfo))) {         v <-  Hierarchy[i, j]         rvs$data[i, j] <<- DT::coerceValue(v, rvs$data[i, j])       } else {         rvs$data[as.matrix(rvs$editedInfo[0:0])] <- rvs$editedInfo$value       }  