dataframe - Give an (x,y) pair, how to choose which (x,y)_i pair is the closest - R -

-

i have data frame (called coors) contains vector of x coordinates , vector of y coordinates.

i have data frame (called pickedpoint) contains specified (x,y) pairs of interest.

the goal associate each coors point nearest pickedpoint. want use euclidean norm (l-2). if @ possible please tidyverse methods. 

       coor = data.frame(row = rep(1:96, each = 72),                          col = rep(1:72, times = 96))         pickedpoint = data.frame(pprow = sample(96,10),                                 ppcol = sample(72,10))

there thread similar posted in python:

how find closest (x, y) position (x,y) position in list?

i have included benchmark answers far:

microbenchmark(cpak(), latemail(),jul(), times=10l) unit: milliseconds expr       min         lq       mean     median         uq       max neval cpak()  37.83691   38.60585  43.66030   39.86094   44.9592     62.784 10 latemail() 4275.10 4536.783   4674.966   4712.938  4855.860   5045.069 10 jul()   37.38809   39.87625   46.17202   44.90693   53.08938    57.33  10

i'd suggest using sp package this

library(sp) library(dplyr)  coor$closest <- spdists(as.matrix(coor),as.matrix(pickedpoint)) %>% apply(1,which.min)

Comments

Post a Comment

Popular posts from this blog

ios - MKAnnotationView layer is not of expected type: MKLayer -

-
Image
so code works fine logger riddled message. there way rid of or suppress it? postannotation.swift class postannotation: mkpointannotation { //mark: properties let post: post //mark: initialization init(post: post) { self.post = post super.init() self.coordinate = cllocationcoordinate2d(latitude: post.latitude, longitude: post.longitude) self.title = post.title self.subtitle = post.timestring() } } adding annotation let annotation = postannotation(post: post) self.map.addannotation(annotation) func mapview func mapview(_ mapview: mkmapview, viewfor annotation: mkannotation) -> mkannotationview? { if annotation mkuserlocation { return nil } var annotationview = mapview.dequeuereusableannotationview(withidentifier: "pin") as? mkpinannotationview if annotationview == nil { annotationview = mkpinannotationview(annotation: annotation, reuseidentifier: "pin")
Read more

ZeroMQ on Windows, with Qt Creator -

-
i have installed zmq link given below on windows 7. http://zeromq.org/distro:microsoft-windows 1) have c++ project in qt-creator , i'm using zmq c++ binding (zhelpers.hpp etc). 2) have added .lib installed zmq folder qtcreator 3) while compiling, compiler looks _imp__zmq_verion, in .dll files present in .lib have __imp_zmq_version. 4) causing undefined reference zmq_version. anyone else faced problem , has solution ?
Read more

unity3d - Unity SceneManager.LoadScene quits application -

-
i have 2 different scenes 1 named 'main' , other 'game' both added scenes in load. when use scenemanager.loadscene("game"); works no problem when tried return main scene code if (input.getkeydown (keycode.escape)) { scenemanager.loadscene("main"); } strangely game quits. thanks. sorry interruption. somewhere on other script found code. if (input.getkeydown (keycode.escape)) { application.quit (); } that's bad, know...
Read more