Как создать разумный график спектра Гильберта с R (вычислительная среда)

Question

Я использую пакет EMD для R. Этот пакет имеет функцию спектрограмм для отображения спектра Гильберта (рассчитанного с помощью hilbertspec). Однако выход очень расплывчатый и черно-белый.

Эта функция, как представляется, не имеет возможности для вывода цветных изображений. Как я могу получить отображение спектра четко и по возможности в цвете.

Answer 1

Серые уровни зашиты в spectrogram функции (gray()), чтобы переопределить этот параметр можно использовать, например, следующее:

# 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 

Другой вариант заключается в использовании источника функции spectrogram к определите свою собственную функцию графика, которая имеет аргумент для цветовой палитры.