small doc typo and a fix to make kernel PCA return correct dims

[topepo]

> dat <- loadDataSet("3D S Curve")
> kpca <- kPCA()
> emb <- kpca@fun(dat, kpca@stdpars)
> dim(emb@apply(dat)@data)
[1] 2000   17
> 
> emb@pars
$kernel
[1] "rbfdot"

$kpar
$kpar$sigma
[1] 0.1

$ndim
[1] 2

> sessionInfo()
R version 3.3.2 (2016-10-31)
Platform: x86_64-apple-darwin13.4.0 (64-bit)
Running under: macOS Sierra 10.12.3

locale:
[1] en_US.UTF-8/en_US.UTF-8/en_US.UTF-8/C/en_US.UTF-8/en_US.UTF-8

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] dimRed_0.0.3   DRR_0.0.2      CVST_0.2-1     Matrix_1.2-7.1 kernlab_0.9-25

loaded via a namespace (and not attached):
[1] tools_3.3.2     grid_3.3.2      lattice_0.20-34

[gdkrmr]

merged, thanks!