From 50e1791ceecf069600f9a3873d9adf81e1c00d0c Mon Sep 17 00:00:00 2001 From: Waldir Leoncio Date: Tue, 14 Jan 2020 17:41:10 +0100 Subject: [PATCH] Removed broken function --- R/etsiParas.R | 14 -------------- 1 file changed, 14 deletions(-) delete mode 100644 R/etsiParas.R diff --git a/R/etsiParas.R b/R/etsiParas.R deleted file mode 100644 index 22eda5e..0000000 --- a/R/etsiParas.R +++ /dev/null @@ -1,14 +0,0 @@ -etsiParas <- function = (osuus, osuusTaulu, omaFreqs, logml) { - ready <- 0; - while (ready != 1) { - muutokset <- laskeMuutokset4(osuus, osuusTaulu, omaFreqs, logml) - [maxMuutos, indeksi] = max(muutokset[1:end]) # TODO: how does this work on Matlab? - if (maxMuutos > 0) { - osuusTaulu <- suoritaMuutos(osuusTaulu, osuus, indeksi) - logml <- logml + maxMuutos - } else { - ready <- 1 - } - } - return (c(osuusTaulu, logml)) -} \ No newline at end of file