Displaying 1 result from an estimated 1 matches for "r_kmns".
Did you mean:
kmns
2012 Jan 14
1
Error: unexpected '<' in "<" when modifying existing functions
...newbie and here is my code:
myk = function (x, centers, iter.max = 10, nstart = 1, algorithm =
c("Hartigan-Wong",
+ "Lloyd", "Forgy", "MacQueen"))
+ {
+ do_one <- function(nmeth) {
+ Z <- switch(nmeth, {
+ Z <- .Fortran(R_kmns, as.double(x), as.integer(m),
+ as.integer(ncol(x)), centers = as.double(centers),
+ as.integer(k), c1 = integer(m), integer(m), nc = integer(k),
+ double(k), double(k), integer(k), double(m),
+ integer(k), integer(k), as.integer(iter....