0

私は R にかなり慣れていません。adehabitatHR パッケージを使用して、ウミガメの GPS データからカーネル密度と等値線を作成したいと考えています。いくつかの問題が発生しています…</p>

基本的に、R 内で ID と XY フィールドを割り当てて KD と 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")

4

1 に答える 1