块给出的答案与编织器不同

Question

执行R-markdown块2给出的答案与在knitr的html输出中看到的答案不同

我试图停止RStudio并重新启动，我试图隔离该块，以便没有其他代码影响它。

chunk 1

library(png);library(grid)
grid.raster(readPNG("figures/1.png"))

大块2示例

# load data
library(kernlab)
data(spam)
set.seed(333)

# picking a small subset (10 values) from spam data set
smallSpam <- spam[sample(dim(spam)[1], size=10),]

plot(smallSpam$capitalAve,col=spamLabel)

在块2中，第十个采样点的smallSpam$capitalAve约为2.44，在R-Markdown生成的html中，值为16。

为什么块和R-markdown html输出之间有区别？