# Copyright 2019 Robert Carnell
#' Construct a random Latin hypercube design
#'
#' \code{randomLHS(4,3)} returns a 4x3 matrix with each column
#' constructed as follows: A random permutation of (1,2,3,4) is
#' generated, say (3,1,2,4) for each of K columns. Then a uniform
#' random number is picked from each indicated quartile. In this
#' example a random number between .5 and .75 is chosen, then one between
#' 0 and .25, then one between .25 and .5, finally one between
#' .75 and 1.
#'
#' @param n the number of rows or samples
#' @param k the number of columns or parameters/variables
#' @param preserveDraw should the draw be constructed so that it is the same for variable numbers of columns?
#' @return a Latin hypercube sample
#' @export
#'
#' @examples
#' a <- randomLHS(5, 3)
randomLHS <- function(n, k, preserveDraw=FALSE)
{
.Call("randomLHS_cpp", as.integer(n), as.integer(k), as.logical(preserveDraw),
PACKAGE = "lhs")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.