r - R: 種分布モデリング。ラスターおよび/または空間データフレームのミラーリング

Question

.csv ファイルから空間ポイント データ フレームを作成しようとしています。(一般的には) 機能しますが、出力はミラーリングされるため、作成したラスタ マップは「上下逆」になります。ここでこのアプローチ ( RasterLayer の作成) を使用して、ラスターを作成しました。

何が問題なのかわかりません。どんな助けでも大歓迎です！

base <- read.csv(file="Ancylus_Cleaned_Coordinates.csv", header=T, sep="\t")
head(base)

#latitude longitude      species
#1 40.55000  -8.16000 Afluviatilis
#2 40.22000  -8.15000 Afluviatilis
#3 54.43584  -8.12788 Afluviatilis

spdf <- SpatialPointsDataFrame( base[ c("latitude" , "longitude") ], data = data.frame( base$species ),  proj4string = CRS("+proj=longlat +datum=WGS84") )

r <- raster(extent(spdf))
r

次に、ラスターの解像度を設定します

res(r) <- 1

広げて

r <- extend(r, extent(r)+5)

私のサブサンプルを描く

acsel <- gridSample(base, r, n=1)

結果をプロットする

p <- rasterToPolygons(r)
plot(p, border='gray')
points(afc)

Answer 1

パッケージflipから機能を試すことができます。raster

library(raster)

r <- raster(nrow=18, ncol=36)
r[] <- 1:ncell(r)

par(mfrow = c(1, 2))
plot(r)
plot(flip(r, direction = "y"))