library(highcharter)
## Registered S3 method overwritten by 'quantmod':
## method from
## as.zoo.data.frame zoo
## Highcharts (www.highcharts.com) is a Highsoft software product which is
## not free for commercial and Governmental use
library(RColorBrewer)
calidad <- readxl::read_excel("/cloud/project/1_CALIDAD_HIDRICA/calidad.xlsx","Sheet1")
hchart(calidad,"heatmap", hcaes(x=Codigo, y= Parametro, value= Clasificacion)) %>%
hc_colorAxis(stops=color_stops(5, rev(RColorBrewer::brewer.pal(5,"PRGn")))) %>%
hc_tooltip(shared=TRUE, bordercolor="black", valuedecimal=2)