Изменение меток в матрице расстояний

Question

У меня есть список номеров с метками, и я надеюсь сократить все метки в списке.

У меня есть похожая строка, которая делает это успешно для имен строк:

> rownames(embu) <- paste(substring(rownames(embu),7,22),sep="")

Однако это не распространяется на этикетки

> labels(cell.dist) <- (paste(substring(labels(cell.dist),8,23),sep=""))
Error in labels(cell.dist) <- (paste(substring(labels(cell.dist), 8, 23),  : 
  could not find function "labels<-"

Заранее благодарим за любую помощь!

Answer 1

Понял мою ошибку, не понял, что объект представлял собой матрицу расстояний (сделанную с помощью «as.dist» из какого-либо стороннего кода), исправленную с помощью этого:

labels <- paste(substring(labels(cell.dist),8,23),sep="")
cell.dist <- dist_setNames(cell.dist, labels)