object returned from C++ bad dimensions

[hdarjus]

set.seed(1)
res <- svsample_fast_cpp(rnorm(100),
  designmatrix = matrix(NA))

Here, res$latent has dimenstions 2x100 because of this line in C++

const int latent_draws = draws / thinlatent + 1;

And the same for para and beta and latent0.

[hdarjus]

d19585abf1 is a fix