Commit ce376025 authored by Erand Smakaj's avatar Erand Smakaj
Browse files

fix bug with wordcount ranks in example

parent 95fcb2bc
Pipeline #11560 failed with stages
......@@ -31,7 +31,7 @@ shinyFileChoose(input, 'files', roots=c('output'=rootdir), session=session)
wordcounts$freq <- wordcounts$count / wordcounts_total;
wordcounts <- wordcounts[,c("word", "count", "freq")];
wordcounts$rank = order(wordcounts$count)
wordcounts$rank <- order(wordcounts$count, decreasing = TRUE)
wordcounts <- wordcounts[wordcounts$count>3,]
wordcounts_total <- sum(wordcounts$count);
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment