adehabitatHR KD ID和XY分配

Question

我对R比较陌生，我想用adehabitatHR包从我的海龟GPS数据中创建内核密度和等值线。我遇到了一些问题…

基本上，我在R中分配I和XY字段以创建KDs和MCP时遇到了问题。

提前感谢您的帮助！

Here is what I have been doing...   

​

#loading packages
`library(adehabitatHR)
library(raster) 
library(rgdal)
library(maptools)`

#read CSV with UTM xy and ids

    track<- 
read.table("T:/GIS/Data/Tracking/state_space_model/20150210_AbHabiatatHRmodel/All_prelim_model_6hr_utm_forage_10A.csv",
   header=TRUE, sep=",", na.strings="NA", dec=".", strip.white=TRUE)

# Turn track into a SpatialPointsDataFrame sby specifying that the "X" and "Y" columns are the coordinates:
coordinates(track) <- c("X", "Y")
class(track)
plot(track)
#Project into utm:
proj4string(track) <- CRS("+init=epsg:32618")
#read shore;ine file
shore <- readShapeSpatial("C:/Users/gemme001/Desktop/R_state_space/STATES_VA_COAST_UTM.shp", delete_null_obj=TRUE)
plot(shore)
proj4string(shore) <- CRS("+init=epsg:32618")
#Add to list the list with the names "map" and "relocs" 
my.homerange.data <- list(map = shore, relocs = track)
#Assign IDs and XY – the IDs work but coordinates don’t work.  I get the following error: Error in `[.data.frame`(x@data, i, j, ..., drop = FALSE) : undefined columns selected
id<-my.homerange.data$relocs$Name
xy<-(my.homerange.data$relocs["X","Y"]
#Create CP – this works
cp <- mcp(my.homerange.data$relocs[,1], percent=95)
class(cp)
plot(cp)
#Create KUD.  This doesn’t work.  I get the following:  Error in xy.coords(x, y, xlabel, ylabel, log) : 'x' is a list, but does not have components 'x' and 'y'
kud <- kernelUD(track[,1], h="href")

​

Answer 1

到目前为止，你可能已经解决了你的问题，但以防万一，我终于用我的鸟类数据解决了这个问题，并且和你有相同的问题。最后，我在excel中为数据表的第一列中的每种动物分配了一个ID，然后重新导入数据。此外，如果您正在学习adehabitatHR教程，请确保您的x和y列是第2列和第3列，并且也是这样标记的。一旦我以这种格式设置了我的数据，我就能够轻松地将空间数据转换为数据帧，然后继续计算KDE并获得home range多边形。