У меня есть такой фрейм данных, как этот, одного размера (100,37):
T_v 400 420 440 460
385 0.05707693 0.05707693 0.05707693 0.05707693
390 0.06411564 0.06411564 0.06411564 0.06411564
395 0.07115435 0.07115435 0.07115435 0.07115435
Я хочу использовать плотность ядра (KDE) для создания фрейма данных с
T_v <- seq(400,540,1)
Wavelength <- seq(400,1200,1)
так что KDE предсказывает все значения из данных выше.Таким образом, мои данные будут на шаге (1,1), а не (5,20).
Я пробовал что-то вроде этого:
bivn <- melt(df , id.vars = 'T_v', variable.name = 'Wavelength')
bivn$Wavelength <- as.numeric(as.character(bivn$Wavelength))
bivn.kde <- kde2d(bivn[,1], bivn[,2], n = c(length(temperature),length(lambda)) )
, а также пробовал с помощью kde:
x<- data.matrix(df.4)
kde <- kde(x=x, binned=TRUE, compute.cont=TRUE, xmin=c(-5,-5), xmax=c(400,500), bgridsize=c(151,151))
, которую я нашел в Интернете.но они не работают.