data(tico)
v <- ggspectro(tico, ovlp=50)
vv + scale_fill_continuous(name="Amplitude\n(dB)\n", limits=c(-30,0), na.value="transparent")