Fiz um treemap utilizando o pacote treemap
, em que a área de cada caixa está relacionada a variável Valor
e a cor de cada caixa está relacionada a variável escala
, que foi criada a partir da variável Nota
. Em escala de vermelho a cinza, conforme figura abaixo:
library(data.table)
library(tidyverse)
library(treemap)
url <- "https://raw.githack.com/fsbmat-ufv/stackExchange/main/df2.csv"
df <- fread(url)
df$escala <- scale(df$Nota)
treemap(df, index = "MUNICIPIO", vSize = "Valor", vColor = "escala",
type = "value", palette = "-RdGy", lowerbound.cex.labels = 0.1,
title = "Treemap Rio de Janeiro",
overlap.labels=0.05)
Gostaria de criar o mesmo treemap
com o plotly
, ou um bem parecido, de tal forma que a área das caixas estejam relacionados a variável Valor
e a cor esteja em intensidade relacionada a variável Nota
ou a variável escala
. Criei o código abaixo mas não obtive sucesso. Alguém possui sugestão?
color <- colorRamp(c("Red", "gray"))
colorlist <- rgb(color((df$Nota)/max(df$Nota)), max = 255)
df %>%
plotly::plot_ly(labels = ~ MUNICIPIO,
values = ~Valor,
parents = ~NA,
type = 'treemap',
ids = ~Nota,
hovertemplate = paste0("Cidade: %{label}<extra></extra><br>",
"Nota Média: %{id}")) %>%
plotly::layout(title = "Patent scape",
colorway = colorlist)
rgb(color((df$Nota)/max(df$Nota)), max = max(df$Nota))
. Caso amax(df$nota)
seja por exemplo 10. Todos os valores de cor estarão longe de 255.