Cómo crear un gráfico de espectro de Hilbert sensata con R (entorno informático)

Question

Estoy utilizando el EMD paquete para R. este paquete tiene una función de espectrograma para mostrar un espectro de Hilbert (calculado con hilbertspec). La salida, sin embargo, es muy vaga y negro-blanco.

Esta función no parecen tener una opción para la emisión de imágenes en color. ¿Cómo puedo obtener el espectro mostrado claramente y si es posible en color.

Answer 1

Los niveles de gris están codificados en la función spectrogram (gray()), a anular esta configuración se puede utilizar, por ejemplo, lo siguiente:

# define a color palette
colors <- colorRampPalette(c("#007FFF", "blue", "#000077"))  
gray <- function(x) colors(255*x)  # redefine gray palette
spectrogram(test1$amplitude[,1], test1$instantfreq[,1])
gray <- grDevices::gray  # reset gray palette function

Otra opción es utilizar la fuente de la función spectrogram para definir su propia función trama que tiene un argumento a favor de la paleta de colores.