r экспортировать сводную информацию И структуру фрейма данных в файл CSV

#r #csv #export #structure #export-to-csv

#r #csv #экспорт #структура #экспорт в csv

Вопрос:

У меня есть фрейм данных в R (aa), который я импортировал в R из файла экспорта SAS. Он содержит более 350 переменных. Я хочу экспортировать сводную информацию о переменных в файл CSV и использовал это:

 varsum = summary(aa)
write.csv(varsum, file = 'varsum.csv')
  

Это дает мне имя переменной и значения min, max, NA и т.д., Но я также хочу включить:

  1. тип переменной (int, num и т.д.)
  2. метка переменной (расширенное объяснение переменной, которая встречается в файле XPT. Я вижу эту метку, когда я использовал View под именем переменной.

Ответ №1:

Вы можете написать свою собственную функцию в sapply и включить нужную информацию.

 varsum <- sapply(a, function(x) c(summary(x), type = class(x), label = ...))
write.csv(varsum, file = 'varsum.csv')
  

Вы можете протестировать это с mtcars набором данных :

 sapply(mtcars, function(x) c(summary(x), type = class(x)))
  

Комментарии:

1. Спасибо, Ронак, я не смог заставить это работать с label. Но в итоге я сделал это в два этапа и немного повозился с Excel… не удалось получить сводку типа переменной, но в моем случае все они числовые. Мне просто нужна была таблица для печати, чтобы я мог быстро сканировать переменные и метки для тех, которые я хочу использовать …. отвлек меня на несколько часов!!! varsum = summary(aa) write.csv(varsum, file = ‘varsum.csv’) varlab = get_label(aa, def.value = NULL, case = NULL) write.csv(varlab, file = ‘varlab.csv’)

2. Я имею в виду, что на самом деле вам не нужно писать ... для label . Из вашего сообщения мне было непонятно, как получить информацию о метках для данных. Также не было общего набора данных для выборки, чтобы сделать предположение. Поэтому я оставил его пустым, чтобы вы могли его записать.

3. Еще раз спасибо Ronak. Да, это работает. Я неправильно написал метку… Спасибо