Блог

У меня есть этот код, который хорошо работает, поскольку элемент представлен формой. Мне нужно добавить легенду для этого значения z. Возможно, что-то, что гласит «Высота = размер квадрата».

Кроме того, у меня есть еще одна проблема. С помощью кода, который я использую для настройки формы для отображения элемента z, я не могу понять, как сделать точки прозрачными. Я посмотрел на stack overflow и попробовал несколько предложенных методов. Тем не менее, я считаю, что именно то, как я написал этот код, сделало это более сложным.

Это мой код:

 library(readxl)
library(ggplot2)
library(dplyr)


inputBrooklyn <- read_xlsx("PlotsManhattan.xlsx")
PercentBK     <- inputBrooklyn$Percent
ComNormBK     <- inputBrooklyn$ComNorm
ElevationBK   <- inputBrooklyn$Elevation


dfx = data.frame(PercentBK, ComNormBK, ElevationBK)

with(dfx, symbols(PercentBK, ComNormBK, squares=ElevationBK, inches=1/3,
                  ann=F, bg= "blue", fg=NULL))
title(xlab = "Slope", ylab = "Normalized Total Complaints")

  

Поскольку вы не предоставляете нам свои данные, мы не можем фактически запустить ваш код. Однако это будет довольно близко. Попробуйте

 with(dfx, symbols(PercentBK, ComNormBK, squares=ElevationBK, inches=1/3,
                  ann=F, bg= "#0000FF55", fg=NULL))
title(xlab = "Slope", ylab = "Normalized Total Complaints")
text(4, 0.008, "Elevation = size of square")
  

Я думаю, что эта text часть не требует пояснений. Я изменил bg цвет на «# 0000FF55», что означает Красный = 0, зеленый = 0, синий = 255, непрозрачность = 85. Уменьшите число для большей прозрачности.