Commit 8aee0bbd authored by Jean-Marie Lepioufle's avatar Jean-Marie Lepioufle
Browse files

typo

parent 8cc1a255
......@@ -3,7 +3,7 @@ damaging <- function(dataset,col,nb_na){
res <- dataset
i <- round(runif(nb_na,1,nrow(dataset)))
j <- round(runif(nb_na,1,ncol(dataset)))
j <- round(runif(nb_na,1,length(col)))
coord <- data.frame(i=i,j=col[j])
dam <-lapply(1:nrow(coord),function(x){
......
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