第七色在线视频,2021少妇久久久久久久久久,亚洲欧洲精品成人久久av18,亚洲国产精品特色大片观看完整版,孙宇晨将参加特朗普的晚宴

為了賬號安全,請及時(shí)綁定郵箱和手機(jī)立即綁定
已解決430363個(gè)問題,去搜搜看,總會(huì)有你想問的

按組添加ID列

按組添加ID列

狐的傳說 2019-07-13 15:24:20
我希望根據(jù)緯度和經(jīng)度兩列在R中創(chuàng)建唯一ID,以便重復(fù)的位置具有相同的集群ID。例如:LAT        LONG    Cluster_ID13.5330 -15.4180   113.5330 -15.4180   113.5330 -15.4180   113.5330 -15.4180   113.5330 -15.4170   213.5330 -15.4170   213.5330 -15.4170   213.5340 -14.9350   313.5340 -14.9350   313.5340 -15.9170   413.3670 -14.6190   5
查看完整描述

3 回答

?
慕妹3242003

TA貢獻(xiàn)1824條經(jīng)驗(yàn) 獲得超6個(gè)贊

.GRP加到data.table1.8.3,允許你做以下事情:


# Your data, as a data.frame

dat <- read.table(text='LAT LONG

13.5330 -15.4180 

13.5330 -15.4180 

13.5330 -15.4180 

13.5330 -15.4180 

13.5330 -15.4170 

13.5330 -15.4170 

13.5330 -15.4170 

13.5340 -14.9350 

13.5340 -14.9350 

13.5340 -15.9170 

13.3670 -14.6190', header=TRUE)


# Convert it to a data.table

# with keys as the combination of LAT and LONG

library(data.table)

DT <- data.table(dat, key="LAT,LONG")

DT[, Cluster_ID:=.GRP, by=key(DT)]

DT

#        LAT    LONG Cluster_ID

#  1: 13.367 -14.619          1

#  2: 13.533 -15.418          2

#  3: 13.533 -15.418          2

#  4: 13.533 -15.418          2

#  5: 13.533 -15.418          2

#  6: 13.533 -15.417          3

#  7: 13.533 -15.417          3

#  8: 13.533 -15.417          3

#  9: 13.534 -15.917          4

# 10: 13.534 -14.935          5

# 11: 13.534 -14.935          5


查看完整回答
反對 回復(fù) 2019-07-13
  • 3 回答
  • 0 關(guān)注
  • 627 瀏覽

添加回答

舉報(bào)

0/150
提交
取消
微信客服

購課補(bǔ)貼
聯(lián)系客服咨詢優(yōu)惠詳情

幫助反饋 APP下載

慕課網(wǎng)APP
您的移動(dòng)學(xué)習(xí)伙伴

公眾號

掃描二維碼
關(guān)注慕課網(wǎng)微信公眾號