R: как получить оценки удельной плотности

# The Old Faithful geyser data
d <- density(faithful$eruptions, bw = "sj")
> head(d$x)
[1] 1.179869 1.188363 1.196857 1.205350 1.213844 1.222338

Я использую функцию density в {stats}, и мне интересно, можно ли увидеть плотность при определенных значениях на выходе? Например, в настоящее время у меня есть оценки плотности при значениях извержения [1] 1.179869 1.188363 ..., но что, если я хочу узнать оценки плотности при значениях извержения 1 2 5 10 ...? Есть ли способ извлечь эти объекты density, d?