वेब पर खोज करते समय, बहुभुज के सेंट्रोइड्स को खोजने के समाधान अक्सर सामने आते हैं। मुझे जिस चीज में दिलचस्पी है, वह बिंदुओं के एक समूह का एक केन्द्रक पा रहा है। एक प्रकार का भारित अर्थ। मैं इसकी सराहना करता हूं अगर कोई कुछ संकेत, छद्म कोड (या इससे भी बेहतर, एक आर पैकेज जो पहले से ही इसे हल कर चुका है) प्रदान कर सकता है या इस मुद्दे से कैसे निपटा जा सकता है।
संपादित करें
धर्मान्तरण पूर्ववत (पुनः) हुआ है। iant ने निर्देशांक को औसत करने और सेंट्रोइड के लिए उपयोग करने का एक तरीका सुझाया है। जब मैंने इस वेब पेज पर सही तस्वीर देखी, तो यह मेरे दिमाग को पार कर गया ।
निम्नलिखित आंकड़ा बनाने के लिए यहां कुछ सरल आर कोड है जो यह प्रदर्शित करता है (× सेंट्रो है):
xcor <- rchisq(10, 3, 2)
ycor <- runif(10, min = 1, max = 100)
mx <- mean(xcor)
my <- mean(ycor)
plot(xcor, ycor, pch = 1)
points(mx, my, pch = 3)
EDIT 2
cluster::pam()$medoidsक्लस्टर के एक सेट का एक औसत लौटाता है। यह @Joris Meys से बेशर्मी से चुराया गया एक उदाहरण है:
library(cluster)
df <- data.frame(X = rnorm(100, 0), Y = rpois(100, 2))
plot(df$X, df$Y)
points(pam(df, 1)$medoids, pch = 16, col = "red")