Товщина кордону контрольної точки в ggplot

Використовуючи ggplot, я можу встановити shapeзначення 21-25, щоб отримати фігури, які мають незалежне налаштування для внутрішнього ( fill) та межевого ( col) кольорів, наприклад:

df <- data.frame(id=runif(12), x=1:12, y=runif(12))
ggplot(df, aes(x=x, y=y)) + 
  geom_point(aes(fill=id, size=id), colour="black", shape=21)

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

ggplot(df, aes(x=x, y=y)) + 
  geom_point(aes(fill=id, size=id), colour="black", shape=21, lwd=2)

Як контролювати товщину кордону?

Починаючи з версії 2.0.0 ggplot2 , є аргумент для товщини межі контрольної точки. З NEWS.mdфайлу:

geom_point () отримує естетику обведення, яка контролює ширину меж фігур 21-25 (# 1133, @SeySayux). Розмір та штрих є адитивними, тому точка з розміром = 5 та штрихом = 5 матиме діаметр 10 мм. (# 1142)

Отже, правильним рішенням цього є зараз:

df <- data.frame(id=runif(12), x=1:12, y=runif(12))
ggplot(df, aes(x=x, y=y)) + 
  geom_point(aes(fill=id, size=id), colour="black", shape=21, stroke = 2)

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

Вам також доведеться відключити легенду розміру, щоб зупинити її відображення легенди на графіку ...

ggplot(df, aes(x=x, y=y)) + 
  geom_point(aes(size=id+0.5), colour="black" , show_guide = FALSE )+
  scale_size( guide = "none" )+
  geom_point(aes(fill=id, size=id), colour="black", shape=21)

Інше рішення - створити графік у R, а потім експортувати його у файл .svg. Потім можна змінити ширину лінії за допомогою програмного забезпечення для редагування векторної графіки (наприклад, Inkscape). Цей метод особливо корисний, коли точки даних перекриваються.