library(raster)
admin <- getData('GADM', country='FRA', level=2)
set.seed(123)
id <- data.frame(ID_2 = admin@data$ID_2, day1 = sample(1:20,96,replace = T),
day2 = sample(50:80,96,replace = T),
day3 = sample(120:140,96,replace = T),
day4 = sample(200:230,96,replace = T))
admin.shp <- merge(admin,id)
Run Code Online (Sandbox Code Playgroud)
如果我想用要么色彩的情节day1,day2,day3或者day4,我可以这样做:
plot(admin.shp, col = admin.shp@data$day1)
Run Code Online (Sandbox Code Playgroud)
我想要做的是生成某种从第1天到第230天的.gif文件或动画:
range <- c(min(id$day1),max(id$day4))
Run Code Online (Sandbox Code Playgroud)
如果日期与值匹配day1,则多边形应变为绿色,如果在第2天匹配多边形应变为蓝色,如果在第3天匹配多边形应变为橙色,如果在第4天匹配多边形应变为红色
如果我必须为一个列(例如day1)执行此操作,我可以这样做:
library(magick)
c(min(id$day1),max(id$day1)) # 1, 20
for(i in 1:20){
breaks.pl <- c(0, i, 21)
col.pl <- c("green4","white")
cuts.pl <- cut(data.frame(admin.shp)[, "day1"],breaks = breaks.pl)
png(paste0(i,".png"), width …Run Code Online (Sandbox Code Playgroud) 据我了解,当您git add创建文件时,它只是在将文件添加到存储库之前暂存该文件,但为什么我可以在提交之前看到它已添加到 git 存储库中?
例如,如果我创建一个新的 git 存储库并创建一个名为的新文件foo并将内容“hello world”添加到其中,然后,我会在该文件夹内的子目录git add foo中看到一个新项目。我什至可以使用命令查看文件内新文件的内容。objects.gitobjectsgit cat-file -p
文件夹中到底添加了什么.git/objects?从技术上讲,暂存文件有什么作用?git add比如对文件运行a 后会发生哪些步骤?如果我知道步骤,也许我会更好地理解它。