# \donttest{
# Example: reshape wq_demo to long and plot
data(wq_demo)
library(tidyr)
df_long <- tidyr::pivot_longer(
wq_demo,
cols = c("ph","od","turbidez","dbo"),
names_to = "parametro",
values_to = "valor"
)
plot_heatmap(df_long)
# }
Run the code above in your browser using DataLab