Як уникнути перекриття міток у R-графіці? [зачинено]

Я намагаюся позначити досить простий розсіювач у Р. Це я використовую:

plot(SI, TI)
text(SI, TI, Name, pos=4, cex=0.7)

Результат посередній, як ви бачите (натисніть, щоб збільшити):

Я намагався компенсувати це за допомогою textxyфункції, але це не краще . Збільшення зображення не працює для щільних кластерів.

Чи є якась функція чи простий спосіб компенсувати це, і дозволити міткам R ділянок, які не перетинаються ?

Ось невеликий підмножина даних, які я маю:

Name;SI;TI
01_BAD_talking_head;6.944714;4.421208
01_GOOD_talking_head;5.680141;4.864035
01_GOOD_talking_head_subtitles;7.170114;4.664205

Ознайомтеся з новим пакетом ggrepel . ggrepel надає геометрії для ggplot2 для відштовхування текстових міток, що перекриваються. Він працює як для geom_text, так і для geom_label.

Фігура взята з цієї публікації в блозі .

directlabelsПакет робить це. З його веб-сторінки :

Цей пакет є спробою перетворити пряме маркування на реальність у повсякденній статистичній практиці, зробивши доступним цілий ряд корисних функцій, які роблять пряме маркування загальних сюжетів простим у виконанні за допомогою графіків високого рівня, таких як решітка та ggplot2.

Хоча це не завжди можливо для щільних ділянок.

Ось короткий приклад:

set.seed(123)
a <- c(rnorm(10,-3,2),rnorm(10,3,2))
b <- c(rnorm(10,-3,2),rnorm(10,3,2))
dfr <- data.frame(a,b)
dfr$t <- c(paste("A",1:10,sep=""),paste("B",1:10,sep=""))
direct.label(xyplot(b~a,dfr,groups=t, col="black"))

Мені вдалося позбутися точкового забарвлення за допомогою col="black", але не міток.

Я б запропонував вам поглянути на wordcloudпакунок. Я знаю, що цей пакет фокусується не саме на пунктах, а на самих етикетках, а також стиль здається досить виправленим. Але все-таки результати, отримані від його використання, були досить приголомшливими. Також зауважте, що розглянутий варіант пакета був випущений приблизно у той момент, коли ви задали це питання, тому він все ще дуже новий.

http://blog.fellstat.com/?cat=11

Я зіткнувся з подібною проблемою з декількома сюжетами, з якими працював, і написав базовий пакет, який використовує силове моделювання поля для коригування розташування об'єктів. Перевага перед деякими з цитованих вище рішень - це динамічне регулювання відносної близькості об'єкта в 2D. Хоча можливе багато вдосконалення, включаючи евристику та інтеграцію з ggplot тощо., Здається, це може виконати завдання. Далі ілюструється функціональність:

install.packages("FField", type = "source")
install.packages("ggplot2")
install.packages("gridExtra")
library(FField)
FFieldPtRepDemo()

Наразі не існує евристики для різних областей та розподілів точок, оскільки рішення відповідало моїм потребам, і я хотів швидко отримати щось корисне, але я додам їх у середньостроковій перспективі. У цей час я рекомендую масштабувати діаграми до 100x100 і назад і трохи підлаштовувати параметри притягання та відштовхування за замовчуванням як гарантовані.

У випадку, якщо ви просто не можете змусити етикетки працювати належним чином як створено R, пам’ятайте, що ви завжди можете зберегти графіки у векторному форматі (наприклад, .pdf) та перетягнути їх у програму редагування, наприклад InkScape або Adobe Illustrator.

Кілька додаткових інструментів, на які слід звернути увагу на R:

• spread.labelsФункція в plotrixпакеті
• thigmophobe.labelsв plotrixупаковці
• spread.labsфункція в TeachingDemosпакеті
• TkIdentifyфункція в TeachingDemosпакеті

Вони не зроблять все для вас, але одна з них може бути частиною рішення.