Напишите много файлов в цикле for

У меня есть пример данных, подобных этому

df <- data.frame(name = rep(letters[1:7], each = 24), salary = runif(24*7, 100, 200)) 

Я хотел отделить каждое имя с их зарплатой

 lst <- tapply(df$salary, df$name, matrix, nrow = 4, byrow = TRUE) 

Теперь я хочу записать все эти 7 матриц в 7 разных текстовых файлов, он работает только для одной матрицы за раз. Я попытался включить цикл for, но не работает

 for (i in 1:7) { write.table(lst[i], ".txt", col.names = FALSE, row.names = FALSE, sep = "\t", quote = FALSE) } 

Может ли кто-нибудь предложить изменения в цикле for?

Учитывая ваш lst , следующее будет записывать это в ряд файлов TXT с именами, равными имени lst , плюс .txt :

 lapply(names(lst), function(x, lst) write.table(lst[[x]], paste(x, ".txt", sep = ""), col.names=FALSE, row.names=FALSE, sep="\t", quote=FALSE), lst) 

Чтобы изменить цикл for() , попробуйте:

 for(i in seq_along(lst)) { write.table(lst[[i]], paste(names(lst)[i], ".txt", sep = ""), col.names = FALSE, row.names = FALSE, sep = "\t", quote = FALSE) } 

Проблема заключалась в том, чтобы попытаться или предположить, что R будет вставлять вместе имена файлов для вас.

Попробуй это,

 for (ii in names(lst)){ filename <- paste(ii, ".txt", sep="") write.table(lst[[ii]], filename, col.names=FALSE,row.names=FALSE,sep="\t",quote=FALSE) } 
  • Выбор только числовых столбцов из кадра данных
  • Условно удалить строки Dataframe с R
  • Сценарий Sourcing R поверх HTTPS
  • Как я могу прерывать текущий код в R с помощью команды клавиатуры?
  • Автоматически создавать формулы для всех возможных линейных моделей
  • Функция очистки консоли в R и RStudio
  • R: t-тест по всем столбцам
  • cbind a df с пустым df (cbind.fill?)
  • Почему используется `<< -` нахмурился и как я могу его избежать?
  • Преобразование десятичного в двоичный в R?
  • Извлечение строк для первого вхождения переменной в фрейм данных
  • Interesting Posts

    Как я могу отформатировать этот путь для работы в качестве значения ключа реестра?

    использование canvasа HTML5 – поворот изображения о произвольной точке

    Есть ли способ уменьшить расстояние между значками элементов действия на панели действий?

    Удалить первую строку в bash

    Как я могу контролировать скорость загрузки карусели в элементах?

    Отключите масштабирование на ПК с Windows 10 с «нормальной» (неточной) сенсорной панелью

    Нужно ли мне запускать дефрагментацию на SSD?

    Как эмулировать numpad на ПК-ноутбуке?

    Как проверить, является ли ввод числовым в C ++

    Нормализация: что означает «повторяющиеся группы»?

    Возможный вопрос для интервью: как найти все перекрывающиеся интервалы

    Использование cudamalloc (). Почему двойной указатель?

    Как я могу получить код статуса HTTP из ServletResponse в ServletFilter?

    В чем разница между цитатой и списком?

    Установлено 4 ГБ ОЗУ, но доступно только 2,97 ГБ. Что дает?

    Давайте будем гением компьютера.