首頁猿問 R中的智能點(diǎn)標(biāo)簽放置

R中的智能點(diǎn)標(biāo)簽放置

R語言

胡子哥哥 2019-08-30 16:19:38

1）是否有任何R庫/函數(shù)可以在R圖中實(shí)現(xiàn)INTELLIGENT標(biāo)簽放置？我嘗試了一些，但它們都有問題 - 許多標(biāo)簽彼此重疊或其他點(diǎn)（或圖中的其他對(duì)象，但我發(fā)現(xiàn)這更難處理）。2）如果沒有，有什么方法可以如何舒適地幫助算法與特定問題點(diǎn)的標(biāo)簽放置？最舒適，最有效的解決方案。您可以使用我可重復(fù)的示例來玩和測(cè)試其他可能性，看看您是否能夠取得比我更好的結(jié)果：# datax = c(0.8846, 1.1554, 0.9317, 0.9703, 0.9053, 0.9454, 1.0146, 0.9012, 0.9055, 1.3307)y = c(0.9828, 1.0329, 0.931, 1.3794, 0.9273, 0.9605, 1.0259, 0.9542, 0.9717, 0.9357)ShortSci = c("MotAlb", "PruMod", "EriRub", "LusMeg", "PhoOch", "PhoPho", "SaxRub", "TurMer", "TurPil", "TurPhi")# basic plotplot(x, y, asp=1)abline(h = 1, col = "green")abline(v = 1, col = "green")為了標(biāo)記，我嘗試了這些可能性，沒有人真的很好：1）這個(gè)很可怕：text(x, y, labels = ShortSci, cex= 0.7, offset = 10)2）如果您不想為所有點(diǎn)放置標(biāo)簽，但僅針對(duì)異常值，這一點(diǎn)很好，但是，標(biāo)簽通常也是錯(cuò)誤的：identify(x, y, labels = ShortSci, cex = 0.7)3）這個(gè)看起來很有意思但是標(biāo)簽太靠近點(diǎn)了; 我不得不用空格填充它們，但這沒有多大幫助：require(maptools)pointLabel(x, y, labels = paste(" ", ShortSci, " ", sep=""), cex=0.7)4）require(plotrix)thigmophobe.labels(x, y, labels = ShortSci, cex=0.7, offset=0.5)5）require(calibrate)textxy(x, y, labs=ShortSci, cx=0.7)先感謝您！

查看完整描述

3 回答

慕村9548890

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

首先，這是我解決這個(gè)問題的結(jié)果：

我在幾分鐘內(nèi)手動(dòng)預(yù)覽（OS X上非常基本的PDF /圖像查看器）。（編輯：工作流程正是您所期望的：我將圖表保存為R中的PDF，在預(yù)覽中打開它并創(chuàng)建帶有所需標(biāo)簽的文本框（9pt Helvetica），然后用鼠標(biāo)拖動(dòng)它們直到它們看起來好的。然后我導(dǎo)出到PNG上傳到SO。）

現(xiàn)在，在你屈服于迫切要求將其投入遺忘的強(qiáng)烈沖動(dòng)之前，請(qǐng)留下關(guān)于如何自動(dòng)完成這一過程的諷刺評(píng)論，請(qǐng)聽我說！

尋找算法解決方案是完全正常的，（恕我直言）真的很有趣。但是，對(duì)我來說，點(diǎn)標(biāo)簽情況大致分為三類：

你有少量的積分，沒有一點(diǎn)非常接近。在這種情況下，您在問題中列出的解決方案之一可能只需要很少的調(diào)整。

您有少量的點(diǎn)，其中一些點(diǎn)太緊密，無法為典型的算法解決方案提供良好的結(jié)果。在這種情況下，因?yàn)槟阒挥猩倭康狞c(diǎn)，由專人標(biāo)記他們（或者與圖像編輯器或微調(diào)您的來電text）不是那個(gè)很大的努力。

你有相當(dāng)多的積分。在這種情況下，你真的不應(yīng)該標(biāo)記它們，因?yàn)楹茈y在視覺上處理大量的標(biāo)簽。

：爬上肥皂盒：

由于像我們這樣的人喜歡自動(dòng)化，我認(rèn)為我們經(jīng)常陷入這樣一個(gè)陷阱，即認(rèn)為生成一個(gè)好的統(tǒng)計(jì)圖形幾乎每個(gè)方面都應(yīng)該是自動(dòng)化的。我恭敬地（謙卑地?。┎煌?。

沒有完美的通用統(tǒng)計(jì)繪圖環(huán)境可以自動(dòng)創(chuàng)建您腦海中的圖片。像R，ggplot2，格子等的東西做了大部分的工作; 但是額外的一點(diǎn)點(diǎn)調(diào)整，在這里添加一條線，調(diào)整邊距，可能更適合不同的工具。

：從肥皂箱爬下來：

我還要注意，我認(rèn)為我們都可以得到<10-15分的散點(diǎn)圖，即使用手也幾乎不可能清晰地標(biāo)記，這些可能會(huì)破壞任何人提出的自動(dòng)解決方案。

最后，我想重申一下，我知道這不是你正在尋找的答案。而且我并不是說算法嘗試是無用的或愚蠢的。我對(duì)這個(gè)問題進(jìn)行了投票，并樂意提出有趣的算法解決方案！

我發(fā)布這個(gè)答案的原因是我認(rèn)為這個(gè)問題應(yīng)該是規(guī)范的“R中的點(diǎn)標(biāo)記”問題，以備將來重復(fù)使用，我認(rèn)為涉及手工標(biāo)簽的解決方案應(yīng)該在桌面上占有一席之地，就是這樣。

反對(duì) 回復(fù) 2019-08-30

互換的青春

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

我找到了一些解決方案它不是終極和理想的不幸，但它是現(xiàn)在最適合我的那個(gè)。它是半算法，半手動(dòng)，因此與joran描繪的純手動(dòng)解決方案相比，它節(jié)省了時(shí)間。

我忽略了非常重要的?identify幫助部分！

如果在那里指定pos，則用于放置標(biāo)簽的算法與文本使用的算法相同，不同之處在于指針相對(duì)于所識(shí)別的點(diǎn)的位置確定了標(biāo)識(shí)中的pos。

因此，如果您identify()在我的問題中使用解決方案，那么您可以通過不直接點(diǎn)擊該點(diǎn)來影響標(biāo)簽的位置，而是通過相對(duì)于所需方向點(diǎn)擊該點(diǎn)旁邊的!!! 工作得很好！

缺點(diǎn)是只有4個(gè)位置（頂部，左側(cè)，底部，右側(cè)），但我更欣賞其他4個(gè)位置（左上角，右上角，左下角，右下角）......所以我使用它來標(biāo)記它不會(huì)打擾我的點(diǎn)以及我在我的Powerpoint演示中直接標(biāo)記的其余點(diǎn)，正如joran提出的那樣:-)

PS：我還沒有嘗試過directlabels lattice / ggplot解決方案，我還是喜歡使用基本的繪圖庫。

反對(duì) 回復(fù) 2019-08-30