[Mathematica] Получить значение в точке

[Trius]

Делаю ядерные оценки функцией SmoothKernelDistribution. Как мне получить саму плотность как функцию, то есть, чтобы можно было в эту функцию подставлять конкретные числа и получать ответ?

[Mysterious Light]

Если я правильно понял вопрос, то Вас интересует

PDF[ SmoothKernelDistribution[data], x ]

где x — это аргумент плотности, подставляя вместо него числа, можно получить конкретные значения.
Посмотрите, например, на самый первый пример из справки по SmoothKernelDistribution:

data = RandomVariate[NormalDistribution[], 10^3];

\[ScriptCapitalD] = SmoothKernelDistribution[data];

{Plot[PDF[\[ScriptCapitalD], x], {x, -4, 4}, Filling -> Axis, 
  Exclusions -> None], 
 Plot[CDF[\[ScriptCapitalD], x], {x, -4, 4}, Filling -> Axis, 
  Exclusions -> None]}

Plot требует явного вычисления плотности для её отрисовки.

[Trius]

Я бы хотел что-то вроде

f[x_]=PDF[SmoothKernelDistribution[data],x]

[Mysterious Light]

Так можно, только если вызывать функцию "отложенно":

data = ... ;
f[x_] := PDF[SmoothKernelDistribution[data],x];
Print[ f[2] ];

Или работать в символьном представлении:

data = ... ;
f = PDF[SmoothKernelDistribution[data],x];
Print[ f /. {x -> 2} ];

P.S. я в Математике не много знаю, но никогда не встречал записи вида f[x_] = ... ; обычно используется либо f = ... , либо f[x_] := ... , в зависимости от целей.