拆分R中的邮政编码（仅前两个数字）

我有一个数据帧。一个科隆是加泰罗尼亚的邮政编码，例如17190，当'08'是巴塞罗那，'17'是吉罗纳，'25'是莱达，'43'是塔拉戈纳，四个县时，它是村盐

我想知道如何划分/减少17190至17，以县分组

---

Thxs提前

我们可以使用

substr

来实现：

substr(17190, start=1, stop=2)

返回：

[1] "17"

[1] "12" "45" "89"

编辑： 如何将

substr

应用于整个列：

substr(c(1234, 4567, 8910), start=1, stop=2)

返回：

[1] "17"

[1] "12" "45" "89"

或者使用

数据框

列：

iris$short_species <- substr(iris$Species, start=1, stop=2)

---

iris$short\u species我们可以使用
substr
：

substr(17190, start=1, stop=2)

返回：

[1] "17"

[1] "12" "45" "89"

编辑：
如何将
substr
应用于整个列：

substr(c(1234, 4567, 8910), start=1, stop=2)

返回：

[1] "17"

[1] "12" "45" "89"

或者使用
数据框
列：

iris$short_species <- substr(iris$Species, start=1, stop=2)

iris$short\u species减法是可以的，我会这样做，而且如果你有50个邮政编码，你可能需要第二个表格，在那里你可以将代码与省名联系起来

下面是一个您可能感兴趣的示例：

Codis<-data.frame(codi=c("08","17","25","43"),
                  provincia=c("Barcelona","Girona","Lleida","Tarragona"))
ex<-data.frame(CP=c("17888","17963","08123","08951","25003","25195","43333","43005"))

ex$provincia<-Codis$provincia[match(unlist(substr(ej$CP,1,2)),Codis$codi)]

减法是可以的，我会这样做，而且如果你有50个邮政编码，你可能想有第二个表，在那里你可以将代码与省名联系起来

下面是一个您可能感兴趣的示例：

Codis<-data.frame(codi=c("08","17","25","43"),
                  provincia=c("Barcelona","Girona","Lleida","Tarragona"))
ex<-data.frame(CP=c("17888","17963","08123","08951","25003","25195","43333","43005"))

ex$provincia<-Codis$provincia[match(unlist(substr(ej$CP,1,2)),Codis$codi)]

欢迎来到StackOverflow！请阅读相关信息以及如何给出建议。这将使其他人更容易帮助您。欢迎使用StackOverflow！请阅读相关信息以及如何给出建议。这将使其他人更容易帮助你。对于所有的专栏，是否都要应用它？使用“应用”功能？对不起，我是兰德公司的新员工，是否将其应用于所有列？使用“应用”功能？对不起，我是新来的