我想在操作后保存一个 shapefile。
首先,我阅读了我的对象
map<-readOGR("C:/MAPS","33SEE250GC_SIR")
Run Code Online (Sandbox Code Playgroud)
在此之后,我将我的 shapefile 子集:
test <- fortify(map, region="CD_GEOCODI")
test<- subset(test, -43.41<long & long < -43.1 & - 23.05<lat & lat< -22.79)
Run Code Online (Sandbox Code Playgroud)
我得到了这个子集的相应 id
ids<- unique(test$id)
map2<- map[map$CD_GEOCODI %in% ids ,]
Run Code Online (Sandbox Code Playgroud)
当我绘制map2时,一切正常。但是,当我尝试保存此 shapefile 时,出现了错误
writeOGR(map2, dsn = "C:/MAPS" , layer = "nameofmynewmap")
Run Code Online (Sandbox Code Playgroud)
匹配错误(驱动程序,drvs$name):缺少参数“驱动程序”,没有默认值
我不知道如何获得驱动器。一些解决方案?
使用Rstudio [Windows8],当我使用dygraph函数绘制时间序列时,我在主标题中尝试使用UTF-8字符时遇到问题.
library(dygraphs)
dygraph(AirPassengers, main = "Título")
Run Code Online (Sandbox Code Playgroud)
这导致标题:"T?tulo"
我试图将"Título"转换为utf-8 enconding,但它不起作用.
这个问题适合理解 group_by 函数的正确功能。
假设我有一个包含 5 个二进制变量(这些变量的含义并不重要)和一个变量 id 代表一些用户的数据框。例如:
id<- c("A","A" , "B" , "B")
d<- as.data.frame(id)
d$d1<- c(1,0,1,0)
d$d2<- c(1,0,1,0)
d$d3<- c(0,1,1,0)
d$d4<- c(0,1,0,1)
d$d5<- c(0,1,0,0)
> d
id d1 d2 d3 d4 d5
1 A 1 1 0 0 0
2 A 0 0 1 1 1
3 B 1 1 1 0 0
4 B 0 0 0 1 0
Run Code Online (Sandbox Code Playgroud)
我将构建一个函数来检查每个用户 A 和 B,变量 d1 到 d5 都包含 1。
verificator<- function(d )
{
r<- prod(apply(d[,2:6],2, sum))
r<- as.logical(r) …Run Code Online (Sandbox Code Playgroud) 我有一个data.frame,有些列有NA值.我想<NA>用零替换s.我是怎么做到的
实际上,这里显示的mydate不是我的原始数据.原件太大了,不能在这里展示.
mydata = read.spss('mydata.sav', use.value.labels = TRUE, to.data.frame = TRUE, max.value.labels = Inf, trim.factor.names = FALSE, trim_values = FALSE, reencode = "UTF-8")
> mydata
Q_16_O3 Q_16_O4 Q_16_O5 Q_16_O6 Q_16_O7 Q_16_O8 Q_16_O9
10 <NA> <NA> <NA> <NA> <NA> <NA> <NA>
11 <NA> <NA> <NA> <NA> <NA> <NA> <NA>
12 <NA> <NA> <NA> <NA> <NA> <NA> <NA>
13 <NA> <NA> <NA> <NA> <NA> <NA> <NA>
14 <NA> <NA> <NA> <NA> <NA> <NA> <NA>
15 Trem <NA> <NA> …Run Code Online (Sandbox Code Playgroud) 我正在阅读带有data.table包的txt文件.
df<- fread("df.txt")
head(df)
Number Region Type Car ...
1 1 1
2 1 2
3 1 1
4 1 1
5 2 2
6 2 3
Run Code Online (Sandbox Code Playgroud)
我想做一个df的子集,类型Car等于1和3.当我写这样的东西
>class(df)
"data.table" "data.frame"
>subset(df, Type Car %in% c(1,3))
Run Code Online (Sandbox Code Playgroud)
这不起作用.一些解决方案