Commit 43a4e2950b5a3c116fce57554944e192f4ec06b3
1 parent
0cb37d334f
Exists in
master
Update as.data.frame with stringsAsFactors = FALSE
Showing
1 changed file
with
2 additions
and
2 deletions
Show diff stats
RAutoClDs.R
| ... | ... | @@ -369,7 +369,7 @@ THEFT <- function(){ |
| 369 | 369 | |
| 370 | 370 | roALZna <- t(ALZDAT) %>% |
| 371 | 371 | rownames(.) %>% |
| 372 | - as.data.frame(.) | |
| 372 | + as.data.frame(.,stringsAsFactors = FALSE) | |
| 373 | 373 | colnames(roALZna) <- "ID_REF" |
| 374 | 374 | |
| 375 | 375 | RAWDAT <- t(ALZDAT) %>% |
| ... | ... | @@ -637,7 +637,7 @@ THEFT <- function(){ |
| 637 | 637 | namedarows <- rownames(rawword)[-hereim] %>% |
| 638 | 638 | as.data.frame(.,stringsAsFactors = FALSE) |
| 639 | 639 | RAWWORD <- rawword[-hereim,] %>% |
| 640 | - as.data.frame() %>% | |
| 640 | + as.data.frame(.,stringsAsFactors = FALSE) %>% | |
| 641 | 641 | bind_cols(namedarows,.) |
| 642 | 642 | z <- 1 |
| 643 | 643 | naroww <- as.data.frame(rep(0,dim(RAWWORD)[1]),stringsAsFactors = FALSE) |