mirror of
https://github.com/msberends/AMR.git
synced 2025-07-08 17:21:49 +02:00
(v0.7.1.9102) lintr
This commit is contained in:
4
R/data.R
4
R/data.R
@ -203,10 +203,10 @@ dataset_UTF8_to_ASCII <- function(df) {
|
||||
iconv(vect, from = "UTF-8", to = "ASCII//TRANSLIT")
|
||||
}
|
||||
df <- as.data.frame(df, stringsAsFactors = FALSE)
|
||||
for (i in 1:NCOL(df)) {
|
||||
for (i in seq_len(NCOL(df))) {
|
||||
col <- df[, i]
|
||||
if (is.list(col)) {
|
||||
for (j in 1:length(col)) {
|
||||
for (j in seq_len(length(col))) {
|
||||
col[[j]] <- trans(col[[j]])
|
||||
}
|
||||
df[, i] <- list(col)
|
||||
|
Reference in New Issue
Block a user