从R中的3D核密度估计并提取点值

Question

从R文档中的以下代码link我想弄清楚如何为数据框的每个原始点提取单个值（＆＃34;密度＆＃34;） 这样，我可以将新列用于我想到的其他应用程序＆＃34; point＆＃34; 3D空间密度。

我查看了这个SO问题：link，但是该代码给出了51层的矩阵..而且我仍然坚持如何获得150点值。

在我的情况下，我关注使用的三变量示例：

fhat <- kde(x=iris[,1:3])

这是代码，它提供了一个很好的情节，但是我没有为虹膜数据集中的150行/点中的每一个获得单个值

library(ks)
library(MASS)
data(iris)

## univariate example
fhat <- kde(x=iris[,2])
plot(fhat, cont=50, col.cont="blue", cont.lwd=2, xlab="Sepal length")

## bivariate example
fhat <- kde(x=iris[,2:3])
plot(fhat, display="filled.contour2", cont=seq(10,90,by=10))
plot(fhat, display="persp", thin=3, border=1, col="white")

## trivariate example
fhat <- kde(x=iris[,2:4])
plot(fhat, drawpoints=TRUE)

Answer 1

我假设您指的是 var muiTheme = getMuiTheme({ palette: { primary1Color: '#135DAE', primary2Color: '#135DAE', primary3Color: '#135DAE', accent1Color: '#EF243A', accent2Color: '#135DAE', accent3Color: '#135DAE', }, appBar: { height: 50, }, }) 包中的 <DatePicker hintText="Selected day" value={this.state.controlledDate.toDate()} onChange={this.handleChange} autoOk /> ？

如果是这样，使用参数kde()使用估算来计算点的矢量/矩阵的密度：

ks

类似于更高的输入尺寸。