英文:
How to obtain individual IDs in the matrix, instead of row names in R (sf package)?
问题
我获得了一个包含每个物种ID之间距离的矩阵。如何使矩阵显示个体的实际ID而不是行号？
library(sf)
species <- data.frame(longitude = c(-106.425668, -96.111617, -96.5,-96.5, -96.5, -96.5),
latitude = c(23.18127, 15.779873, 19.68, 19.68, 19.68, 19.68),
id = c("0-1","0-2","0-3","0-4","0-5","0-6"))
species_sf <- st_as_sf(species, coords = c("longitude", "latitude"), crs = 4326)
st_distance(species_sf)
我的输出如下：
Units: [m]
[,1] [,2] [,3] [,4] [,5] [,6]
[1,] 0 1357855.2 1098291.3 1098291.3 1098291.3 1098291.3
[2,] 1357855 0.0 435620.5 435620.5 435620.5 435620.5
[3,] 1098291 435620.5 0.0 0.0 0.0 0.0
[4,] 1098291 435620.5 0.0 0.0 0.0 0.0
[5,] 1098291 435620.5 0.0 0.0 0.0 0.0
[6,] 1098291 435620.5 0.0 0.0 0.0 0.0
我希望方括号显示实际的物种ID。
谢谢。
英文:
I obtained a matrix of distances between each species ID. How do I get the matrix to show the actual ID of individuals instead of row numbers?
library(sf)
species <- data.frame(longitude = c(-106.425668, -96.111617, -96.5,-96.5, -96.5, -96.5),
latitude = c(23.18127, 15.779873, 19.68, 19.68, 19.68, 19.68),
id = c("0-1","0-2","0-3","0-4","0-5","0-6"))
species_sf <- st_as_sf(species, coords = c("longitude", "latitude"), crs = 4326)
st_distance(species_sf)
My output is below:
Units: [m]
[,1] [,2] [,3] [,4] [,5] [,6]
[1,] 0 1357855.2 1098291.3 1098291.3 1098291.3 1098291.3
[2,] 1357855 0.0 435620.5 435620.5 435620.5 435620.5
[3,] 1098291 435620.5 0.0 0.0 0.0 0.0
[4,] 1098291 435620.5 0.0 0.0 0.0 0.0
[5,] 1098291 435620.5 0.0 0.0 0.0 0.0
[6,] 1098291 435620.5 0.0 0.0 0.0 0.0
I want the square brackets to show actual species IDs.
Thank you.
答案1
得分: 3
你可以使用rownames()和colnames()来设置名称：
species_sf |>
st_distance() |>
`rownames<-`(species_sf$id) |>
`colnames<-`(species_sf$id)
#> 单位：[m]
#> 0-1 0-2 0-3 0-4 0-5 0-6
#> 0-1 0 1357855.2 1098291.3 1098291.3 1098291.3 1098291.3
#> 0-2 1357855 0.0 435620.5 435620.5 435620.5 435620.5
#> 0-3 1098291 435620.5 0.0 0.0 0.0 0.0
#> 0-4 1098291 435620.5 0.0 0.0 0.0 0.0
#> 0-5 1098291 435620.5 0.0 0.0 0.0 0.0
#> 0-6 1098291 435620.5 0.0 0.0 0.0 0.0
英文:
You can set names with rownames() & colnames() :
species_sf |>
st_distance() |>
`rownames<-`(species_sf$id) |>
`colnames<-`(species_sf$id)
#> Units: [m]
#> 0-1 0-2 0-3 0-4 0-5 0-6
#> 0-1 0 1357855.2 1098291.3 1098291.3 1098291.3 1098291.3
#> 0-2 1357855 0.0 435620.5 435620.5 435620.5 435620.5
#> 0-3 1098291 435620.5 0.0 0.0 0.0 0.0
#> 0-4 1098291 435620.5 0.0 0.0 0.0 0.0
#> 0-5 1098291 435620.5 0.0 0.0 0.0 0.0
#> 0-6 1098291 435620.5 0.0 0.0 0.0 0.0
通过集体智慧和协作来改善编程学习和解决问题的方式。致力于成为全球开发者共同参与的知识库，让每个人都能够通过互相帮助和分享经验来进步。
评论