เพิ่ม 1 ให้กับมูลค่าเมื่ออันดับเพิ่มขึ้น

ฉันกำลังทำงานกับข้อมูลจัดอันดับที่จัดกลุ่มซึ่งมีละติจูดและลองจิจูด ฉันต้องการเพิ่ม 0.00075 ลงในเขตข้อมูลละติจูดทุกครั้งที่อันดับเพิ่มขึ้น 1

ด้านล่างนี้เป็นหนึ่งใน 5,000 กลุ่มและไม่ทราบว่าชั้นวางสูงสุดจะเป็นเท่าใด ดังนั้นฉันจึงต้องการสิ่งนี้ภายใน group_by โดยควรใช้ dplyr

ฉันรู้ว่าฉันสามารถใช้

group_by(loc_id) %>% mutate(y = if_else(rank > 1, as.character(Y + 0.00075), as.character(Y))

แต่วิธีนี้ใช้ได้ผลเพียงครั้งเดียวเท่านั้น

นี่คือโค้ด r บางส่วนเพื่อสร้าง dataframe ที่เต็มไปด้วยข้อมูล

id <- c(1,2,3,4,5)
loc_id <- c(77,77,77,77,77)
x <- c(-74.001981, -74.001981, -74.001981, -74.001981, -74.001981)
y <- c(40.736038, 40.736038, 40.736038, 40.736038, 40.736038)
views <- c(55,45,66,22,99)
rank <- c(3,4,2,5,1)
data <- data.frame(id, loc_id, x, y, views, rank)

person Jeffkrop    schedule 23.08.2019    source แหล่งที่มา
comment
คุณหมายถึงอะไรโดยครั้งเดียว. หากจัดกลุ่มตาม 'loc_id' ควรเปลี่ยนค่าสำหรับแต่ละกลุ่ม นอกจากนี้ คุณได้ให้ข้อมูลสำหรับ 'loc_id' เดียวเท่านั้น ดังนั้นจึงไม่ชัดเจนว่าคุณหมายถึงอะไร   -  person akrun    schedule 23.08.2019
comment
โดยจะเปลี่ยนค่าทั้งหมดที่มีอันดับมากกว่า 1 จำเป็นต้องวนซ้ำ เพื่อให้ทุกแถวในกลุ่มมีละติจูดที่แตกต่างกันเพิ่มขึ้น 0.00075 เมื่ออันดับสูงขึ้น   -  person Jeffkrop    schedule 23.08.2019
comment
คุณไม่สามารถทำ data %>% group_by(loc_id) %>% mutate(y = y + ((rank - 1) * 0.00075)) ได้เหรอ?   -  person tmfmnk    schedule 23.08.2019
comment
ขอบคุณ @tmfmnk ฉันไม่เคยเห็นมันมาก่อน ขอบคุณที่สละเวลา   -  person Jeffkrop    schedule 23.08.2019


คำตอบ (1)


เปลี่ยนความคิดเห็นของฉันให้เป็นโพสต์ การใช้ dplyr ช่วยให้คุณทำสิ่งต่อไปนี้ได้

data %>% 
 group_by(loc_id) %>% 
 mutate(y = y + ((rank - 1) * 0.00075))
person tmfmnk    schedule 23.08.2019