Using Stargazer in R to export csv direct into Excel
<p>I am trying to get the <code>stargazer</code> <em>R</em> package to spit out a huge .csv. descriptive statistics table for 43 different companies into Excel.</p>

<p>I have 43 different data frames pertaining meetings at 43 different corporation.  I am currently trying to create an output from each one of these data frames to list Mean Value of variable of Meetings, Standard Deviation of Variable August, Max, Min, and the total Number. The reproducible example is below for company 1 with "J" standing for July, "A" for August, "S" for September, and "N" for November: </p>

<pre><code>J   A    S   N
29  2   30   2
20  3   30  10
30  10  20  30
40  20  10  21
10  30  13  14
</code></pre>

<p>Company 2 is </p>

<pre><code>J   A   S   N
14  5   15  19
10  10  17  10
30  14  18  11
10  20  19  9
10  10  20  4
</code></pre>

<p>The following is the code I used: </p>

<pre><code>stargazer(Company1[c("J", "A", "S", "N")], type = "text", 
      title="Descriptive statistics Company 1", digits=1, out="table1.txt",
      covariate.labels= c("J", "A", "S", "N"))

stargazer(Company2[c("J", "A", "S", "N")], type = "text", 
      title="Descriptive statistics AugustMartin", digits=1, out="table1.txt",
      covariate.labels= c("J", "A", "S", "N"))

...
stargazer(Company43[c("J", "A", "S", "N")], type = "text", 
      title="Descriptive statistics AugustMartin", digits=1, out="table1.txt",
      covariate.labels= c("J", "A", "S", "N"))
</code></pre>

<p>I am trying to get the stargazer package to take All Descriptive Statistics from Company 1 to Company 43, preserve the headings so that I know which descriptive statistics belong to which company and dump them into a convenient CSV sheet in excel. </p>

<p>When I try to use the following code </p>

<pre><code>library(xlsx)
# Create a single summary table and write to an Excel file
tab1 = t(sapply(Company1, function(x) {
data.frame(N=length(x), Mean=mean(x), `St. Dev.`=sd(x), Min=min(x),    
Max=max(x))
}))
write.xlsx(tab1, "Company Data.xlsx", sheetName="Company1", row.names=FALSE)
</code></pre>

<p>I get the following: </p>

<pre><code>Col 1   Col2     Col3    Col4
51.34   #N/A    51.34   51.34
7.58    #N/A    7.58    7.58
26.99   #N/A    26.99   26.99
49.74   #N/A    49.74   49.74
34.84   #N/A    34.84   34.84
54.84   #N/A    54.84   54.84
18.5    #N/A    18.5    18.5  
49.34   #N/A    49.34   49.34
49.26   #N/A    49.26   49.26
</code></pre>

<p>It is taking the mean of each row and not the mean of the specified column. ideally it would add up everything in Col 1, find the mean, the standard deviation, the min and the max. </p>