#'@rdname hzhf
#'@export
makeHZHF04 = function(in.dim, k, c = 0.5, s = 0, check = TRUE) {
in.dim = asCount(in.dim)
k = asInteger(k, lower = 1L, upper = in.dim - 1L)
z.max = 2 * 1:in.dim
trafo1 = makeWFGTrafo(list(
list(name = "s_multi", ids = 1:in.dim, params = list(A = 5, B = 10, C = 0.35))
))
trafo2 = makeWFGTrafo(list(
list(name = "r_sum", ids = 1:k, params = list(w = 2 *
1:k)),
list(name = "r_sum", ids = (k + 1):in.dim, params = list(w = 2 *
(k + 1):in.dim))
))
trafos = list(trafo1, trafo2)
makeCustomHierarchWFG(name = "HZHF04", in.dim = in.dim, k = k, z.max = z.max,
trafos = trafos, c = c, s = s, check = check)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.