Анализ фрейма данных, который содержит временные ряды, с помощью Stargazer
У меня есть набор данных панели 10 шт. и 3 переменные. (Количество набл. 30 = 10 строк (= страны) * 2 столбца (= параметры миграции) * 1col для соответствующего года. Мой фрейм данных состоит из 3, так сказать, годовых фреймов данных.
Как я могу применить Stargazer на весь период времени, принимая во внимание, что это набор данных панели (так что max N=10)? То есть R должен начинаться заново после каждого 11-го ряда. Я хотел бы получить симпатичную таблицу для описательной статистики
Набор данных за первые три года:
structure(list(Population = c(21759420, 8696916, 1946351, 14689726,
8212264, 491723, 18907008, 4345386, 11133861, 657229, 22549547,
8944706, 1979882, 15141099, 8489031, 496963, 19432541, 4404230,
11502786, 673252, 23369131, 9199259, 2014866, 15605217, 8766930,
502384, 19970495, 4448525, 11887202, 689692), Distance..km. = c(7243L,
4290L, 9500L, 3789L, 6452L, 2211L, 4667L, 5036L, 4047L, 9140L,
7243L, 4290L, 9500L, 3789L, 6452L, 2211L, 4667L, 5036L, 4047L,
9140L, 7243L, 4290L, 9500L, 3789L, 6452L, 2211L, 4667L, 5036L,
4047L, 9140L), year = c(2008, 2008, 2008, 2008, 2008, 2008, 2008,
2008, 2008, 2008, 2009, 2009, 2009, 2009, 2009, 2009, 2009, 2009,
2009, 2009, 2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010, 2010,
2010)), .Names = c("Population", "Distance..km.", "year"), row.names = c(1L,
2L, 3L, 4L, 5L, 6L, 7L, 8L, 9L, 10L, 50L, 51L, 52L, 53L, 54L,
55L, 56L, 57L, 58L, 59L, 99L, 100L, 101L, 102L, 103L, 104L, 105L,
106L, 107L, 108L), class = "data.frame")
Я все еще получаю описательную статистику от N=30, но она должна быть N=10, так как я ищу описательную статистику за весь трехлетний период, и каждый годовой кадр данных для этого должен считаться изолированным. Надеюсь, я выразил проблему понятно
1 ответ
Вы можете использовать split
+ lapply
от базы R:
library(stargazer)
lapply(split(df, df$year), stargazer, type = "text")
или же by
:
by(df, df$year, stargazer, type = 'text')
Результат:
===============================================================
Statistic N Mean St. Dev. Min Max
---------------------------------------------------------------
Population 10 9,083,988.000 7,541,970.000 491,723 21,759,420
Distance..km. 10 5,637.500 2,385.941 2,211 9,500
year 10 2,008.000 0.000 2,008 2,008
---------------------------------------------------------------
===============================================================
Statistic N Mean St. Dev. Min Max
---------------------------------------------------------------
Population 10 9,361,404.000 7,798,880.000 496,963 22,549,547
Distance..km. 10 5,637.500 2,385.941 2,211 9,500
year 10 2,009.000 0.000 2,009 2,009
---------------------------------------------------------------
===============================================================
Statistic N Mean St. Dev. Min Max
---------------------------------------------------------------
Population 10 9,645,370.000 8,065,676.000 502,384 23,369,131
Distance..km. 10 5,637.500 2,385.941 2,211 9,500
year 10 2,010.000 0.000 2,010 2,010
---------------------------------------------------------------
df$year: 2008
[1] ""
[2] "==============================================================="
[3] "Statistic N Mean St. Dev. Min Max "
[4] "---------------------------------------------------------------"
[5] "Population 10 9,083,988.000 7,541,970.000 491,723 21,759,420"
[6] "Distance..km. 10 5,637.500 2,385.941 2,211 9,500 "
[7] "year 10 2,008.000 0.000 2,008 2,008 "
[8] "---------------------------------------------------------------"
--------------------------------------------------------------------------
df$year: 2009
[1] ""
[2] "==============================================================="
[3] "Statistic N Mean St. Dev. Min Max "
[4] "---------------------------------------------------------------"
[5] "Population 10 9,361,404.000 7,798,880.000 496,963 22,549,547"
[6] "Distance..km. 10 5,637.500 2,385.941 2,211 9,500 "
[7] "year 10 2,009.000 0.000 2,009 2,009 "
[8] "---------------------------------------------------------------"
--------------------------------------------------------------------------
df$year: 2010
[1] ""
[2] "==============================================================="
[3] "Statistic N Mean St. Dev. Min Max "
[4] "---------------------------------------------------------------"
[5] "Population 10 9,645,370.000 8,065,676.000 502,384 23,369,131"
[6] "Distance..km. 10 5,637.500 2,385.941 2,211 9,500 "
[7] "year 10 2,010.000 0.000 2,010 2,010 "
[8] "---------------------------------------------------------------"
Недостатком этих двух методов является то, что они распечатывают таблицы дважды (один раз из stargazer
выход, другой из lapply
/by
). Чтобы обойти это, вы можете использовать walk
форма purrr
только звонить stargazer
для его побочных эффектов:
library(dplyr)
library(purrr)
df %>%
split(.$year) %>%
walk(~ stargazer(., type = "text"))
Результат:
===============================================================
Statistic N Mean St. Dev. Min Max
---------------------------------------------------------------
Population 10 9,083,988.000 7,541,970.000 491,723 21,759,420
Distance..km. 10 5,637.500 2,385.941 2,211 9,500
year 10 2,008.000 0.000 2,008 2,008
---------------------------------------------------------------
===============================================================
Statistic N Mean St. Dev. Min Max
---------------------------------------------------------------
Population 10 9,361,404.000 7,798,880.000 496,963 22,549,547
Distance..km. 10 5,637.500 2,385.941 2,211 9,500
year 10 2,009.000 0.000 2,009 2,009
---------------------------------------------------------------
===============================================================
Statistic N Mean St. Dev. Min Max
---------------------------------------------------------------
Population 10 9,645,370.000 8,065,676.000 502,384 23,369,131
Distance..km. 10 5,637.500 2,385.941 2,211 9,500
year 10 2,010.000 0.000 2,010 2,010
---------------------------------------------------------------
Замечания:
Все вышеперечисленные методы работают для вывода латекса (type = "latex"
). Я только поставил type = "text"
в демонстрационных целях.