如何在R中自动左对齐stargazer输出LaTeX表格的首列？

I’ve run into this exact stubborn alignment issue with stargazer before—manual copying is error-prone and breaks reproducibility, but there are two solid ways to fix it programmatically.

Method 1: Manually Modify Output String and Write to File #

The key mistake in your original code was using the out argument inside stargazer()—this makes stargazer write the raw, unmodified table directly to your file before you can adjust the alignment. Instead, capture the LaTeX output first, tweak the alignment specifier, then write the modified content yourself:

# Capture stargazer output as a character vector (omit the `out` argument!)
starout <- capture.output(
  stargazer(balance.table, 
            type="latex", 
            title ="Balance table", 
            digits = 2, 
            float = FALSE, 
            header = FALSE, 
            rownames = FALSE)
)

# Replace the column alignment string: swap "ccccc" for "lcccc"
# Double backslashes escape special LaTeX characters in R
starout <- sub("\\{@\\{\\extracolsep\\{5pt\\}\\} ccccc\\}", 
               "\\{@\\{\\extracolsep\\{5pt\\}\\} lcccc\\}", 
               starout)

# Write the modified output to your target .tex file
writeLines(starout, con = paste0(exhibits, "balance_table.tex"))

This intercepts the LaTeX code before it hits the file, ensuring your alignment change is applied consistently every time you run the script.

Method 2: Use starpolishr for Cleaner, Package-Based Alignment #

If you prefer avoiding manual string replacement, the starpolishr package has a dedicated function to adjust column alignment. First install and load the package:

install.packages("starpolishr")
library(starpolishr)

Then generate your stargazer object, adjust the alignment, and write to file:

# Create the stargazer output as a character object
star_obj <- stargazer(balance.table, 
                      type="latex", 
                      title ="Balance table", 
                      digits = 2, 
                      float = FALSE, 
                      header = FALSE, 
                      rownames = FALSE)

# Set column alignment: first column left-aligned, remaining columns centered
star_obj_aligned <- star_change_colalign(star_obj, colalign = c("l", "c", "c", "c", "c"))

# Write the polished table to your .tex file
writeLines(star_obj_aligned, con = paste0(exhibits, "balance_table.tex"))

The star_change_colalign() function takes a vector where each element defines a column’s alignment (l for left, c for center, r for right). This approach is more maintainable if you ever need to adjust alignment for other columns later.

内容的提问来源于stack exchange，提问作者hannahb