Присутствие - отсутствие набора данных

Question

Я пытаюсь создать набор данных отсутствия и присутствия в R для использования в последующей модели.У меня есть несколько листов CSV с местоположениями и растровыми растрами, которые соответствуют этим местам.Мне нужно создать набор данных об отсутствии присутствия, чтобы смоделировать выбор среды обитания.Я получил это далеко со сценарием:

setwd("~/Masters/Research Project/GIS/GIS_Focal_Raster")    
library(raster)    

## import the raster layer used as the mask                            ##

absent<-raster("Veg_B2.tif")    
mask<-raster(absent)    

present<-read.csv("B2_Lon_Lat.csv")    
present    

## select 500 random points                                            ##
## set seed to assure that the examples will always have the same      ##
## random sample.                                                      ##

library(dismo)    
set.seed(1963)     
bg<-randomPoints(mask,500)     

## set up the plotting area for two maps                               ##
par(mfrow=c(1,2))     
plot(!is.na(mask),legend=FALSE,main="random")     
points(bg,cex=0.5)     

## repeat the sampling, but limit the area of sampling using a spatial ##
## extent                                                              ##

library(raster)     
library(extent)    

r<-raster("Veg_B2.tif")    
e<-extent(r)     

bg2<-randomPoints(mask,50,ext=e)     
plot(!is.na(mask),legend=FALSE)    
plot(e,add=TRUE,col='red')     
points(bg2,cex=0.5)     

## pseudo-absence points                                               ##

library(rgdal)     
present<-read.csv("B2_Lon_Lat.csv")      
coordinates(present)=~lon+lat     

, но потом я приду с ошибкой

координаты (присутствует) = ~ lon + lat Ошибка в eval (predvars,data, env): объект 'lon' не найден. Есть предложения, как продолжить?