如何使用核心R操作/访问“dist”类实例的元素？

R中一个基本/常见的类被称为"dist"，它是对称距离矩阵的相对高效表示。然而，与"matrix"对象不同，似乎没有支持使用"["运算符通过索引对操作"dist"实例的功能。
例如，以下代码返回空值、NULL或错误：

# First, create an example dist object from a matrix
mat1  <- matrix(1:100, 10, 10)
rownames(mat1) <- 1:10
colnames(mat1) <- 1:10
dist1 <- as.dist(mat1)
# Now try to access index features, or index values
names(dist1)
rownames(dist1)
row.names(dist1)
colnames(dist1)
col.names(dist1)
dist1[1, 2]

同时，以下命令在某种程度上确实有效，但并不能更轻松地访问/操作特定的索引对数值：

dist1[1] # R thinks of it as a vector, not a matrix?
attributes(dist1)
attributes(dist1)$Diag <- FALSE
mat2 <- as(dist1, "matrix")
mat2[1, 2] <- 0

一个解决方法——我想要避免——是先将"dist"对象转换为"matrix"，对该矩阵进行操作，然后再将其转换回"dist"。也就是说，这不是有关如何转换"dist"实例为已定义常见矩阵索引工具的"matrix"或其他类的问题；因为这在另一个SO问题中已经得到了多种回答。
在stats包（或其他核心R包）中是否有专门用于索引/访问"dist"实例元素的工具？