[Bug]: as_result_df names don't match columns

[anajens]

What happened?

tbl <- basic_table() %>%
  split_cols_by("ARM") %>%
  analyze(c("AGE", "SEX")) %>%
  build_table(DM) 

as_result_df(tbl)

Variables up to node_class are shifted by 1 to the left (real node_class column has NA. as the name):

> as_result_df(tbl)
  avar_name row_name          row_num is_group_summary node_class     NA. A: Drug X B: Placebo C: Combination
1       AGE      AGE             Mean                2      FALSE DataRow  34.90909   33.01887       34.56589
2       SEX      SEX                F                4      FALSE DataRow        70         56             61
3       SEX      SEX                M                5      FALSE DataRow        51         50             68
4       SEX      SEX                U                6      FALSE DataRow         0          0              0
5       SEX      SEX UNDIFFERENTIATED                7      FALSE DataRow         0          0              0

Relevant log output

No response

Code of Conduct

• I agree to follow this project's Code of Conduct.

Contribution Guidelines

• I agree to follow this project's Contribution Guidelines.

Security Policy

• I agree to follow this project's Security Policy.