Mercurial > repos > davidvanzessen > change_o
diff define_clones.r @ 3:5173675d0d10 draft
Uploaded
author | davidvanzessen |
---|---|
date | Mon, 15 Aug 2016 08:33:53 -0400 |
parents | 326165da9ece |
children | c75b30eb0b07 |
line wrap: on
line diff
--- a/define_clones.r Thu Aug 11 07:40:36 2016 -0400 +++ b/define_clones.r Mon Aug 15 08:33:53 2016 -0400 @@ -7,7 +7,7 @@ freq = data.frame(table(change.o$CLONE)) freq2 = data.frame(table(freq$Freq)) -freq2$final = round(freq2$Freq / as.numeric(freq2$Var1), 2) +freq2$final = round(freq2$Freq * as.numeric(freq2$Var1), 2) names(freq2) = c("freq", "freq.of.freq", "divided")